Visual Basic para Aplicaciones - Acceder a los datos de una tabla con DAO

Necesito acceder a los datos de los distintos campos de una tabla y guardarlos en variables.Intento hacer la conexión, pero creo q no cojo los datos bien. Mi código es el siguiente:
sql=Select.....
Set MyRS=MyRS.openRecordset(sql,dbOpenSnapshot)
With MyRS
vble1=.Campo_tabla1
vble2=.Campo_tabla2
End with

Xq no funciona??Gracias por adelantado

trata de hacerlo asi

declara una variable de tipo database

dim mdb as database
dim rs as new Recordset

set rs =mdb.OpenRecordset("select campo1,campo2, from tabla")
if rs.recordcount > 0 then
var1=rs("campo1")
var2=rs("campo")
end if

asi yo lo hacia y no tenia ningun tipo de problema, ya no uso DAO ahora uso ADO, con SQL SERVER pero es la misma filosofia

salu2 y suerte