Bagikan melalui

Cara: Mencatat Pesan Saat Aplikasi Dimulai atau Dimatikan (Visual Basic)

  • Artikel

Anda dapat menggunakan objek My.Application.Log dan My.Log untuk mencatat informasi tentang peristiwa yang terjadi di aplikasi Anda. Contoh ini menunjukkan cara menggunakan metode My.Application.Log.WriteEntry dengan peristiwa Startup dan Shutdown untuk menulis informasi pelacakan.

Untuk mengakses kode penanganan peristiwa aplikasi

  1. Pilih proyek di Penjelajah Solusi. Pada menu Proyek, pilih Properti.

  2. Klik tab Aplikasi.

  3. Klik tombol Tampilkan Peristiwa Aplikasi untuk membuka Editor Kode.

    Ini akan membuka file ApplicationEvents.vb.

Untuk mencatat pesan saat aplikasi dimulai

  1. Buka file ApplicationEvents.vb di Editor Kode. Pada menu Umum, pilih Peristiwa MyApplication.

  2. Pada menu Deklarasi, pilih Mulai.

    Aplikasi memunculkan peristiwa Startup sebelum aplikasi utama berjalan.

  3. Tambahkan metode My.Application.Log.WriteEntry ke penanganan aktivitas Startup.

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

Untuk mencatat pesan saat aplikasi dimatikan

  1. Buka file ApplicationEvents.vb di Editor Kode. Pada menu Umum, pilih Peristiwa MyApplication.

  2. Pada menu Deklarasi, pilih Matikan.

    Aplikasi menaikkan peristiwa Shutdown setelah aplikasi utama berjalan, tetapi sebelum dimatikan.

  3. Tambahkan metode My.Application.Log.WriteEntry ke penanganan aktivitas Shutdown.

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

Contoh

Anda dapat menggunakan Perancang Proyek untuk mengakses peristiwa aplikasi di Editor Kode. Untuk informasi selengkapnya, lihat Halaman Aplikasi, Perancang Proyek (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

Lihat juga