vb怎么象C一样给数组赋值。ttt(3)={1,2,3}???

Question

Dim arVar as Variant
Dim i     as Integer
dim strV() as String   arVar=Array("a","b","c")
   For i=0 To UBound(arVar)
      Debug.Print arVar(i)
   Next i
   strV=Split("A,B,C,D",",")
   For i=0 To UBound(strV)
      Debug.Print strV(i)
   Next i

Answer 1

Array 函数和 Split 函数 都可以给数组整体赋值！

Answer 2

对的我记得有人也问过这个问题我把答案找来了
dim a(2,2) as int
a(2,2)=(1,2,3,4)
结果 a(0,0)=1,a(0,1)=2,a(1,0)=3,a(1,1)=4
a(2,2)=((1),32,2)
结果 a(0,0)=1,a(0,1)=0,a(1,0)=32,a(1,1)=2
a（2,2）=(1)
结果 a(0,0)=1,a(0,1)=a(1,0)=a(1,1)=0
vb 的赋值是很灵活的只要多编是很容易掌握的。