Public Class YourClass
Public Address as String = "Default"
Public City As String = "Default"
Sub New()
MyBase.New()
Console.WriteLine("YourClass Created")
End Sub
Sub New(A as String, C As String)
Me.New()
Address = A
City = C
Console.WriteLine("YourClass.Address and Set")
End Sub
End Class
Module Test
Sub Main()
Dim SL As New YourClass("123 First Street", "Somewhere")
End Sub
End Module
|