请问如何遍历某个窗体里的Recordset
例如Dim objRs1 As Recordset, objRs2 As Recordset

要如何才能遍历某个窗体里所有用上面声明建立的Recordset

谢谢



[解决办法]
Dim a As Recordset
For Each a In Form1
....
Next
试下吧，只是猜想
[解决办法]
看看这样行不行。
if not (objRs1.BOF or objRs1.EOF) Then
objRs1.MoveFirst
do until objRs1.EOF
print objRs1.Fields(0) & chr(10) & chr(13)
objRs1.MoveNext
loop
end if
[解决办法]
本人猜想楼上的猜想可能是错误的,我不知道楼主为什么要这样做,更不知道为什么窗体里会有那么多的Recordset须要去遍历,我猜想可能是楼主对Recordset情有独钟,喜欢每一个操作使用单独的Recordset,不过我猜想那样去做程序会占用太多的内存,本人的Recordset都是在过程里的,都会随过程消亡,虽然建立实例会浪费些时间,但我还是喜欢这样做
[解决办法]
如楼上所说，换一个方式可能更加简单。