Resume Deyimi

Hata işleme yordamı tamamlandıktan sonra yürütmeyi sürdürür.

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

Sözdizimi

Resume [ Next | line ]  

Parça

Resume
Gerekli. Hata, hata işleyicisiyle aynı yordamda oluşursa, yürütme hataya neden olan deyimiyle devam eder. Hata, çağrılan bir yordamda oluştuysa, yürütme, hata işleme yordamını içeren yordamın en son çağrılan deyiminde devam eder.

Next
isteğe bağlı. Hata, hata işleyicisiyle aynı yordamda oluştuysa yürütme, hataya neden olan deyimin hemen ardından deyimiyle devam eder. Hata, çağrılan bir yordamda oluştuysa, yürütme, hata işleme yordamını (veya On Error Resume Next deyimini) içeren yordamdan son çağrılan deyimin hemen ardından deyimiyle devam eder.

line
isteğe bağlı. Yürütme, gerekli line bağımsız değişkende belirtilen satırda devam eder. Bağımsız line değişken bir satır etiketi veya satır numarasıdır ve hata işleyicisi ile aynı yordamda olmalıdır.

Açıklamalar

Not

Yapılandırılmamış özel durum işleme ve ve Resume deyimlerini kullanmak yerine mümkün olduğunda kodunuzda yapılandırılmış özel durum işlemeyi On Error kullanmanızı öneririz. Daha fazla bilgi için bkz . Try... Yakalamak... Finally Deyimi.

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

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

Örnek

Bu örnek, bir yordamda hata işlemeyi sonlandırmak ve ardından hataya neden olan deyimiyle yürütmeyi sürdürmek için deyimini kullanır Resume . Deyiminin Resume kullanımını göstermek için 55 numaralı hata 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.