Se nel controllo data hai impostato nelle proprietà DataBaseName o RecordSource fisse le devi rimuovere.
Quando farai click sul comando associerai l'apertura del database (banca) e, quando deciderai di visualizzare i dati nella DBGrid dovrai fare:
codice:
Data1.DatabaseName = db.name 'percorso e nome del database (banca) aperto
Set Data1 = Dbnow.OpenRecordset("Select * from Tabella order by campo1,campo2")
Set dbgrid1.Recordset = Data1
Ciao