Public Sub DoStuff(filename As String)
        Try
            Dim fi As New System.IO.FileInfo(filename)
 
        Catch ex As System.ArgumentNullException
            MessageBox.Show("fileName hat den Wert null.")
 
            ' Hier könnte ein Sonderfall vorliegen, dessen Ausnahme automatisch 
            ' behoben werden könnte
            ' durch Erstellen und Öffnen einer temporären Datei
 
        Catch ex As Security.SecurityException
            MessageBox.Show("Der Aufrufer verfügt nicht über die erforderliche" & _
              "Berechtigung.")
 
            ' Hier könnte ein Sonderfall vorliegen, dessen Ausnahme automatisch 
            ' behoben werden könnte
            ' durch Anforderung von höheren Rechten
 
        Catch ex As System.ArgumentException
            MessageBox.Show("Der Dateiname ist leer, oder er enthält nur" & _
              "Leerräume oder ungültige Zeichen.")
 
            ' Hier könnte ein Sonderfall vorliegen, dessen Ausnahme automatisch 
            ' behoben werden könnte
            ' durch Erstellen und Öffnen einer temporären Datei
 
        Catch ex As System.UnauthorizedAccessException
            MessageBox.Show("Der Zugriff auf fileName wird verweigert.")
 
        Catch ex As System.IO.PathTooLongException
            MessageBox.Show("Der angegebene Pfad und/oder der Dateiname" & _
              "überschreiten die vom System vorgegebene Höchstlänge.")
 
            ' Hier könnte ein Sonderfall vorliegen, dessen Ausnahme automatisch 
            ' behoben werden könnte
            ' durch Aufruf von API-Methoden
 
        Catch ex As System.NotSupportedException
            MessageBox.Show("fileName enthält einen Doppelpunkt (:) innerhalb" & _
              "der Zeichenfolge.")
 
            ' Hier könnte ein Sonderfall vorliegen, dessen Ausnahme automatisch 
            ' behoben werden könnte
            ' durch Entfernen von Sonderzeichen oder Erstellen und Öffnen einer 
            ' temporären Datei
 
        Catch ex As System.Exception
            ' Welcher spezielle Ausnahme ist aufgetreten? Wie kann ich diese 
            ' Ausnahme eventuell beheben?
 
        End Try
    End Sub