求教VBA错误捕捉的问题
Public Sub tt()
On Error GoTo errs
Dim i As Integer
i = CInt("abc")
errs:
MsgBox "error"
End Sub
这段程序代码没有捕捉到错误而是有程序自己报错了
求指教
[解决办法]
你怎么知道没有捕捉到错误,你的代码正确执行i = CInt("abc")后(假设),和捕捉错误后执行的都是
MsgBox "error"。。。。。。。。。。。。你根本无法分辨
比较正确的做法应该是:
Public Sub tt()
On Error GoTo errs
Dim i As Integer
i = CInt("abc")
exit sub
errs:
MsgBox "error"
End Sub