Public Sub Main()
    ' Start-Prozedur mit Definition einer 
    ' globalen Fehlerbehandlungsroutine
    AddHandler Application.ThreadException, _
      AddressOf GeneralErrorHandler
 
    ' Start-Formular laden und anzeigen
    Application.Run(New Form1)
  End Sub
' Nachdem ich mit F11 über diese End Sub gehe, kommt der Fehler