第6章 错误处理 程序调试及文件操作.pptVIP

6.1　错误处理 错误种类：语法错误、运行错误、逻辑错误 语法错误(Syntax errors )：不符合VB语法的错误，如关键字出错、非法的参数等。 运行错误(Run-time errors )：超出了程序的控制范围，如变量的范围范围溢出、文件没有找到等。VB允许你跟踪这样的错误，并努力改正它们。 逻辑错误(Logic errors )：最难发现的，带有逻辑错误的程序可以运行，但运行结果通常是错误的。VB的调试器有助于发现这种错误。 减少错误的方式： 仔细设计应用程序，设计时间越长，调试所需的时间就越少。 适度使用程序注释 对变量、对象及过程使用一致、有意义的名称。 6.1.1 跟踪运行错误并处理它 针对：运行错误 跟踪错误的方法：使用关键字On Error，语法如下： On Error GoTo errlabel 含义：此行下面的语句段中如果出现运行时错误，将跳到errlabel标签处执行。 6.1.2 错误处理框架 Sub SubExample() . . [Declare variables, ...] . On Error GoTo HandleErrors　　‘错误跟踪开始 . . [Procedure code] ‘在执行这段代码过程中出现任何错误时，程序都将跳到HandleErrors处开始执行 . Exit Sub HandleErrors: . . [Error handling code]　‘根据错误类型，选择处理方法 . End Sub 6.1.3 常用的错误处理的函数和过程 On Error GoTo 0 :如果在过程中想关闭错误跟踪，则可以使用此语句 对象Err的属性Number：表示与当前错误相对应的错误号。 Err.Raise 错误号:模拟一个错误号，表示运行错误发生，目的是为了测试过程的错误处理功能。 Err.Clear：将 Err 对象之数值属性重新设置为零，并将其字符串属性设置为零长度字符串。 函数Error(错误号)：根据参数“错误号”返回一个字符串来描述对应的错误 6.1.4 Resume语句 功能：当错误被跟踪并采取一定的措施后，程序执行流程必须返回到应用程序，这种控制是通过Resume语句实现。 Resume表示形式： Resume：重新执行引起错误的语句，这可能比较危险，因为如果错误没有被正确处理，可能会出现死循环。 Resume Next ：程序将从出现错误的语句的下一条语句开始执行 Resume 标号： 程序将从标号所指示的语句开始执行 6.1.5 通常的错误处理过程： HandleErrors: Select Case MsgBox(Error(Err.Number), vbCritical + vbAbortRetryIgnore, Error Number + Str(Err.Number)) Case vbAbort 　 Resume ExitLine Case vbRetry ‘实际应用程序中在这个位置需要添加修复错误的语句 　 Resume Case vbIgnore 　 Resume Next End Select ExitLine: Exit Sub Sub SubExample() . . [Declare variables, ...] . On Error GoTo HandleErrors . . [Procedure code] . Exit Sub HandleErrors: Select Case MsgBox(Error(Err.Number), vbCritical + vbAbortRetryIgnore, Error Number + Str(Err.Number)) Case vbAbort Resume ExitLine Case vbRetry Resume Case vbIgnore Resume Next End Select ExitLine: Exit Sub End Sub 例6-1 简单的错误跟踪程序 （演示） 典型的错误号及错误描述 Error Number Error Description 6 Overflow 9 Subscript out of range 11 Division by zero 13 Type mismatch 16 Expression too complex 20 Resume without error 52 Bad file name or number 53 File not foun