Visual Basic - alamacenar registros en array

Tengo una base de datos de Access almacenada en un control data donde realizo busquedas SQL. Me gustaría recorrer determinados campos del control data y almacenarlos en un array lo más rápido posible, ya que tengo muchos registros.

Gracias de antemano

.Este codigo es si tomaras los datos con DataEnvaroment

Dim H as integer, J as integer
Dim Array(tu numero de registros) as (tu tipo de datos)

for J =0 to (tu numero de registros)
Array(J) = DataEnvearoment.rsCommando (H)
H = H + 1
next J
'Donde J es el numero de tu posision de Array y H el numero del field de la base de datos como sacarlos de hay, creo que ya lo sabes...Suerte