Imports System
Public Class Test
Public Shared Sub Main()
Dim N As Integer = 5
Dim array = New Integer(N) {1, 2, 3, 4, 5, 99}
For i As Integer = 0 To array.GetLength(0) - 1
Console.WriteLine("{0,2}", array(i))
Next
End Sub
End Class
' run:
'
' 1
' 2
' 3
' 4
' 5
' 99