请问怎么把一条记录的所有字段值复制到数组中（用一条语句）

Question

记录本身就是一个数组啊
Rs.Fields(index).Value
index为0--Rs.RecordCount

Answer 1

可是我想把它取出来放入一个string数组中，我想不用一个循环从fields(0)
到fields(recordcount)一个个的复制，
我要的是只用一条语句就能实现，请问该怎么办？

Answer 2

dim a() as variant
dim B() as variant
A = rst.GetRows
rst.MoveNext
B = rst.GetRows
怎么执行到B = rst.GetRows的时候就会出现这样的错误：
实时错误"3021"
BOF或EOF其中一个是真，或者当前的记录已被删除，但应用程序
要求操作的是当前记录。

Answer 3

B是空的啊。
A = rst.GetRows
on error resume next
rst.MoveNext
B = rst.GetRows
msgbox a
msgbox b

Answer 4

我的表中有多条记录，我的目的是把这个表中的一条记录的所有字段值复制给
数组A，然后移动到下一条记录，再把该条记录的所有字段值复制给数组B，
最终的目的是比较数组A和B。
请问该怎么做？