VB.Net/Generics/Generic List
Generic String List
<source lang="vbnet"> Imports System Imports System.Collections Imports System.Collections.Generic Public Class MainClass
Shared Sub Main(ByVal args As String()) Dim places As New List(Of String) places.Add("A") places.Add("B") places.Add("C") places.Add("D") End Sub
End Class
</source>
Use Generic List to store your own Object
<source lang="vbnet"> Imports System Imports System.Collections Imports System.Collections.Generic Public Class MainClass
Shared Sub Main(ByVal args As String()) Dim student_list As New StudentList student_list.Add(New Student("A", "B")) student_list.Add("C", "D") End Sub
End Class
Public Class Student
Private m_FirstName As String Private m_LastName As String Public Sub New(ByVal first_name As String, ByVal last_name As String) m_FirstName = first_name m_LastName = last_name End Sub Public Overrides Function ToString() As String Return m_FirstName & " " & m_LastName End Function
End Class Public Class StudentList
Inherits List(Of Student) Public Overloads Sub Add(ByVal first_name As String, ByVal last_name As String) Dim student As New Student(first_name, last_name) MyBase.Add(student) End Sub
End Class
</source>