Imports System
Public Class Program
Public Shared Sub Main(ByVal args As String())
Dim array As Integer() = New Integer(6) {}
array(0) = 234
array(1) = -8
array(2) = 98
For i As Integer = 0 To array.Length - 1
Console.Write(array(i) & " ")
Next
End Sub
End Class
' run:
'
' 234 -8 98 0 0 0 0
'