Değişiklikler Kaydedilsin mi?

Formun BeforeUpdate prosedürüne aşağıdaki kodu koyarsanız, kayıtlar değiştiğinde kullanıcıya değişiklikler kaydedilecekmi sorusu sorulacaktır.

Private Sub Form_BeforeUpdate(Cancel As Integer)
 If NewRecord = False Then
      If MsgBox("Değişiklikler kaydedilsin mi?", vbYesNo) = vbNo Then
           Cancel = True
           DoCmd.RunCommand acCmdUndo
      End If
 End If
End Sub