Как выдать запрос на подтверждение сохранения записи в форме ?
Данный код вешается на событие "до обновления" формы. Перед каждой попыткой внести изменения в таблицу будет выскакивать запрос на подтверждение.
'****************** Code Start ******************
Private Sub Form_BeforeUpdate(Cancel As Integer)
Dim strMsg As String
strMsg = "Будем сохранять изменения?"
If MsgBox(strMsg, vbQuestion + vbYesNo) = vbNo Then 'отмена изменений
DoCmd.RunCommand acCmdUndo
End If
End Sub
'****************** Code End ******************