尝试使用Collection存放数组,可以存进去,但是怎么拿出来,还原为数组?以下的代码在取出的部分报错:
Dim list as Collection'存放
Dim arr(0 to 2) as String
list.add arr
...'取出
Dim aa(0 to 2) as String
for i=1 to list.Count
set aa = list.item(i)‘报错
debug.print aa(0)
next i
Dim list as Collection'存放
Dim arr(0 to 2) as String
list.add arr
...'取出
Dim aa(0 to 2) as String
for i=1 to list.Count
set aa = list.item(i)‘报错
debug.print aa(0)
next i
Dim arr(0 To 2) As String
For i = 0 To 2
list.Add arr(i)
Next
'取出
Dim aa(0 To 2) As String
For i = 1 To list.Count
aa(i - 1) = list.Item(i)
Debug.Print aa(i - 1)
Next i
While list.MoveNext()
thisCustomer = list.Current()
End While
然后再转为STRING
Dim list as Collection
set list=new collection
....
Dim A(3) As Long
Dim T As New Collection
Dim B() As Long
Dim i As Long
T.Add A
B = T(1)
For i = 0 To 3
Debug.Print B(i)
Next
End Sub
list.Item(i)(0)
list.Item(i)(1)习惯用JAVA的思维了。多谢各位回复