数组问题

Question

举例：
dim v1() 
dim v2()
dim v3()
...
dim v10()现想实现如下的目标怎么做啊dim i as long for i=0 to 10    v & i ()  ’这句肯定是错的，希望高手写个正确的！next i      

Answer 1

直接用二维数组不是挺好吗？dim v$(2,10)
for i =0 to 10
v(0,i)=""'v1内容
v(1,i)=""'v2内容
v(2,i)=""'v3内容
next i

Answer 2

看一下下面的程序，在自已琢磨一下，看看是否有用Private Sub Command2_Click()
   Dim a(), b(), c()
   ReDim a(1), b(9), c(9)
   Dim i As Integer, j As Integer
   For i = 0 To 9
       b(i) = i
       c(i) = i + 100
   Next
   a(0) = b
   a(1) = c
   For i = 0 To 1
       For j = 0 To 9
          Debug.Print a(i)(j); " ";
       Next
       Debug.Print
   Next
      
End Sub

Answer 3

直接
dim v(1 to 10)
v(1)
v(2)等等
就可以当数组用了.
如
dim v(1 to 10)
v(1) = array(1,2,3)
v(2) = array(4,5,6)

Answer 4

UPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUP