try catch 抛出异常
在过程开头,使用错误处理转移语句:on error goto 行号然后在过程末尾,增加exit sub语句后,写错误处理代码,如:private sub button1_click() on error goto err0 ..... '主程序段 exit sub:err0 msgbox "分母不能为零" ’错误提示 resume next '从出错行的下一行继续执行程序end sub