'Visual Basic 2010 Meerdimensionale Arrays Arrays
Module Example1
    Sub Main()
        Dim rowCount As Integer = 2
        Dim columnCount As Integer = 3
        '
        Dim upperboundFirstDimension As Integer = rowCount - 1
        Dim upperboundSecondDimension As Integer = columnCount - 1
        '
        Dim matrix(upperboundFirstDimension, _
                   upperboundSecondDimension) As Integer
        '
        matrix(0, 0) = 10
        matrix(1, 0) = 20
        matrix(1, 2) = 30
        '
        Console.WriteLine("first row, first column   : " & matrix(0, 0))
        Console.WriteLine("second row, first column  : " & matrix(1, 0))
        Console.WriteLine("second row, second column : " & matrix(1, 1))  ' (1)
        Console.WriteLine("third row, third column   : " & matrix(1, 2))
        '
        Console.ReadLine()
    End Sub
End Module
'Bezoek www.vbvoorbeelden.be voor meer Visual Basic voorbeelden.
'Copyright - De Wolf / vbvoorbeelden - 2003-2011 - Alle rechten voorbehouden.