当Sub Main不可访问时，在VB.NET中捕获ThreadingException

Question

我有一个VB.NET winforms解决方案，并且想要添加标准应用程序异常处理程序 - Application.ThreadException和AppDomain.CurrentDomain.UnhandledException。

我有以下代码from MSDN

' Starts the application. ' 
<SecurityPermission(SecurityAction.Demand, Flags:=SecurityPermissionFlag.ControlAppDomain)> _ 
Public Shared Sub Main() 
    ' Add the event handler for handling UI thread exceptions to the event. ' 
    AddHandler Application.ThreadException, AddressOf ErrorHandlerForm.Form1_UIThreadException 

    ' Set the unhandled exception mode to force all Windows Forms errors to go through' 
    ' our handler. ' 
    Application.SetUnhandledExceptionMode(UnhandledExceptionMode.CatchException) 

    ' Add the event handler for handling non-UI thread exceptions to the event. ' 
    AddHandler AppDomain.CurrentDomain.UnhandledException, AddressOf CurrentDomain_UnhandledException 

    ' Runs the application. ' 
    Application.Run(New ErrorHandlerForm()) 
End Sub 

我怎样才能做到这一点在VB.NET的时候我没有存取权限的Sub Main()方法？

是当“启用应用程序框架”我的解决方案属性中启用的

Answer 1

可以拦截My.Application.Startup event添加需要加载任何形式之前运行代码的情况下（Sub Main是隐藏的）...。

请注意，启动事件处理程序的代码存储在默认情况下隐藏的ApplicationEvents.vb文件中。

编辑：为了回答您的评论，My.Application和System.Windows.Forms.Application之间存在混淆。如果你使用System.Windows.Forms的前缀.Application，它会工作 - 我刚刚测试过。

Answer 2

我看到你的问题，我想 - 你好像在代码文件的头部缺少一个Imports声明。您可以添加所需Import或完全限定您所访问的类型：

Imports System 
Imports System.Windows.Forms 

Public Shared Sub MyApplicationInitialization() 
    AddHandler System.Windows.Forms.Application.ThreadException, AddressOf MyThreadExceptionHandler 

    Application.SetUnhandledExceptionMode(UnhandledExceptionMode.CatchException) 

    AddHandler System.AppDomain.CurrentDomain.UnhandledException, AddressOf MyUnhandledExceptionHandler 
End Sub 

正如你由此可以看出，在System.Windows.Forms命名空间内的System命名空间和Application内AppDomain生活。

请注意，您还需要在每个AddressOf之后定义自己的事件处理方法。这些可以如下布置：

Sub MyUnhandledExceptionHandler(ByVal sender As Object, ByVal e As UnhandledExceptionEventArgs) 
    'your logic here 
End Sub 

Sub MyThreadExceptionHandler(ByVal sender As Object, ByVal e As ThreadExceptionEventArgs) 
    'your logic here 
End Sub