第1个回答 2009-08-09
On Error Resume Next '捕获错误(出错后执行下一句)
A = B / C '可能出错的语句
If Err<>0 Then '出错了(Err<>0)
Msgbox Error$ '显示错误
... ... '出了错误怎么办,语句写在这里
End If
On Error Goto 0 '终止错误捕获(必须终止,否则程序运行结果将不可预测)
第2个回答 2009-08-09
直接在过程的开头加上语句On Error Resume Next即可
第3个回答 2009-08-10
你尝试把定义的Integer 改为long
single 改为 double
第4个回答 2009-08-09
用异常捕获一下就知道了。估计是除数为0了。本回答被网友采纳