Cómo: Registrar mensajes cuando se inicia o se cierra la aplicación (Visual Basic)
Puede utilizar los objetos My.Application.Log y My.Log para registrar información sobre eventos que se producen en la aplicación. Este ejemplo muestra cómo utilizar el método My.Application.Log.WriteEntry con los eventos Startup y Shutdown para escribir información de traza.
Para tener acceso al código del controlador de eventos de la aplicación
Tenga seleccionado un proyecto en el Explorador de soluciones. En el menú Proyecto, elija Propiedades.
Haga clic en la ficha Aplicación.
Haga clic en el botón Ver eventos de aplicaciones para abrir el Editor de código.
Esto abre el archivo ApplicationEvents.vb.
Para registrar los mensajes cuando se inicia la aplicación
Tenga abierto el archivo ApplicationEvents.vb en el Editor de código. En el menú General, elija Eventos de MyApplication.
En el menú Declaraciones, elija Inicio.
La aplicación genera el evento Startup antes de que se ejecute la aplicación principal.
Agregue el método My.Application.Log.WriteEntry al controlador de eventos Startup.
My.Application.Log.WriteEntry("Application started at " & My.Computer.Clock.GmtTime.ToString)
Para registrar los mensajes cuando se cierra la aplicación
Tenga abierto el archivo ApplicationEvents.vb en el Editor de código. En el menú General, elija Eventos de MyApplication.
En el menú Declaraciones, elija Shutdown.
La aplicación genera el evento Shutdown después de que se ejecute la aplicación principal, pero antes de que se cierre.
Agregue el método My.Application.Log.WriteEntry al controlador de eventos Shutdown.
My.Application.Log.WriteEntry("Application shut down at " & My.Computer.Clock.GmtTime.ToString)
Ejemplo
Puede utilizar el Diseñador de proyectos para tener acceso a los eventos de aplicación en el Editor de código. Para obtener más información, vea Cómo: Controlar eventos de aplicaciones (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
Vea también
Tareas
Cómo: Controlar eventos de aplicaciones (Visual Basic)
Referencia
Microsoft.VisualBasic.Logging.Log