Contact: aviboots(AT)netvision.net.il
40,835 questions
53,238 answers
573 users
Module Module1 Sub Main() Dim list As New List(Of Integer) list.Add(4) list.Add(5) list.Add(9) list.Add(16) list.Add(99) For Each item As Integer In list Console.WriteLine(item) Next End Sub End Module ' run: ' ' 4 ' 5 ' 9 ' 16 ' 99
Module Module1 Sub Main() Dim list As New List(Of Integer) list.Add(4) list.Add(5) list.Add(9) list.Add(16) list.Add(99) For i = 0 To list.Count - 1 Console.WriteLine(list.Item(i)) Next i End Sub End Module ' run: ' ' 4 ' 5 ' 9 ' 16 ' 99