Цикл не нужен:

GetRows Method
Retrieves multiple records of a Recordset object into an array.

Syntax
array = recordset.GetRows( Rows, Start, Fields )
Return Value
Returns a Variant whose value is a two-dimensional array.
------------
См. ADO API Reference:
:\Program Files\Microsoft Data Access SDK\Docs\ado260.chm