如:在DELPHI 中这样定义的
var
  orderarray:array[0..5] of char=($20,#$20,#$20,#$20,#$20,#$20);
在VB中如何定义?谢谢!

解决方案 »

  1.   

    dim array1(0 to 5) as string
      

  2.   

    array1(0) = "a1"
    array1(1) = "a2"
    array1(2) = "a3"
    array1(3) = "a4"
    array1(4) = "a5"
    array1(5) = "a6"
      

  3.   

    Dim ls_Array(0 To 10) As String
        
    ls_Array() = Array("20", "20", "20", "20", "20", "20")
      

  4.   

    不好意思,写错了,应该为:Dim ls_Array
        Dim i As Long
        
        ls_Array = Array("20", "20", "20", "20", "20", "20")
        For i = 0 To 5
            MsgBox ls_Array(i)
        Next
      

  5.   

    定長數組:
    Dim l_Array1(1 to 10) as string
    變長數組:
    dim l_Array2() as string
    可能過以下語句改變其長度
    redim l_Array2(1 to 5) as string
      

  6.   

    谢谢!
    但我要定义成char型;
    或者直接给数组赋值,语句该怎样写?
    如:
        orderarray[0]=(#$55)
        orderarray[1]=(#$56)
        orderarray[2]=(#$57)
        orderarray[3]=(#$58)
        orderarray[4]=(#$59)
        orderarray[5]=(#$6a)