A megvalósításhoz egy EventLog komponensre lesz szükségünk. Az új alkalmazás nyitása után a Toolbox – Components lapjáról tegyünk fel egy EventLog komponenst a Form-ra. Ez lesz az az objektum, melyen keresztül kezelhetjük a Windows eseménynaplóját.

Log
Osztály: System.Diagnostics.EventLog
Public Property Log As String
A komponens Log property-jénél választhatjuk ki, hogy melyik eseménynaplóra van szükségünk, mely az alábbiak egyike lehet:
- Application
- Security
- System

MachineName
Osztály: System.Diagnostics.EventLog
Public Property MachineName As String
A MachineName property-be annak a számítógépnek a neve kerül, melynek eseménynaplóját használni szeretnénk.
Megjegyzés
Ha e property-nek csak egy pontot tartalmazó sztringet adunk értékül, akkor az minden esetben a saját gépre vonatkozik.

Source
Osztály: System.Diagnostics.EventLog
Public Property Source As String
A Source property-ben kell megadnunk egy tetszőleges nevet. Ez a név kerül be az eseménynaplóba való íráskor a bejegyzés forrásaként.

WriteEntry
Osztály: System.Diagnostics.EventLog
Overloads Public Sub WriteEntry(
ByVal message As String
)
A property-ken keresztül megadott eseményt a WriteEntry függvény írja az eseménynaplóba.
Paraméterek
ByVal message As String
A beírandó üzenet szövege.

WriteEntry
Osztály: System.Diagnostics.EventLog
Overloads Public Shared Sub WriteEntry(
ByVal source As String,
ByVal message As String,
ByVal type As EventLogEntryType,
ByVal eventID As Integer,
ByVal category As Short,
ByVal rawData() As Byte
)
A property-ken keresztül megadott eseményt a WriteEntry függvény írja az eseménynaplóba.
Paraméterek
ByVal source As String
A Source paraméterben kell megadnunk egy tetszőleges nevet. Ez a név kerül be az eseménynaplóba való íráskor a bejegyzés forrásaként.
ByVal message As String
A beírandó üzenet szövege.
ByVal type As EventLogEntryType
A bejegyzés típusa. Ennek értéke az alábbiak egyike lehet:
- Error
- Warning
- Information
- FailureAudit
- SuccessAudit
ByVal eventID As Integer
Egy tetszőleges számot írhatunk, mely az adott bejegyzésünkhöz kötődik. Általában az eseményünk azonosító számát szokás itt megadni.
ByVal category As Short
Egy tetszőleges számot írhatunk, mely az adott bejegyzésünkhöz kötődik. Általában az eseményünk kategóriájának számát szokás itt megadni.
ByVal rawData() As Byte
RawData paraméterben egy tetszőleges bájtokat tartalmazó tömböt adhatunk át, mely szintén tárolásra kerül az eseménynaplóba.
A példaprogram
A property-k beállításai után, ha szeretnénk egy új bejegyzést elhelyezni az eseménynaplóba, akkor a WriteEntry függvényt használhatjuk, melynek több változata is létezik. A legegyszerűbb eset az, amikor csupán egy egyszerű sztringet adunk át. Ekkor ez a sztring lesz az esemény szövege.
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
EventLog1.WriteEntry(TextBox1.Text)
End Sub