'Visual Basic 2010 Arrays als Argumenten Procedures en Functies
Module Example3
    Sub Main()
        Dim values1 As Integer() = {1, 2, 3}
        Dim values2 As Integer() = {4, 5, 6}
        Dim values3 As Integer() = values1
        Dim values4 As Array = values2
        '
        Console.WriteLine(values1 IsNot values2)
        Console.WriteLine(values1 Is values3)
        Console.WriteLine(values1 IsNot values4)
        Console.WriteLine()
        '
        Console.WriteLine(values2 IsNot values1)
        Console.WriteLine(values2 IsNot values3)
        Console.WriteLine(values2 Is values4)
        '
        Console.ReadLine()
    End Sub
End Module
'Bezoek www.vbvoorbeelden.be voor meer Visual Basic voorbeelden.
'Copyright - De Wolf / vbvoorbeelden - 2003-2011 - Alle rechten voorbehouden.