如何:当应用程序启动或关闭时记录消息 (Visual Basic)

可以使用 My.Application.LogMy.Log 对象来记录有关应用程序中所发生事件的信息。 本示例将演示如何结合使用 My.Application.Log.WriteEntry 方法与 StartupShutdown 事件来写入跟踪信息。

访问应用程序的事件处理程序代码

  1. “解决方案资源管理器” 中选择一个项目。 在 “项目” 菜单上,选择 “属性”

  2. 单击“应用程序” 选项卡。

  3. 单击“查看应用程序事件” 按钮,打开“代码编辑器”。

    此时将打开 ApplicationEvents.vb 文件。

在应用程序启动时记录消息

  1. 在“代码编辑器”中打开 ApplicationEvents.vb 文件。 在“常规” 菜单上,选择“MyApplication 事件”

  2. 在“声明” 菜单上,选择“启动”

    在主应用程序运行之前,应用程序将引发 Startup 事件。

  3. My.Application.Log.WriteEntry 方法添加到 Startup 事件处理程序。

    My.Application.Log.WriteEntry("Application started at " &
        My.Computer.Clock.GmtTime.ToString)
    

在应用程序关闭时记录消息

  1. 在“代码编辑器”中打开 ApplicationEvents.vb 文件。 在“常规” 菜单上,选择“MyApplication 事件”

  2. 在“声明” 菜单上,选择“关闭”

    在主应用程序运行之后、关闭之前,应用程序将引发 Shutdown 事件。

  3. My.Application.Log.WriteEntry 方法添加到 Shutdown 事件处理程序。

    My.Application.Log.WriteEntry("Application shut down at " &
        My.Computer.Clock.GmtTime.ToString)
    

示例

可以通过“项目设计器” 访问“代码编辑器”中的应用程序事件。 有关详细信息,请参阅 Application Page, Project Designer (Visual Basic)(应用程序页、项目设计器 (Visual Basic)。

Private Sub MyApplication_Startup(
    ByVal sender As Object,
    ByVal e As ApplicationServices.StartupEventArgs
) Handles Me.Startup
    My.Application.Log.WriteEntry("Application started at " &
        My.Computer.Clock.GmtTime.ToString)
End Sub

Private Sub MyApplication_Shutdown(
    ByVal sender As Object,
    ByVal e As System.EventArgs
) Handles Me.Shutdown
    My.Application.Log.WriteEntry("Application shut down at " &
        My.Computer.Clock.GmtTime.ToString)
End Sub

另请参阅