Private Sub 前条_Click()
On Error GoTo Err_前条_Click
DoCmd.GoToRecord , , acPrevious
Exit_前条_Click:
Exit Sub
Err_前条_Click:
MsgBox Err.Description
Resume Exit_前条_Click
End Sub
以上是ACCESS命令按钮向导产生的向前移动记录的命令按钮代码,当到达第一条记录后,再点击命令按钮,会产生错误提示。
只要在
MsgBox Err.Description 前加 ' 或删除这一行就行了。
Access软件网交流QQ群(群号:198465573) |