Office中国论坛/Access中国论坛

标题: 取消Microsoft Access 错误消息而显示自定义消息 [打印本页]

作者: 徐阿鹏    时间: 2003-3-4 00:11
标题: 取消Microsoft Access 错误消息而显示自定义消息
在 Error 事件发生时,任何可以截取 Microsoft Access 错误消息而显示自定义消息,
如何显示自定义消息后可以终止Microsoft Access 错误消息,有方法解决吗?

作者: Roadbeg    时间: 2003-3-4 00:18
在代码中加入 on error goto ... 或 on error resume next


[此贴子已经被作者于2003-3-3 16:17:36编辑过]


作者: WTM1    时间: 2003-3-4 00:20
Private Sub 命令8_Click()
On Error GoTo Err_命令8_Click


    Screen.PreviousControl.SetFocus
    DoCmd.DoMenuItem acFormBar, acEditMenu, 10, , acMenuVer70

Exit_命令8_Click:
    Exit Sub

Err_命令8_Click:
    MsgBox Err.Description
' 把MsgBox Err.Description修改为msgbox "显示信息!"就可以了!
    Resume Exit_命令8_Click
'这里表示显示信息后运行Exit_命令8_Click标号!







欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/) Powered by Discuz! X3.3