Блог

Главная - Вопросы по программированию - Как избежать ошибки доступа по умолчанию с использованием события Forn_onError?

Как избежать ошибки доступа по умолчанию с использованием события Forn_onError?

#vba #ms-access

#vba #ms-access

Вопрос:

При использовании приведенного ниже кода появляется мое пользовательское сообщение. Но после этого также появляется сообщение о доступе по умолчанию, несмотря на мое заявление об ответе. Понятия не имею, что я здесь делаю не так.

Мой код:

 Private Sub Form_OnError....
   If DataErr = 3162 then
      MsgBox"ABC"
      Response = acDataErrContinue
   End if
End sub

Комментарии:

1. Пожалуйста, предоставьте свой фактический код, скопированный из окна кода.

2. На самом деле, я пытался скопировать код, но не смог вставить его в stackoverflow.

Ответ №1:

Access немного непоследователен в том, как отменить событие.

Чтобы отменить сообщения об ошибках такого рода, используйте DoCmd.CancelEvent .

 Private Sub Form_Error(DataErr As Integer, Response As Integer)
   If DataErr = 3162 then
      MsgBox"ABC"
      DoCmd.CancelEvent
   End if
End sub