va bene lo stesso.

adesso devi connetterti al database.
puoi utilizzare una sub, come ho fatto io, che richiami nella Load del tuo form, in questo modo:
codice:
Private Sub Form_Load()
    Connetti
End Sub

Sub Connetti()

    Dim miaConn As ADODB.Connection
    Dim mioSet As ADODB.Recordset
    Dim miaStringaConn As String
        
    percorsoDb = "" 'qui scrivi il percorso del db, tra gli apici.
    miaStringaConn = "Provider=Microsoft.Jet.OLEDB.4.0;"
    miaStringaConn = miaStringaConn & "Data Source="
    miaStringaConn = miaStringaConn & percorsoDb
    miaStringaConn = miaStringaConn & ";Persist Security Info=False"
        
    Set miaConn = New ADODB.Connection
    Set mioSet = New ADODB.Recordset
        
    miaConn.ConnectionString = miaStringaConn
    ...            
End Sub