Resume Deyimi

Hata işleme yordamı tamam olduktan sonra yürütmeyi sürdürür.

Mümkün olduğunca, yapılandırılmamış özel durum işleme ve ve deyimlerini kullanmak yerine kodda yapılandırılmış özel durum işlemeyi On Error Resume kullanmanızı öneririz. Daha fazla bilgi için bkz. Deneyin... Yakalamak... Finally Deyimi.

Syntax

Resume [ Next | line ]  

Bölümler

Resume
Gereklidir. Hata, hata işleyicisi ile aynı yordamda oluştu ise, yürütme hataya neden olan deyimiyle devam eder. Hata çağrılan yordamda oluştu ise yürütme, hata işleme yordamını içeren yordamdan en son çağrılan deyimde devam eder.

Next
İsteğe bağlı. Hata, hata işleyicisi ile aynı yordamda oluştu ise yürütme, hataya neden olan deyiminin hemen ardından deyimiyle devam eder. Hata çağrılan yordamda oluştu ise yürütme, hata işleme yordamını (veya deyimini) içeren yordamdan en son çağrılan deyiminin hemen ardından deyimiyle devam On Error Resume Next eder.

line
İsteğe bağlı. Yürütme, gerekli bağımsız değişkende belirtilen satırda devam line eder. bağımsız line değişkeni bir satır etiketi veya satır numarasıdır ve hata işleyicisi ile aynı yordamda yer alır.

Açıklamalar

Bir hata işleme Resume yordamı dışında herhangi bir yerde deyimi kullanırsanız bir hata oluşur.

deyimi, Resume deyimi içeren herhangi bir yordamda Try...Catch...Finally kullanılamaz.

Örnek

Bu örnekte, bir yordamda hata işlemeyi sona erdirin ve ardından yürütmeyi hataya neden Resume olan deyimiyle devam ettirin. deyiminin kullanımını göstermek için 55 numaralı hata Resume oluşturulur.

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

Gereksinimler

Ad Alanı: Microsoft.VisualBasic

Derleme: Visual Basic Çalışma Zamanı Kitaplığı (Microsoft.VisualBasic.dll)

Ayrıca bkz.

• Try...Catch...Finally Deyimi
• Error Deyimi
• On Error Deyimi