使用callByName

时间:2016-10-21 16:53:17

标签: vba error-handling

我在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

是否有任何解决方法可以通过名称调用我的函数,还能够处理错误并获取自定义错误说明?

0 个答案:

没有答案