Оператор Resume

Статья
03/12/2024

Возобновляет выполнение после завершения подпрограммы обработки ошибок.

Мы рекомендуем использовать структурированную обработку исключений в коде по возможности, а не использовать неструктурированную обработку исключений и On Error Resume инструкции. Дополнительные сведения см. в разделе Оператор Try...Catch...Finally.

Синтаксис

Resume [ Next | line ]

Детали

Resume
Обязательный. Если ошибка произошла в той же процедуре, что и обработчик ошибок, выполнение возобновляется с инструкцией, вызвавшей ошибку. Если ошибка произошла в вызываемой процедуре, выполнение возобновляется в инструкции, которая в последний раз вызвала процедуру, содержащую подпрограмму обработки ошибок.

Next
Необязательно. Если ошибка произошла в той же процедуре, что и обработчик ошибок, выполнение возобновляется с инструкцией сразу после инструкции, вызвавшей ошибку. Если ошибка произошла в вызываемой процедуре, выполнение возобновляется с инструкцией сразу после инструкции, которая в последний раз вызвала процедуру, содержащую подпрограмму обработки ошибок (или On Error Resume Next инструкцию).

line
Необязательно. Выполнение возобновляется в строке, указанной в требуемом line аргументе. Аргумент line является меткой строки или номером строки и должен находиться в той же процедуре, что и обработчик ошибок.

Замечания

Примечание.

Мы рекомендуем по возможности использовать структурированную обработку исключений в коде, а не использовать неструктурированную обработку исключений и On Error Resume инструкции. Дополнительные сведения см. в разделе Оператор Try...Catch...Finally.

Если вы используете инструкцию в любом месте, отличном Resume от подпрограммы обработки ошибок, возникает ошибка.

Инструкцию Resume нельзя использовать в любой процедуре, содержащей инструкцию Try...Catch...Finally .

Пример

В этом примере оператор используется Resume для завершения обработки ошибок в процедуре, а затем возобновляет выполнение с помощью инструкции, вызвавшей ошибку. Номер ошибки 55 создается для иллюстрации использования инструкции Resume .

Sub ResumeStatementDemo()
  On Error GoTo ErrorHandler   ' Enable error-handling routine.
  Dim x As Integer = 32
  Dim y As Integer = 0
  Dim z As Integer
  z = x / y   ' Creates a divide by zero error
  Exit Sub   ' Exit Sub to avoid error handler.
ErrorHandler:     ' Error-handling routine.
  Select Case Err.Number   ' Evaluate error number.
      Case 6   ' "Divide by zero" error.
        y = 1 ' Sets the value of y to 1 and tries the calculation again.
      Case Else
        ' Handle other situations here....
  End Select
  Resume   ' Resume execution at same line
  ' that caused the error.
End Sub

Требования

Пространство имен: Microsoft.VisualBasic

Сборка: библиотека среды выполнения Visual Basic (в Microsoft.VisualBasic.dll)

Поделиться через