vba - 在 Recordset 对象上使用 GetRows 不会返回任何行

Question

我正在尝试将记录集加载到数组中。我正在使用以下代码：

Set rst = CurrentDb.OpenRecordset("SELECT id FROM TABLE1")  
bankacid = rst.GetRows()  
rst.Close  
i = UBound(bankacid, 2)   
MsgBox i + 1

这不返回任何行。如果我使用“bankacid = rst.getrows(5)”，它会起作用。

我对 VBA 很陌生，非常感谢有人指出我所缺少的。

Answer 1

最好退后一步，说出你为什么想要一个数组，毕竟，DAO recorset 比数组更实用。如果确实需要数组，请使用 ADODB。如果您只想引用字段和行，请使用 Move、MoveFirst、MoveLast、MoveNext、MovePrevious 以及字段名称（列）或序号位置（.Field(3)。