我在Windows 10的Access 2016中有一个表单。
它有一个名为e
的函数和一个Form_Load
事件过程,如下所示:
Public Function e()
Err.Raise 1000, Description:="custom description"
End Function
Private Sub Form_Load()
On Error GoTo errorhandler
e
Exit Sub
errorhandler:
MsgBox (Err.Description)
End Sub
e
函数引发错误,其中包含错误处理程序捕获的自定义描述,消息框显示:
custom description
到目前为止没有问题!
但是,如果我使用e
来调用CallByName Me, "e", VbMethod
,那么我会收到默认错误说明并显示消息框:
Application-defind or object-defind error
是否有任何解决方法可以通过名称调用我的函数,还能够处理错误并获取自定义错误说明?