Rieccomi. Scusami, ma avevo dato per scontato che sapessi fare l'apertura della connessione. Prima della serie di istruzioni che ti ho postato ieri aggiungi:
codice:
dim cnConne As New OleDb.OleDbConnection
        cnConne.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
        "Data Source=C:\nomedb.mdb;"
        Try
            cnConne.Open()
        Catch ex As Exception
            MsgBox(ex.Message)
            MsgBox(ex.ToString)
        End Try
Naturalmente al posto di C:\nomedb.mdb devi mettere il percorso completo ed il nome del tuo MDB

Dopo la serire di istruzioni che ti ho postato ieri aggiunti:
codice:
        cnConne.Close()
Anche nella query di ieri il nometabella deve essere sostituito dal nome della tua tabella e id deve essere sostituito dal nome del campo che per te rappresenta l'id
Più o meno devrebbe essere tutto. Prova e fammi sapere