共用方式為

Resume 陳述式

  • 發行項

在錯誤處理例程完成之後繼續執行。

語法

繼續 [ 0 ]
繼續下一步
繼續行

Resume 語句語法可以有下列任何形式：

陳述式 描述
Resume 如果錯誤發生在與錯誤處理程式相同的 程式 中，則會繼續執行導致錯誤的語句。 如果在呼叫的程式中發生錯誤，則會在上次從包含錯誤處理例程的程式中呼叫的語 句 繼續執行。
繼續下一步 如果錯誤發生在與錯誤處理程式相同的程式中，則會在造成錯誤的語句後面緊接著 語句繼續執行。 如果在呼叫的程式中發生錯誤，則會繼續執行 ，其語句緊接在上次從包含錯誤處理例程的程式中呼叫的語句之後， (或 On Error Resume Next 語句) 。
繼續行 在必要行自變數中指定的行繼續執行。 line 自變數是行卷標或行號，而且必須與錯誤處理程式位於相同的程式中。

註解

如果您在錯誤處理例程中以外的任何位置使用 Resume 語句，就會發生錯誤。

範例

此範例會使用 Resume 語句結束程式中的錯誤處理，然後使用造成錯誤的語句繼續執行。 產生錯誤號碼 55 以說明如何使用 Resume 語句。

Sub ResumeStatementDemo() 
 On Error GoTo ErrorHandler ' Enable error-handling routine. 
 Open "TESTFILE" For Output As #1 ' Open file for output. 
 Kill "TESTFILE" ' Attempt to delete open file. 
 Exit Sub ' Exit Sub to avoid error handler. 
ErrorHandler: ' Error-handling routine. 
 Select Case Err.Number ' Evaluate error number. 
  Case 55 ' "File already open" error. 
   Close #1 ' Close open file. 
  Case Else 
   ' Handle other situations here.... 
 End Select 
 Resume ' Resume execution at same line that caused the error. 
End Sub

另請參閱

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。