Compartilhar via


Como registrar mensagens de log quando o aplicativo é iniciado ou desligado (Visual Basic)

Você pode usar os objetos My.Application.Log e My.Log para registrar informações sobre eventos que ocorrem em seu aplicativo. Este exemplo mostra como usar o método My.Application.Log.WriteEntry com os eventos Startup e Shutdown para gravar informações de rastreamento.

Para acessar o código do manipulador de eventos do aplicativo

  1. Selecione um projeto no Gerenciador de Soluções. No menu Projeto , escolha Propriedades.

  2. Clique na guia Aplicativo.

  3. Clique no botão Exibir Eventos do Aplicativo para abrir o Editor de Código.

    Isso abre o arquivo ApplicationEvents.vb.

Para registrar mensagens quando o aplicativo é iniciado

  1. Abra o arquivo ApplicationEvents.vb no Editor de Código. No menu Geral , escolha Eventos de MyApplication.

  2. No menu Declarações , escolha Inicialização.

    O aplicativo aciona o Startup evento antes da execução do aplicativo principal.

  3. Adicione o My.Application.Log.WriteEntry método ao Startup manipulador de eventos.

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

Para registrar mensagens quando o aplicativo for desligado

  1. Abra o arquivo ApplicationEvents.vb no Editor de Código. No menu Geral , escolha Eventos de MyApplication.

  2. No menu Declarações , escolha Desligamento.

    O aplicativo aciona o Shutdown evento após a execução do aplicativo principal, mas antes de ser desligado.

  3. Adicione o My.Application.Log.WriteEntry método ao Shutdown manipulador de eventos.

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

Exemplo

Você pode usar o Designer de Projeto para acessar os eventos do aplicativo no Editor de Código. Para obter mais informações, consulte Página do Aplicativo, Designer de Projeto (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

Consulte também