inserimento, eliminazione, aggiornamento e salvataggio di nuovi record in un oggetto data:
...cmdSalva
Dim a As VbMsgBoxResult
MsgBox "salvare i nuovi dati?", vbQuestion + vbOKCancel
If a = vbOK Then
dataClienti.Recordset.Update
ElseIf a = vbCancel Then
dataClienti.Recordset.CancelUpdate
End If
dataClienti.Recordset.MoveNext
...


...cmdModifica
dataClienti.Recordset.Edit
...


...cmdElimina
Dim b As VbMsgBoxResult
MsgBox "eliminare i dati del cliente corrente?", vbQuestion + vbOKCancel
If b = vbOK Then
dataClienti.Recordset.Delete
End If
dataClienti.Recordset.MovePrevious
...


...cmdAggiungi
dataClienti.Recordset.AddNew
...


Qualcosa non va!!! Mi aiutate?