Voltron
Defender of the universe
- Local time
- Today, 10:45
- Joined
- Jul 9, 2009
- Messages
- 77
Here is some code to override and change the error message that the user gets for specific errors.
Private Sub Form_Error(DataErr As Integer, Response As Integer) 'Overrides default error for input mask violations and replaces it with a more descriptive messagebox
Const INPUTMASK_VIOLATION = 2279
If DataErr = INPUTMASK_VIOLATION Then
MsgBox "There was an input mask violation! The UserID must be 4 letters followed by 2 numbers. The dates must be mm/dd/yyyy."
Response = acDataErrContinue
End If
End Sub
This can be used for input masks or any other error that you want to change the message on.
input mask default message, input mask message, input mask error message, default input mask error message, error message, default error message, default error, change error message, change input mask message, change input mask error message
Private Sub Form_Error(DataErr As Integer, Response As Integer) 'Overrides default error for input mask violations and replaces it with a more descriptive messagebox
Const INPUTMASK_VIOLATION = 2279
If DataErr = INPUTMASK_VIOLATION Then
MsgBox "There was an input mask violation! The UserID must be 4 letters followed by 2 numbers. The dates must be mm/dd/yyyy."
Response = acDataErrContinue
End If
End Sub
This can be used for input masks or any other error that you want to change the message on.
input mask default message, input mask message, input mask error message, default input mask error message, error message, default error message, default error, change error message, change input mask message, change input mask error message
