Visual Basic - Recorset

Hola:
Como puede asignarle a una variable lo que me trae en recorset
Ejemplo:
if rs.RecordCount > 0 then
TotalRegistro=rs.RecordCount
end if

Prueba con esto:
if rs.RecordCount > 0 then
Variable1=rs!Campo1
Variable2=rs!Campo2
'asi sucesivamente dependiendo los campos de tu consulta
end if