Delen via

Procedure: logboekberichten registreren wanneer de toepassing wordt gestart of afgesloten (Visual Basic)

  • Artikel

U kunt de My.Application.Log en My.Log objecten gebruiken om informatie te registreren over gebeurtenissen die zich in uw toepassing voordoen. In dit voorbeeld ziet u hoe u de My.Application.Log.WriteEntry methode gebruikt met de Startup en Shutdown gebeurtenissen om traceringsgegevens te schrijven.

Toegang tot de gebeurtenis-handlercode van de toepassing

  1. Een project selecteren in Solution Explorer. Kies Eigenschappen in het menu Project.

  2. Klik op het tabblad Toepassing .

  3. Klik op de knop Toepassingsevenementen weergeven om de Code-editor te openen.

    Hiermee opent u het bestand ApplicationEvents.vb.

Berichten registreren wanneer de toepassing wordt gestart

  1. Laat het ApplicationEvents.vb bestand openen in de Code-editor. Kies MyApplication Events in het menu Algemeen.

  2. Kies Opstarten in het menu Declaraties.

    De toepassing genereert de Startup gebeurtenis voordat de hoofdtoepassing wordt uitgevoerd.

  3. Voeg de My.Application.Log.WriteEntry methode toe aan de Startup gebeurtenis-handler.

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

Berichten registreren wanneer de toepassing wordt afgesloten

  1. Laat het ApplicationEvents.vb bestand openen in de Code-editor. Kies MyApplication Events in het menu Algemeen.

  2. Kies Afsluiten in het menu Declaraties.

    De toepassing genereert de Shutdown gebeurtenis nadat de hoofdtoepassing is uitgevoerd, maar voordat deze wordt afgesloten.

  3. Voeg de My.Application.Log.WriteEntry methode toe aan de Shutdown gebeurtenis-handler.

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

Opmerking

U kunt projectontwerper gebruiken om toegang te krijgen tot de toepassingsevenementen in de Code-editor. Zie Application Page, Project Designer (Visual Basic) voor meer informatie.

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

Zie ook