Try...Catch...Finally-Anweisung (Visual Basic)

  • Artikel

Bietet eine Möglichkeit, einige oder alle möglichen Fehler zu behandeln, die in einem bestimmten Codeblock auftreten können, während weiterhin Code ausgeführt wird.

Syntax

Try
    [ tryStatements ]
    [ Exit Try ]
[ Catch [ exception [ As type ] ] [ When expression ]
    [ catchStatements ]
    [ Exit Try ] ]
[ Catch ... ]
[ Finally
    [ finallyStatements ] ]
End Try

Bestandteile

Begriff Definition
tryStatements Dies ist optional. Anweisungen, in denen ein Fehler auftreten kann. Kann eine Verbundanweisung sein.
Catch Optional. Mehrere Catch Blöcke zulässig. Wenn beim Verarbeiten des Try Blocks eine Ausnahme auftritt, wird jede Catch Anweisung in Textreihenfolge untersucht, um zu bestimmen, ob sie die Ausnahme behandelt, wobei exception die ausgelöste Ausnahme dargestellt wird.
exception Optional. Ein beliebiger Variablenname. Der Anfangswert von exception ist der Wert des ausgelösten Fehlers. Wird mit Catch verwendet, um den abgefangenen Fehler anzugeben. Wenn sie nicht angegeben wird, fängt die Catch Anweisung eine ausnahme ab.
type Optional. Gibt den Typ des Klassenfilters an. Wenn der Wert von exception vom oder einem abgeleiteten Typ angegeben type ist, wird der Bezeichner an das Ausnahmeobjekt gebunden.
When Optional. Eine Catch Anweisung mit einer When -Klausel fängt Ausnahmen nur ab, wenn expression als ausgewertet wird True. Eine When -Klausel wird nur angewendet, nachdem der Typ der Ausnahme überprüft wurde, und expression kann auf den Bezeichner verweisen, der die Ausnahme darstellt.
expression Optional. Muss implizit in Booleankonvertiert werden. Jeder Ausdruck, der einen generischen Filter beschreibt. Wird in der Regel verwendet, um nach Fehlernummer zu filtern. Wird mit dem When Schlüsselwort verwendet, um Umstände anzugeben, unter denen der Fehler abgefangen wird.
catchStatements Optional. Anweisungen zur Behandlung von Fehlern, die im zugeordneten Try Block auftreten. Kann eine Verbundanweisung sein.
Exit Try Optional. Schlüsselwort, das aus der Try...Catch...Finally Struktur herausbricht. Die Ausführung wird mit dem Code fortgesetzt, der unmittelbar auf die End Try -Anweisung folgt. Die Finally Anweisung wird weiterhin ausgeführt. In Blöcken nicht zulässig Finally .
Finally Optional. Ein Finally -Block wird immer ausgeführt, wenn die Ausführung einen Teil der Try...Catch Anweisung verlässt.
finallyStatements Optional. Anweisungen, die ausgeführt werden, nachdem alle anderen Fehler verarbeitet wurden.
End Try Beendet die Try...Catch...Finally -Struktur.

Bemerkungen

Wenn Sie erwarten, dass während eines bestimmten Codeabschnitts eine bestimmte Ausnahme auftreten kann, fügen Sie den Code in einen -Block ein Try , und verwenden Sie einen Catch -Block, um die Kontrolle beizubehalten und die Ausnahme zu behandeln, wenn sie auftritt.

Eine Try…Catch -Anweisung besteht aus einem Try Block gefolgt von einer oder Catch mehreren Klauseln, die Handler für verschiedene Ausnahmen angeben. Wenn in einem Try Block eine Ausnahme ausgelöst wird, sucht Visual Basic nach der Anweisung, die Catch die Ausnahme behandelt. Wenn keine übereinstimmende Catch Anweisung gefunden wird, untersucht Visual Basic die Methode, die die aktuelle Methode aufgerufen hat, usw. in der Aufrufliste. Wenn kein Catch Block gefunden wird, zeigt Visual Basic dem Benutzer eine Nicht behandelte Ausnahmemeldung an und beendet die Ausführung des Programms.

Sie können mehr als eine Catch Anweisung in einer Try…Catch -Anweisung verwenden. Wenn Sie dies tun, ist die Reihenfolge der Catch Klauseln signifikant, da sie in der Reihenfolge untersucht werden. Fangen Sie spezifischere Ausnahmen vor den weniger spezifischen ab.

Die folgenden Catch Anweisungsbedingungen sind die am wenigsten spezifischen und erfassen alle Ausnahmen, die von der Exception -Klasse abgeleitet werden. Sie sollten normalerweise eine dieser Variationen als letzten Catch Block in der Try...Catch...Finally Struktur verwenden, nachdem Sie alle erwarteten spezifischen Ausnahmen abfangen. Die Ablaufsteuerung kann niemals einen Catch Block erreichen, der einer dieser Variationen folgt.

  • Ist typeException, z. B.: Catch ex As Exception

  • Die -Anweisung verfügt über keine exception Variable, z. B.: Catch

Wenn eine Anweisung in einem Try…Catch…Finally anderen Try Block geschachtelt ist, untersucht Visual Basic zunächst jede Catch Anweisung im innersten Try Block. Wenn keine übereinstimmende Catch Anweisung gefunden wird, wird die Suche mit den Catch Anweisungen des äußeren Try…Catch…Finally Blocks fortgesetzt.

Lokale Variablen aus einem Try Block sind in einem Catch Block nicht verfügbar, da es sich um separate Blöcke handelt. Wenn Sie eine Variable in mehr als einem Block verwenden möchten, deklarieren Sie die Variable außerhalb der Try...Catch...Finally -Struktur.

Tipp

Die Try…Catch…Finally -Anweisung ist als IntelliSense-Codeausschnitt verfügbar. Erweitern Sie im Codeausschnitt-Manager code patterns - If, For Each, Try Catch, Property usw. und dann Error Handling (Exceptions). Weitere Informationen finden Sie unter Codeausschnitte.

Abschließender Block

Wenn Sie über eine oder mehrere Anweisungen verfügen, die ausgeführt werden müssen, bevor Sie die Try -Struktur beenden, verwenden Sie einen Finally -Block. Das Steuerelement wird an den Finally Block übergeben, kurz bevor es aus der Try…Catch -Struktur herausgeht. Dies gilt auch dann, wenn innerhalb der Try Struktur eine Ausnahme auftritt.

Ein Finally -Block ist nützlich für die Ausführung von Code, der auch dann ausgeführt werden muss, wenn eine Ausnahme vorliegt. Die Steuerung wird an den Finally Block übergeben, unabhängig davon, wie der Try...Catch Block beendet wird.

Der Code in einem Finally -Block wird auch ausgeführt, wenn Ihr Code auf eine Return -Anweisung in einem - oder Catch -TryBlock trifft. Das Steuerelement wird in den folgenden Fällen nicht von einem Try - oder Catch -Block an den entsprechenden Finally Block übergeben:

Es ist nicht gültig, die Ausführung explizit in einen Finally Block zu übertragen. Das Übertragen der Ausführung aus einem Finally Block ist außer über eine Ausnahme ungültig.

Wenn eine Try Anweisung nicht mindestens einen Catch Block enthält, muss sie einen Finally -Block enthalten.

Tipp

Wenn Sie keine bestimmten Ausnahmen abfangen müssen, verhält sich die Using Anweisung wie ein Try…Finally Block und garantiert die Entsorgung der Ressourcen, unabhängig davon, wie Sie den Block beenden. Dies gilt auch bei einer unbehandelten Ausnahme. Weitere Informationen finden Sie unter using-Anweisung.

Exception-Argument

Das Catch Blockargument exception ist eine Instanz der Exception -Klasse oder eine Klasse, die von der Exception -Klasse abgeleitet wird. Die Exception Klasseninstanz entspricht dem Fehler, der Try im -Block aufgetreten ist.

Die Eigenschaften des Exception -Objekts helfen, die Ursache und den Speicherort einer Ausnahme zu identifizieren. Die -Eigenschaft listet beispielsweise die aufgerufenen Methoden auf, StackTrace die zu der Ausnahme geführt haben, sodass Sie den Fehler im Code ermitteln können. Message gibt eine Meldung zurück, die die Ausnahme beschreibt. HelpLink gibt einen Link zu einer zugeordneten Hilfedatei zurück. InnerException gibt das Exception Objekt zurück, das die aktuelle Ausnahme verursacht hat, oder es wird zurückgegeben Nothing , wenn kein ursprüngliches Exceptionvorhanden ist.

Überlegungen bei der Verwendung eines Try... Catch-Anweisung

Verwenden Sie eine Try…Catch -Anweisung nur, um das Auftreten von ungewöhnlichen oder unerwarteten Programmereignissen zu signalisieren. Gründe hierfür sind u. a. die folgenden:

  • Das Abfangen von Ausnahmen zur Laufzeit verursacht zusätzlichen Mehraufwand und ist wahrscheinlich langsamer als die Vorabüberprüfung, um Ausnahmen zu vermeiden.

  • Wenn ein Catch Block nicht ordnungsgemäß behandelt wird, wird die Ausnahme möglicherweise nicht ordnungsgemäß an Benutzer gemeldet.

  • Die Ausnahmebehandlung macht ein Programm komplexer.

Sie benötigen nicht immer eine Try…Catch -Anweisung, um nach einer Bedingung zu suchen, die wahrscheinlich auftritt. Im folgenden Beispiel wird überprüft, ob eine Datei vorhanden ist, bevor Sie versuchen, sie zu öffnen. Dies reduziert die Notwendigkeit, eine von der OpenText -Methode ausgelöste Ausnahme abzufangen.

Private Sub TextFileExample(ByVal filePath As String)

    ' Verify that the file exists.
    If System.IO.File.Exists(filePath) = False Then
        Console.Write("File Not Found: " & filePath)
    Else
        ' Open the text file and display its contents.
        Dim sr As System.IO.StreamReader =
            System.IO.File.OpenText(filePath)

        Console.Write(sr.ReadToEnd)

        sr.Close()
    End If
End Sub

Stellen Sie sicher, dass Code in Catch Blöcken Benutzern ordnungsgemäß Ausnahmen melden kann, sei es durch threadsichere Protokollierung oder entsprechende Meldungen. Andernfalls bleiben Ausnahmen möglicherweise unbekannt.

Asynchrone Methoden

Wenn Sie eine Methode mit dem Async-Modifizierer markieren, können Sie den Await-Operator in der -Methode verwenden. Eine -Anweisung mit dem -Operator hält die Await Ausführung der -Methode an, bis die erwartete Aufgabe abgeschlossen ist. Die Aufgabe stellt derzeit ausgeführte Arbeit dar. Wenn die Dem Operator zugeordnete Await Aufgabe abgeschlossen ist, wird die Ausführung in derselben Methode fortgesetzt. Weitere Informationen finden Sie unter Ablaufsteuerung in asynchronen Programmen.

Eine von einer Async-Methode zurückgegebene Aufgabe endet möglicherweise in einem fehlerhaften Zustand, was angibt, dass sie aufgrund einer nicht behandelten Ausnahme abgeschlossen wurde. Eine Aufgabe kann auch mit einem abgebrochenen Zustand enden, was dazu führt, dass ein OperationCanceledException aus dem await-Ausdruck ausgelöst wird. Um beide Ausnahmetypen abzufangen, platzieren Sie den Ausdruck, der Await der Aufgabe zugeordnet ist, in einem Try -Block, und fangen Sie die Ausnahme im Catch -Block ab. Ein Beispiel finden Sie weiter unten in diesem Thema.

Eine Aufgabe kann sich in einem fehlerhaften Zustand befinden, da mehrere Ausnahmen für den Fehler verantwortlich waren. Beispielsweise kann die Aufgabe das Ergebnis eines Aufrufs an Task.WhenAll sein. Wenn Sie auf eine solche Aufgabe warten, ist die abgefangene Ausnahme nur eine der Ausnahmen, und Sie können nicht vorhersagen, welche Ausnahme abgefangen wird. Ein Beispiel finden Sie weiter unten in diesem Thema.

Ein Await Ausdruck darf sich nicht innerhalb eines Blocks oder Finally Blocks Catch befinden.

Iterators

Eine Iteratorfunktion oder Get ein Accessor führt eine benutzerdefinierte Iteration über eine Sammlung aus. Ein Iterator verwendet eine Yield-Anweisung , um jedes Element der Auflistung einzeln zurückzugeben. Sie rufen eine Iteratorfunktion auf, indem Sie ein For Each... Next-Anweisung.

Eine Yield -Anweisung kann sich innerhalb eines Try Blocks befinden. Ein Try Block, der eine Yield -Anweisung enthält, kann Catch Blöcke und einen Finally -Block enthalten. Ein Beispiel finden Sie im Abschnitt "Testen von Blöcken in Visual Basic" von Iteratoren .

Eine Yield -Anweisung darf sich nicht in einem Catch -Block oder - Finally Block befinden.

Wenn der For Each Text (außerhalb der Iteratorfunktion) eine Ausnahme auslöst, wird kein Catch Block in der Iteratorfunktion ausgeführt, aber ein Finally Block in der Iteratorfunktion wird ausgeführt. Ein Catch Block in einer Iteratorfunktion fängt nur Ausnahmen ab, die innerhalb der Iteratorfunktion auftreten.

Teilweise vertrauenswürdige Situationen

In teilweise vertrauenswürdigen Situationen, z. B. einer Anwendung, die auf einer Netzwerkfreigabe gehostet wird, werden keine Sicherheitsausnahmen abgefangen, Try...Catch...Finally die auftreten, bevor die Methode, die den Aufruf enthält, aufgerufen wird. Im folgenden Beispiel wird der Fehler "System.Security.SecurityException: Request Failed" (System.Security.SecurityException: Anforderung fehlgeschlagen) ausgegeben, wenn Sie sie auf einer Serverfreigabe platzieren und dort ausführen. Weitere Informationen zu Sicherheitsausnahmen finden Sie in der SecurityException -Klasse.

Try
    Process.Start("http://www.microsoft.com")
Catch ex As Exception
    Console.WriteLine("Can't load Web page" & vbCrLf & ex.Message)
End Try

In einer solchen teilweise vertrauenswürdigen Situation müssen Sie die Process.Start -Anweisung in einem separaten Subablegen. Der anfängliche Aufruf von Sub schlägt fehl. Dies ermöglicht Try...Catch es, ihn abzufangen, bevor der Sub gestartet wird, Process.Start der enthält, und die sicherheitsrelevante Ausnahme erzeugt wird.

Beispiele

Die Struktur von Try... Fangen... Schließlich

Im folgenden Beispiel wird die Struktur der Try...Catch...Finally -Anweisung veranschaulicht.

Public Sub TryExample()
    ' Declare variables.
    Dim x As Integer = 5
    Dim y As Integer = 0

    ' Set up structured error handling.
    Try
        ' Cause a "Divide by Zero" exception.
        x = x \ y

        ' This statement does not execute because program
        ' control passes to the Catch block when the
        ' exception occurs.
        Console.WriteLine("end of Try block")
    Catch ex As Exception
        ' Show the exception's message.
        Console.WriteLine(ex.Message)

        ' Show the stack trace, which is a list of methods
        ' that are currently executing.
        Console.WriteLine("Stack Trace: " & vbCrLf & ex.StackTrace)
    Finally
        ' This line executes whether or not the exception occurs.
        Console.WriteLine("in Finally block")
    End Try
End Sub

Ausnahme in einer Methode, die aus einem Try-Block aufgerufen wird

Im folgenden Beispiel löst die CreateException -Methode einen aus NullReferenceException. Der Code, der die Ausnahme generiert, befindet sich nicht in einem Try -Block. Daher behandelt die CreateException -Methode die Ausnahme nicht. Die RunSample -Methode behandelt die Ausnahme, da sich der Aufruf der CreateException -Methode in einem Try -Block befindet.

Das Beispiel enthält Catch Anweisungen für verschiedene Arten von Ausnahmen, die von den spezifischsten bis zum allgemeinsten sortiert sind.

Public Sub RunSample()
    Try
        CreateException()
    Catch ex As System.IO.IOException
        ' Code that reacts to IOException.
    Catch ex As NullReferenceException
        Console.WriteLine("NullReferenceException: " & ex.Message)
        Console.WriteLine("Stack Trace: " & vbCrLf & ex.StackTrace)
    Catch ex As Exception
        ' Code that reacts to any other exception.
    End Try
End Sub

Private Sub CreateException()
    ' This code throws a NullReferenceException.
    Dim obj = Nothing
    Dim prop = obj.Name

    ' This code also throws a NullReferenceException.
    'Throw New NullReferenceException("Something happened.")
End Sub

Die Catch When-Anweisung

Im folgenden Beispiel wird gezeigt, wie eine Catch When -Anweisung verwendet wird, um nach einem bedingten Ausdruck zu filtern. Wenn der bedingte Ausdruck als Trueausgewertet wird, wird der Code im Catch Block ausgeführt.

Private Sub WhenExample()
    Dim i As Integer = 5

    Try
        Throw New ArgumentException()
    Catch e As OverflowException When i = 5
        Console.WriteLine("First handler")
    Catch e As ArgumentException When i = 4
        Console.WriteLine("Second handler")
    Catch When i = 5
        Console.WriteLine("Third handler")
    End Try
End Sub
' Output: Third handler

Geschachtelte Try-Anweisungen

Das folgende Beispiel enthält eine Try…Catch -Anweisung, die in einem Try -Block enthalten ist. Der innere Catch Block löst eine Ausnahme aus, deren InnerException -Eigenschaft auf die ursprüngliche Ausnahme festgelegt ist. Der äußere Catch Block meldet seine eigene Ausnahme und die innere Ausnahme.

Private Sub InnerExceptionExample()
    Try
        Try
            ' Set a reference to a StringBuilder.
            ' The exception below does not occur if the commented
            ' out statement is used instead.
            Dim sb As System.Text.StringBuilder
            'Dim sb As New System.Text.StringBuilder

            ' Cause a NullReferenceException.
            sb.Append("text")
        Catch ex As Exception
            ' Throw a new exception that has the inner exception
            ' set to the original exception.
            Throw New ApplicationException("Something happened :(", ex)
        End Try
    Catch ex2 As Exception
        ' Show the exception.
        Console.WriteLine("Exception: " & ex2.Message)
        Console.WriteLine(ex2.StackTrace)

        ' Show the inner exception, if one is present.
        If ex2.InnerException IsNot Nothing Then
            Console.WriteLine("Inner Exception: " & ex2.InnerException.Message)
            Console.WriteLine(ex2.StackTrace)
        End If
    End Try
End Sub

Ausnahmebehandlung für asynchrone Methoden

Im folgenden Beispiel wird die Ausnahmebehandlung für asynchrone Methoden veranschaulicht. Um eine Ausnahme abzufangen, die für eine asynchrone Aufgabe gilt, befindet sich der Await Ausdruck in einem Try Block des Aufrufers, und die Ausnahme wird im Catch Block abgefangen.

Heben Sie die Auskommentierung der Zeile Throw New Exception im Beispiel auf, um die Ausnahmebehandlung zu veranschaulichen. Die Ausnahme wird im Catch -Block abgefangen, die -Eigenschaft der IsFaulted Aufgabe ist auf Truefestgelegt, und die -Eigenschaft des Exception.InnerException Tasks wird auf die Ausnahme festgelegt.

Heben Sie die Auskommentierung der Zeile Throw New OperationCancelledException auf, um zu veranschaulichen, was beim Abbrechen eines asynchronen Prozesses passiert. Die Ausnahme wird im Catch -Block abgefangen, und die -Eigenschaft der IsCanceled Aufgabe ist auf Truefestgelegt. Unter einigen Bedingungen, die für dieses Beispiel nicht gelten, IsFaulted ist jedoch auf True und IsCanceled auf Falsefestgelegt.

Public Async Function DoSomethingAsync() As Task
    Dim theTask As Task(Of String) = DelayAsync()

    Try
        Dim result As String = Await theTask
        Debug.WriteLine("Result: " & result)
    Catch ex As Exception
        Debug.WriteLine("Exception Message: " & ex.Message)
    End Try

    Debug.WriteLine("Task IsCanceled: " & theTask.IsCanceled)
    Debug.WriteLine("Task IsFaulted:  " & theTask.IsFaulted)
    If theTask.Exception IsNot Nothing Then
        Debug.WriteLine("Task Exception Message: " &
            theTask.Exception.Message)
        Debug.WriteLine("Task Inner Exception Message: " &
            theTask.Exception.InnerException.Message)
    End If
End Function

Private Async Function DelayAsync() As Task(Of String)
    Await Task.Delay(100)

    ' Uncomment each of the following lines to
    ' demonstrate exception handling.

    'Throw New OperationCanceledException("canceled")
    'Throw New Exception("Something happened.")
    Return "Done"
End Function


' Output when no exception is thrown in the awaited method:
'   Result: Done
'   Task IsCanceled: False
'   Task IsFaulted:  False

' Output when an Exception is thrown in the awaited method:
'   Exception Message: Something happened.
'   Task IsCanceled: False
'   Task IsFaulted:  True
'   Task Exception Message: One or more errors occurred.
'   Task Inner Exception Message: Something happened.

' Output when an OperationCanceledException or TaskCanceledException
' is thrown in the awaited method:
'   Exception Message: canceled
'   Task IsCanceled: True
'   Task IsFaulted:  False

Behandeln mehrerer Ausnahmen in asynchronen Methoden

Das folgende Beispiel veranschaulicht die Behandlung von Ausnahmen in Fällen, in denen mehrere Aufgaben zu mehreren Ausnahmen führen können. Der Try -Block verfügt über den Await Ausdruck für den zurückgegebenen Task Task.WhenAll . Die Aufgabe ist abgeschlossen, wenn die drei Aufgaben, auf die angewendet wird, Task.WhenAll abgeschlossen sind.

Jede der drei Aufgaben löst eine Ausnahme aus. Der Catch -Block durchläuft die Ausnahmen, die sich in der Exception.InnerExceptions -Eigenschaft der zurückgegebenen Aufgabe Task.WhenAll befinden.

Public Async Function DoMultipleAsync() As Task
    Dim theTask1 As Task = ExcAsync(info:="First Task")
    Dim theTask2 As Task = ExcAsync(info:="Second Task")
    Dim theTask3 As Task = ExcAsync(info:="Third Task")

    Dim allTasks As Task = Task.WhenAll(theTask1, theTask2, theTask3)

    Try
        Await allTasks
    Catch ex As Exception
        Debug.WriteLine("Exception: " & ex.Message)
        Debug.WriteLine("Task IsFaulted: " & allTasks.IsFaulted)
        For Each inEx In allTasks.Exception.InnerExceptions
            Debug.WriteLine("Task Inner Exception: " + inEx.Message)
        Next
    End Try
End Function

Private Async Function ExcAsync(info As String) As Task
    Await Task.Delay(100)

    Throw New Exception("Error-" & info)
End Function

' Output:
'   Exception: Error-First Task
'   Task IsFaulted: True
'   Task Inner Exception: Error-First Task
'   Task Inner Exception: Error-Second Task
'   Task Inner Exception: Error-Third Task

Weitere Informationen