Customize standardERR

[Xaysana12345]

Hi there,

Everytime, when I create the Next and Previous buttons for rolling records in
Access form. When it reaches either to last or first record, there is a message pops up says "You cann't go to the Specified Record".

How can I change this message to:

1. "You come to last record" when I click the next button and come to last record

2. "You come to first record" when I click the previous button and come to the firs record.

Thank you in advance

Regards,

[missinglinq]

1. "You come to last record" when I click the next button and come to last record

Replace current error routine with:

If Err.Number = 2105 Then
   MsgBox  "You've come to the last record"
   Resume YourExitRoutineNameGoesHere
End If
 

2. "You come to first record" when I click the previous button and come to the firs record.

Once again, replace current error routine with:

If Err.Number = 2105 Then
   MsgBox  "You've come to the first record"
   Resume YourExitRoutineNameGoesHere
End If
 

Linq ;0)>

[Xaysana12345]

1. "You come to last record" when I click the next button and come to last record

Replace current error routine with:

If Err.Number = 2105 Then
   MsgBox  "You've come to the last record"
   Resume YourExitRoutineNameGoesHere
End If
 

2. "You come to first record" when I click the previous button and come to the firs record.

Once again, replace current error routine with:

If Err.Number = 2105 Then
   MsgBox  "You've come to the first record"
   Resume YourExitRoutineNameGoesHere
End If
 

Linq ;0)>

Thank you so much missingling.

[Xaysana12345]

Thank you so much missingling.

Also, Can I ask one other question please?

I also would like to MsgBox: If a subformfield is greater than mainformfield then MsgBox.

Here is my code, but it doesn't work

Mainform Current Event:
If Forms!mysubform!txtstandingKIP > txtAmountAdv then
MsgBox ("The Value is greater than Budget")
Me.Forms!mysubform!OtherCurrency.SetFocus

End If
End Sub

Please advise, Thank you in advance

Regards,