本文将详细地讨论在Visual Basic中处理错误发生的On Error命令家族，它们的任务就是安装错误代理并解决错误的发生，并解释错误代码的含义。阅读完本文后，你将能编写基本的错误代理程序，有效地防止以外错误。 作者:甘冀平 2000-11-03
本文包括以下几节内容：
- 使用On Error语句
- 如何离开错误处理程序
- 定义错误常数
- 将错误处理程序单独存放
- 理解错误处理的范围
- 不要嵌套使用错误处理程序
Visual Basic程序使用On Error命令来登记错误处理程序，它有下面3种形式：
- On Error GoTo 0
- On Error Resume Next
- On Error GoTo line
These forms tell Visual Basic what it should do when the program encounters an error. The three forms are described in the following sections.
这些代码告诉Visual Basic程序当遇到错误时应该做什么。下面详细介绍这3种语句。
On Error GoTo 0
On Error GoTo 0比较直接，它仅仅中止任何当前安装的错误处理代理（比如在前面安装的On Error GoTo line或者On Error Resume Next语句）。如果程序在其后遇到错误，那么就会崩溃。
On Error Resume Next
这种方法使程序忽视发生的错误，当遇到一个错误时，程序继续在其后执行。如果程序使用了On Error Resume Next命令，那么就应该在每次可能产生错误的操作后面检查一下Err对象的数值。如果Err.Number不为零，就表明操作产生了错误，程序可以对此采取特殊的动作。注意：在可能发生问题的语句后，程序应该立即检查Err.Number的数值，因为，其他的错误操作将复位Err对象并清除前面的错误信息。
许多开发人员在给用户一个通用对话框后使用On Error Resume Next命令。 CommandDialog控件的CancelError属性指明了当用户Cancel对话框时是否产生一个错误。下面的代码段显示了程序如何使用CancelError判断是否继续一个操作，比如装入一个文件。
' 如果用户选择了cancel，就产生一个错误 dlgOpenFile.CancelError = True ' 忽视错误的发生 On Error Resume Next ' 显示对话框 dlgOpenFile.ShowOpen ' 判断是否有错误 If Err.Number = cdlCancel Then ' 如果是用户canceled，就什么也执行 Exit Sub ElseIf Err.Number <> 0 Then ' 如果是未知错误，就采取另外的行为 : End If ' 恢复正常的错误处理 On Error GoTo 0
On Error GoTo Line
使用这个方法，将
来自 “ ITPUB博客 ” ，链接：https://blog.itpub.net/10790690/viewspace-953709/ ，如需转载，请注明出处，否则将追究法律责任。
