EventLogEntry.TimeGenerated
Imports System.Diagnostics
Module Module1
Sub Main()
Dim Log As New EventLog("Application")
Dim Evt As EventLogEntry
For Each Evt In Log.Entries
Console.WriteLine(Evt.Message)
Console.WriteLine(Evt.TimeGenerated)
Console.WriteLine(Evt.Source)
Next
End Sub
End Module
Related examples in the same category