Ho creato una tabella in access collegata tramite data1 con alcini 5 campi testo(nome ,cognome tel, ecc) una dbgrid collegata database ed alcuni button (inserisci, elimina, cerca, aggiorna, esci. Il problema è che dopo fatto una ricerca in cui il record cercato mi viene visualizzato sia nella dbgrid che nei campi, premo il button aggiorna non succede niente.i codici sono:

button inserisci:

Private Sub Command1_Click()
Data1.Recordset.AddNew
End Sub

button cerca

Private Sub Command2_Click()
Dim NomeDaCercare As String
NomeDaCercare = InputBox$("Immettere il nome da ricercare:", "Ricerca nell'agenda")
Data1.RecordSource = "select * from tabella Where nome = '" + NomeDaCercare + "'"
Data1.Refresh
End Sub

button aggiorna

Private Sub Command4_Click()
Data1.Refresh
End Sub

button elimina

Private Sub Command4_Click()
Data1.Recordset.Delete
End Sub

mentre io vorrei che nella dbgrid venissero di nuovo visualizzati tutti i record presenti, grazie