Cv-instruktion
Återupptar körningen när en felhanteringsrutin har slutförts.
Vi rekommenderar att du använder strukturerad undantagshantering i koden när det är möjligt, i stället för att använda ostrukturerad undantagshantering och On Error
- Resume
instruktioner. Mer information finns i Prova... Fånga... Slutligen -instruktion.
Syntax
Resume [ Next | line ]
Delar
Resume
Obligatoriskt. Om felet inträffade i samma procedur som felhanteraren återupptas körningen med instruktionen som orsakade felet. Om felet inträffade i en anropad procedur återupptas körningen vid instruktionen som senast anropades i proceduren som innehåller felhanteringsrutinen.
Next
Valfritt. Om felet inträffade i samma procedur som felhanteraren återupptas körningen med instruktionen omedelbart efter instruktionen som orsakade felet. Om felet inträffade i en anropad procedur återupptas körningen med -instruktionen omedelbart efter instruktionen som senast anropades ut ur proceduren som innehåller felhanteringsrutinen (eller On Error Resume Next
-instruktionen).
line
Valfritt. Körningen återupptas på den rad som anges i argumentet som krävs line
. Argumentet line
är en radetikett eller radnummer och måste vara i samma procedur som felhanteraren.
Kommentarer
Kommentar
Vi rekommenderar att du använder strukturerad undantagshantering i koden när det är möjligt, i stället för att använda ostrukturerad undantagshantering och On Error
- Resume
instruktioner. Mer information finns i Prova... Fånga... Slutligen -instruktion.
Om du använder en Resume
instruktion någon annanstans än i en felhanteringsrutin uppstår ett fel.
-instruktionen Resume
kan inte användas i någon procedur som innehåller en Try...Catch...Finally
-instruktion.
Exempel
I det här exemplet används -instruktionen Resume
för att avsluta felhanteringen i en procedur och sedan återuppta körningen med instruktionen som orsakade felet. Felnummer 55 genereras för att illustrera användningen av -instruktionen 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
Krav
Namnområde: Microsoft.VisualBasic
Sammansättning: Visual Basic Runtime Library (i Microsoft.VisualBasic.dll)