About Array

 

        Dim arr1 As String() = {"001", "002"}
        Dim arr2 As String() = New String() {"001", "002"}
        Dim arr3(2) As String
        arr3(0) = "001"
        'Dim arr4(2) As String = {"001", "002"}  '对于显示声明界限的数组不能初始化

        '在数组声明语句中创建数组
        Dim arr4 As String() = New String() {}  '声明时若用了New关键字,则必须有{}初始化,此时变量长度为0
        '或者 Dim arr4 As String() = {}
        ReDim arr4(2)       '重定义数组的界限
        arr4(0) = "value1"  '初始化数组,下同
        arr4(1) = "value2"
        arr4(2) = "value3"

        '在单独的赋值语句中创建数组
        Dim arr5() As String
        arr5 = New String() {}

        Dim arr6(10) As Integer   '声明一维数组变量
        Dim arr7(,,,) As Integer '声明多维数组变量
        Dim arr8()()() As Byte  '声明交错数组变量

转载于:https://www.cnblogs.com/yongwnet/archive/2007/07/29/835268.html