Resume – příkaz

Po dokončení zpracování chyb proceduru pokračuje v provádění.

Doporučujeme použít structured exception handling ve svém kódu, kdykoli je to možné, místo zpracování výjimek nestrukturovaný a On Error a Resume příkazy.Další informace naleznete v tématu Try...Catch....Finally – příkaz (Visual Basic).

Resume [ Next | line ]

Části

• Resume
  Povinné.Pokud došlo k chybě stejným postupem jako popisovač chyb, spuštění pokračovat s příkazem, který chybu způsobil.Pokud došlo k chybě volaná procedura, spuštění obnoví na příkazu, který poslední volána mimo proceduru obsahující rutiny zpracování chyb.

• Next
  Nepovinné.Pokud došlo k chybě stejným postupem jako popisovač chyb, spuštění pokračovat příkazem bezprostředně následující příkaz, který způsobil chybu.Pokud došlo k chybě volaná procedura, spuštění obnoví příkazem bezprostředně následující příkaz, který se nazývá poslední z postupu obsahující rutiny zpracování chyb (nebo On Error Resume Next prohlášení).

• line
  Nepovinné.Spuštění návratu na řádku v požadované line argument.line Argument řádek popisku nebo číslo řádku a musí být stejným postupem jako popisovač chyb.

Poznámky

[!POZNÁMKA]

Doporučujeme použít structured exception handling ve svém kódu, kdykoli je to možné, místo zpracování výjimek nestrukturovaný a On Error a Resume příkazy.Další informace naleznete v tématu Try...Catch....Finally – příkaz (Visual Basic).

Používáte-li Resume dojde k chybě prohlášení kdekoli než rutiny zpracování chyb.

Resume Příkaz nelze použít postupem, který obsahuje Try...Catch...Finally prohlášení.

Příklad

V tomto příkladu Resume příkaz k ukončení zpracování chyb v proceduře a potom pokračovat v provádění s příkazem, který chybu způsobil.Chyba číslo 55 generováno znázorňující použití Resume prohlášení.

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

Požadavky

Obor názvů: Microsoft.VisualBasic

Sestavení: knihovna Runtime jazyka Visual Basic (v knihovny Microsoft.VisualBasic.dll)

Viz také

Referenční dokumentace

Try...Catch....Finally – příkaz (Visual Basic)

Error – příkaz

On Error – příkaz (Visual Basic)