Seria algo asi: En las declaraciones Private Db as database 'tienes que hacer una referencia a Ms.Dao Private rPersonas as RecordSet En el Load: Set db=opendatabase(app.path & "\datos.MDB) Set rPersonas=db.openRecordset("Personas") Luego: Text1.Text = rPersonas!Nombre