Office中国论坛/Access中国论坛

标题: 如何将VBA的错误提示替换为自已的提示 [打印本页]

作者: levy_rao 时间: 2009-7-18 11:52
标题: 如何将VBA的错误提示替换为自已的提示
ACCESS 里面的错误提示不是很友好，如果换成自已的，并引用其中的提示，怎样才实现？谢谢

作者: levy_rao 时间: 2009-7-18 12:04
自已顶一下，请教一下高手

作者: Henry D. Sy 时间: 2009-7-18 12:48
Private Sub Form_Load()

On Error GoTo Form_Load_Error

'...............

On Error GoTo 0
Exit Sub

Form_Load_Error:
If Err.Number = 2391 Then
MsgBox "xxxxxxxx"
Else
MsgBox "Error " & Err.Number & " (" & Err.Description & ")"
End If
End Sub

作者: levy_rao 时间: 2009-7-18 13:47
搞定了，非常感谢！

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)