Resume Statement
Resumes execution after an error-handling routine is finished.
Syntax
The Resume statement syntax can have any of the following forms:
Statement |
Description |
Resume |
If the error occurred in the same procedure
as the error handler, execution resumes with the statement that caused the
error. If the error occurred in a called procedure, execution resumes at
the statement that last called out
of the procedure containing the error-handling routine. |
Resume Next |
If the error occurred in the same procedure as
the error handler, execution resumes with the statement immediately following
the statement that caused the error. If the error occurred in a called procedure,
execution resumes with the statement immediately following the statement
that last called out of the procedure containing the error-handling routine
(or On Error Resume Next statement). |
Resume line |
Execution resumes at line specified in
the required line argument.
The line argument is a line label
or line number and must be in
the same procedure as the error handler. |
Remarks
If you use a Resume statement anywhere except in an error-handling routine,
an error occurs.
Example
This example uses the Resume statement to end error handling in a procedure,
and then resume execution with the statement that caused the error. Error number
75 is generated to illustrate using the Resume statement.
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() ' Evaluate error number.
Case 55,75 ' "File already open" or "Path/File access error" error.
Trace """File already open"" or ""Path/File access error"" 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
|