PUEDES DECLARAR UNA VARIABLE DE TIPOS ADO GLOBAL PARA HACERTE REFERENCIA A TU CONECCION Y PUEDES PONER TODOS TUS RUTINAS EN LOS MODULO SERIA MEJOR SI UTILISAS MODULOS DE CLASE Y ES MAS ELEGANTE LA PROGRAMACION ES ALGO ASI:
Dim base As New ADODB.Connection
Dim tabla As New ADODB.Recordset
'ESTO VA EN EL MODULO
Private Sub Elimina_Click()
'command
'base.Execute "delete from Tabla" ' elimina registros
base.Execute "drop table Tabla" 'elimina tabla
End Sub
Private Sub MAIN()
base.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:Documents and Settingslab1-3Mis documentosejemplo.mdb;Persist Security Info=False"
FORM1.SHOW
End Sub
'ESTO ES DE TU FORM PRINCIPAL
Private Sub Form_Unload(Cancel As Integer)
base.Close
End Sub
'POR CIERTO PUEDES UTILIZAR TODOS LAS SENTENCIAS SQL QUE QUIERAS ES MUY FLEXCIBLE SUERTE