Access - Asignar Resultado de Consulta a una Variable

Necesito asignar a una variable el resultado de una consulta, Es con un recordset ?

Yo lo haría desde codigo VB.

Puedes escribir un pequeño ejemplo?, te lo agradeceria !

Dim db as DAO.Database
Dim rs as DAO. Recordset

Set db = DBEngine.OpenDatabase("Base datos")
Set rs = db.OpenRecordset("Tabla o SQL", dbopendynaset)

Con esto, rs, almacena el resultado de la consulta.

Do while Not rs.Eof

List1.AddItem rs![Nombre_Campo] & " " & rs![Nombre_Campo2]
Rs.MoveNext
Loop

rs.close
db.close
set rs= nothing
set db= nothing

Saludos