Поделиться через

Практическое руководство. Ведение журнала сообщений при запуске или завершении работы приложения (Visual Basic)

Вы можете использовать My.Application.Log и My.Log объекты для регистрации сведений о событиях, происходящих в приложении. В этом примере показано, как использовать метод My.Application.Log.WriteEntry с событиями Startup и Shutdown для записи информации трассировки.

Доступ к коду обработчика событий приложения

  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)

Пример

Конструктор проектов можно использовать для доступа к событиям приложения в редакторе кода. Дополнительные сведения см. в разделе "Страница приложения", конструктор проектов (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

См. также

  • Last updated on