Resume Deyimi
Hata işleme yordamı tamamlandıktan sonra yürütme devam ettirir.
Yapılandırılmamış bir özel durum işleme kullanmak yerine mümkün olan her durumda, kodunuzdaki yapılandırılmış özel durum işleme kullanmak öneririz ve On Error ve Resume deyimleri.Daha fazla bilgi için bkz. Try...Catch...Finally Deyimi (Visual Basic).
Resume [ Next | line ]
Bölümleri
Resume
Gerekli.Hata işleyicisi olarak aynı yordam hata oluştu, yürütme hatası nedeniyle deyimiyle sürdürür.Çağrılan bir yordamda hata oluştu, en son hata işleme yordamı içeren yordamı dışında adlı deyimi yürütme devam ettirir.Next
İsteğe Bağlı.Hata işleyicisi olarak aynı yordam hata oluştu, hemen hataya neden olan deyimden sonraki deyimi yürütme sürdürür.Çağrılan bir yordamda hata oluştuysa, hata işleme yordamı içeren yordamı dışında son olarak adlandırılan deyimi hemen ifadesiyle yürütme devam ettirir (ya da On Error Resume Next deyimi).line
İsteğe Bağlı.Yürütme devam ettirir satırında belirtilen gerekli line bağımsız değişkeni.line Bağımsız değişken satır etiketi veya satır numarası ve hata işleyicisi aynısı olmalıdır.
Notlar
[!NOT]
Yapılandırılmamış bir özel durum işleme kullanmak yerine mümkün olan her durumda, kodunuzdaki yapılandırılmış özel durum işleme kullanmanızı öneririz ve On Error ve Resume deyimleri.Daha fazla bilgi için bkz. Try...Catch...Finally Deyimi (Visual Basic).
Kullanırsanız, bir Resume ifadede herhangi bir yeri dışında bir hata işleme yordamı, bir hata oluşur.
Resume Deyimi içeren herhangi bir yordam kullanılamaz bir Try...Catch...Finally ifadesi.
Örnek
Bu örnek Resume bir yordam hata sonlandırmak ve hataya neden olan deyimi yürütme devam ettirmek için deyimi.Hata numarası 55 kullanımını göstermek için üretilir Resume ifadesi.
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
Namespace: Microsoft.VisualBasic
Derleme: Visual Basic çalışma zamanı kitaplığı (' Microsoft.VisualBasic.dll)