About Array

 


        
Dim arr1 As String() = {"001""002"}
        
Dim arr2 As String() = New String() {"001""002"}
        
Dim arr3(2As 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(10As Integer   '声明一维数组变量
        Dim arr7(,,,) As Integer '声明多维数组变量
        Dim arr8()()() As Byte  '声明交错数组变量
posted @ 2007-07-29 11:30  yongwnet  阅读(224)  评论(0编辑  收藏  举报