Excel VBA编程 Resume语句

发布时间:2014-05-03 19:41:40   来源:文档文库   
字号:

Excel VBA编程 Resume语句

Resume语句可以用于错误处理程序结束后,恢复原有的运行。另外,如果在错误处理程序之外的任何地方使用Resume语句都会导致错误发生。

语法:

Resume [0]

Resume Next

Resume line

其中,Resume语句的语法可以具有以下任何一种形式:

Resume 如果错误和错误处理程序出现在同一个过程中,则从产生错误的语句恢复运行。如果错误出现在被调用的过程中,则从最近一次调用包含错误处理程序的过程的语句处恢复运行。

Resume Next 如果错误和错误处理程序出现在同一个程序中,则从紧随产生错误的语句的下个语句恢复运行。如果错误发生在被调用的过程中,则对最后一次调用包含错误处理程序的过程的语句(或 On Error Resume Next 语句),从紧随该语句之后的语句处恢复运行。

Resume line 在必要的 line 参数指定的 line 处恢复运行。line 参数是行标签或行号,必须和错误处理程序在同一个过程中。

例如,下面的示例使用Resume语句来结束错误处理程序,然后将执行返回到产生错误的语句,其代码如下:

Sub ResumeStatementDemo()

On Error GoTo ErrorHandler ' 打开错误处理程序。

Open "TESTFILE" For Output As #1 ' 打开输出文件。

Kill "TESTFILE" ' 试图删除已打开的文件。

Exit Sub ' 退出程序,以避免进入错误处理程序。

ErrorHandler: ' 错误处理程序。

Select Case Err.Number ' 检查错误代号。

Case 55 ' 发生“文件已打开”的错误。

Close #1 ' 关闭已打开的文件。

Case Else

' 处理其他错误状态 . . .

End Select

Resume ' 将执行返回到发生错误的语句。

End Sub

本文来源:https://www.2haoxitong.net/k/doc/847123e80029bd64783e2ce8.html

《Excel VBA编程 Resume语句.doc》
将本文的Word文档下载到电脑,方便收藏和打印
推荐度:
点击下载文档

文档为doc格式