Sample
Public Class Product
Private pid As Integer = 0
Private pname AS String = String.Empty
Public Property ProductID As Integer
Get
Return pid
End Get
Set (value As Integer)
pid = value
End Set
End Property
Public Property ProductName As String
Get
Return pname
End Get
Set (value As String)
pname = value
End Set
End Property
End Class
To create collection, please follow this link:
Walkthrough: Creating Your Own Collection Class[
^]
Try!