Use ArrayList to store objects : ArrayList « Collections « VB.Net Tutorial

1. VB.Net Tutorial
2. Collections
3. ArrayList

Option Strict On
 Imports System
 Imports System.Collections
 
 Public Class Employee
     Private myEmpID As Integer

     Public Sub New(ByVal empID As Integer)
         Me.myEmpID = empID
     End Sub 'New

     Public Overrides Function ToString( ) As String
         Return myEmpID.ToString( )
     End Function 'ToString

     Public Property EmpID( ) As Integer
         Get
             Return myEmpID
         End Get
         Set(ByVal Value As Integer)
             myEmpID = Value
         End Set
     End Property
 End Class 'Employee

 Class Tester
     Shared Sub Main( )
         Dim empArray As New ArrayList( )
         Dim intArray As New ArrayList( )

         Dim i As Integer
         For i = 0 To 4
             empArray.Add(New Employee(i + 100))
             intArray.Add((i * 5))
         Next i
         For Each i In intArray
             Console.Write("{0} ", i.ToString( ))
         Next i

         Console.WriteLine(ControlChars.Lf)
         Dim e As Employee
         For Each e In empArray
             Console.Write("{0} ", e.ToString( ))
         Next e

         Console.WriteLine(ControlChars.Lf)
         Console.WriteLine("empArray.Capacity: {0}", empArray.Capacity)
     End Sub
 End Class

0 5 10 15 20

100 101 102 103 104

empArray.Capacity: 8