Imports System
Public Class MainClass
Shared Sub Main()
Dim intCount As Integer
'Perform a loop
For intCount = 1 To 5
'Add the item to the list
System.Console.WriteLine("I am item " & intCount & " in the list!")
Next
End Sub
End Class