Option Strict On
Imports System
Public Class TestClass
Sub SomeMethod(ByVal firstParam As Integer, ByVal secondParam As Single)
Console.WriteLine("received: {0}, {1}",firstParam, secondParam)
End Sub
End Class
Module Module1
Sub Main( )
Dim howManyPeople As Integer = 5
Dim pi As Single = 3.14F
Dim tc As New TestClass( )
tc.SomeMethod(howManyPeople, pi)
End Sub
End Module
|