小弟我在学On Error GoTo 异常处理

我在学On Error GoTo 错误处理
1、On Error GoTo Err_Line
…
Err_Line: 
If Erl > 0 Then MsgBox "There is a error in " & Erl

2、On Error Resume Next

3、On Error GoTo 0

4、On Error GoTo Click_Error
…
…
On Error GoTo 0
Exit Sub

Click_Error:
MsgBox "错误" & Err.Number & " (" & Err.Description & ")"

上面4条谁给我解释一下。详细点，我在学习这个方法。
尤其是第四条多将一点让我能理解他是怎么运行的。谢谢

[解决办法]

引用:

这个我在百度找到过，我想知道为什么没有错误它也会运行错误处理的代码。我用错了么

那时因为你没有Exit sub
private sub submain()
On Error Goto errSub

exit sub
errSub:

end sub
[解决办法]
On Error 可以不理会错误，也可根据错误跳入某行，执行相应的任务。

查看更多 下一篇