二维数组-----称为矩形数组

Module Module1

    Function AddElements()

        Dim a(,) As Integer = {{0, 0, 1}, {1, 2, 11}, {3, 6, 12}, {6, 9, 90}, {23, 1, 78}}
        Dim i, j As Integer
        For i = 0 To 4
            For j = 0 To 2
                Console.WriteLine(a(i, j))
            Next j
        Next i
    End Function


    Sub Main()

        Dim a As Integer = 100
        Dim b As Integer = 50
        AddElements()