-
VB.NE 使用主线程捕获异常错误.rar下载
资源介绍
VB.net 演示主线程异常捕获错误的方法,如何捕获错误的例子,采用异常委托处理程序,使用MyException.Exception.Source和MyException.Exception.Message获取错误信息代码和具体的消息,将程序运行时发生的错误消息,错误信息记录在应用程序日志中,程序添加了一个异常委托,用于显示消息内容。
'异常委托处理程序
Public Sub GetException(ByVal sender As System.Object, ByVal MyException As ThreadExceptionEventArgs)
Dim MyInfo As String
Dim MyLog As EventLog
MyInfo = "错误名称:" MyException.Exception.Source ",错误信息:" MyException.Exception.Message
MyLog = New EventLog()
MyLog.Source = "luobinErrors"
MyLog.WriteEntry(MyInfo)
MessageBox.Show("程序运行时发生错误,错误信息记录在应用程序日志中", "信息提示", MessageBoxButtons.OK, MessageBoxIcon.Information)
End Sub
- 上一篇: (VB)获取运行程序(控件)名称和内容
- 下一篇: VB6任务管理器