Module Module1
Sub Main()
Dim matrix(,) As Integer = New Integer(,) {{13, 22, 43, 34},
{43, 54, 67, 98},
{88, 79, 11, 998}}
For i As Integer = 0 To matrix.GetUpperBound(0)
For j As Integer = 0 To matrix.GetUpperBound(1)
Console.Write("{0,5}", matrix(i, j))
Next
Console.WriteLine()
Next
End Sub
End Module
' run:
'
' 13 22 43 34
' 43 54 67 98
' 88 79 11 998