Pada blog yang sebelumnya saya sudah membahas cara menggunakan object array pada VB.NET, pada artikel kali ini saya akan meneruskan untuk membahas object collection yang lain yang sering digunakan yaitu List

Pada .NET 2.0 List menggunakan fitur Generic, sehingga kita bisa mebuat object collection yang “typed safe”.

Dengan array kita harus mendeklarasikan terlebih dahulu kapasitas array, tapi bila menggunakan List tidak perlu karena object yang disimpan pada list bersifat dinamis

Contoh penggunaan List sederhana:

Untuk membuat object list baru yang bertipe string kodenya

'Menggunakan List yang bertipe string
        Dim objNama As New List(Of String)

Untuk menambahkan nilai bertipe string kedalam list caranya

'cara menambahkan kedalam elemen list
        objNama.Add("Erick")
        objNama.Add("Anton")
        objNama.Add("Willy")
        objNama.Add("Bejo")

Untuk mengambil nilai dari object list:

'untuk mengambil elemen yang ada dalam list
        For Each strNama As String In objNama
            Console.WriteLine(strNama)
        Next

List tidak hanya digunakan untuk menampung nilai dengan tipe-tipe data native seperti int,double,currency,dll tapi list juga bisa digunakan untuk menampung nilai yang bertipe object

Contoh Penggunaan List bertipe object

Pertama buat class Employee terlebih dahulu:

Public Class Employee
    Private employeeID As Integer

    Public Sub New(ByVal theID As Integer)
        Me.employeeID = theID
    End Sub

    Public Property EmpID() As Integer
        Get
            Return employeeID
        End Get
        Set(ByVal value As Integer)
            employeeID = value
        End Set
    End Property
End Class

Kemudian buat list yang bertipe class Employee

Dim objEmp As New List(Of Employee)

Isi list dengan object bertipe employee

'mengisi list dengan object bertipe class employee
        For intCount As Integer = 1 To 5
            objEmp.Add(New Employee(intCount + 100))
        Next

Untuk menampilkan atau mengambil nilai pada object employee dalam  list

'ambil semua nilai employeeID dari List
       For Each objId As Employee In objEmp
           Console.WriteLine(objId.EmpID)
       Next