在Visual Basic中处理错误.pptVIP

Eliminare errori 应用程序执行时出现的错误往往是由一些不可预见的动作引发的。这些错误都称为运行时错误。通过使用错误处理程序用户可以避免运行时错误，给用户提供有用信息，并正确地退出应用程序。 如果程序在Visual Basic开发环境中运行时出现运行时错误，会有消息告知：进入调试模式、寻求帮助或者选择结束应用程序。如果应用程序作为可执行文件执行时出现运行时错误，Visual Basic则显示一则错误消息，应用程序也就此结束。要避免运行时错误，可以编写错误处理程序，修正出错处，提示用户正确操作，或者在程序结束前保存数据。 错误处理程序是一个例程，它捕获应用程序中出现的错误，并对错误做出反应。如果预料到一个过程可能发生运行时错误，就应该在过程中添加错误处理程序。 在错误发生时，通过告知应用程序转向哪段程序可以设定或启用某个错误捕获。Visual Basic在执行On Error语句时会启用错误捕获。包含它的过程处于活动状态时，该错误捕获始终有效。在给定过程中一次只能启用一个错误捕获。另外，错误捕获必须放在本地过程中。不能用On Error语句把应用程序的执行引向另一个过程。如果要使错误捕获无效，可使用On Error Go To语句。 编写错误处理例程的第一步是添加一个行号，标志着错误处理程序的开始。行号的名称应是描述性的，后面必须跟一个冒号。常规错误处理程序放在过程结束处，紧跟着Exit Sub或Exit Function的行号之后。这样，在没有错误发生时，过程就不会执行错误处理程序。 使用Resume或Resume Next语句就可以退出错误处理例程。Resume语句会执行引发错误的那句代码，Resume Next语句执行引发错误代码的下一句代码。如果错误处理程序能够修正错误，则使用Resume语句，否则就使用Resume Next语句。 借助于On Error语句，可以测试可捕获错误并对它做出响应。如果出现运行时错误，则可强制应用程序跳转到由On Error Go To语句指定的标记处。 当Visual Basic执行On Error语句时激活错误捕获，On Error语句指定错误处理程序。当包含错误捕获的过程是活动的时候，错误捕获始终是激活的，也就是说，直到这个过程执行Exit或End语句时，错误捕获才停止。 尽管在任一时刻，任一过程中只能激活一个错误捕获，但可建立几个供选择的错误捕获并在不同的时刻激活不同的错误捕获。借助于On Error Go To 0也能停用某一个错误捕获。为设置一个跳转到错误处理例程的错误捕获，可用On Error Go To 行标签语句。 编写错误处理例程的第一步是添加行号，标志着错误处理例程开始。行号应该有一个具有描述性的名称，其后必须加冒号。 把错误处理代码放置在过程末端，这个过程在紧靠行号前方处具有Exit语句。如果没有出现错误，过程可避免执行错误处理代码。 错误处理例程包含实际处理错误的代码，通常以Case或If…Then…Else判定结构的形式出现。需要确定可能会发生什么错误并对每种错误提供操作方法。 为了处理所有意想不到的错误，应使用Else或Case Else语句提供选项。 Err对象的Number属性包含数值代码，代码代表最新的运行时错误。借助Err对象与Select Case或If…Then…Else语句的组合，可对出现的任何错误采取针对性的操作。 设定错误捕获后，如果不是过程执行结束，或错误捕获失效，否则错误捕获始终是有效的。使用Resume语句可以指定应用程序在处理完错误后恢复正常执行的位置。 语句On Error Resume Next可以使应用程序在执行时忽略错误。如果出现运行时错误，程序继续执行下一行。这种形式的On Error语句用于内联错误。 Resume Next也可用于发生在循环内的错误，此时，需要重启动操作。还可使用Resume 行号，它把控件返回到指定的行号。 Err对象包含刚被引发的错误的信息，使用Err对象的属性和方法可以检查发生了什么错误，清除错误值、或引发一个错误。 Number属性是一个整数，指示最新发生的错误。 Description属性是一个字符串，含有对错误的描述。 Source属性包含产生错误的应用程序的名称。在使用Automation时，这个属性会很有用。如果用户在访问Excel 2007时，Excel 2007产生了错误，Excel 2007会把Err. Number设置成正确的错误代码，把Err. Source设成Excel. Application。 Clear方法清除错误，它把Err. Number的值复置为零。这种方法主要用于处理内联错误。 有时，用户可能不想设置错误处理程序，让应用程序在错误发生时跳转到这个程序，