Imports System
Module Test
Sub Main()
Dim obj As YourClass
obj = New YourClass()
Console.WriteLine("Name is: " & obj.Name)
Console.WriteLine("Address is: " & obj.Address)
Console.WriteLine("ID is: " & obj.ID)
End Sub
End Module
Public Class YourClass
Public Name As String = "New YourClass"
Public Address As String
Public ID As Integer
End Class
|