Message Box Name

Dick7Access

Dick S
Local time
Today, 16:20
Joined
Jun 9, 2009
Messages
4,340
Where do I change the name if the messge box?

Private Sub cmdNext_Click()
On Error GoTo Err_Handler

DoCmd.GoToRecord , , acNext

Command148_Exit:
Exit Sub

Err_Handler:
If Err.Number = 2105 Then

MsgBox "You have already reached the last Tribe record."

Else
MsgBox Err.Description, vbExclamation, "Error #: " & Err.Number

End If
Resume Command148_Exit
End Sub
 

Users who are viewing this thread

Back
Top Bottom