Class Sample Public Shared Sub Main() Dim numbers() As Integer = { -123123, 0, 1, 123123 } For Each number As Integer In numbers Console.Write("{0,-8} --> ", number.ToString()) Next End Sub End Class