Bueno, así:
Debes ir a Referencias y escoger el Microsoft DAO 3.51 o 3.6
Y esto lo pones en el envento Load del Form, así cuando se cargue a memoria, se conecte a la BD, al final habría que colocar BD.close y Rs.Close
Dim BD as Database
Dim Rs as Recordset
Set BD = OpenDatabase(App.path + "\BaseDatos.mdb")
Set Rs = BD.OpenRecordset(Select * From Tabla Order By Campo)
'la entencia SQL mostrada es solo para dar un ejemplo.
'El App.Path busca la BD en la misma carpeta en donde está
'el proyecto, pero si la BD se encuentra en otra parte, debes colocar
'la ruta completa.
Si lo haces con el Control Data DAO, más fácil, la BD se le asigna por su propiedad Databasename y la Tabla a la cual estará asignado ese Data control se escoge en su propiedad RecordSource.
Saludos señorita Marcela.
