Private m_EventLogList() As EventLog = EventLog.GetEventLogs
 
....
 
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As _
  System.EventArgs) Handles MyBase.Load
 
'Alle Protokolle der Combobox hinzufügen
        For Each evnlog As EventLog In m_EventLogList
            cboProtokoll.Items.Add(evnlog.LogDisplayName)
        Next
End Sub

Visual Basic Express 2010, C# Express 2010
Intel? i7 Core 920@2.63 Ghz, 6 GByte DDR3, 1024 MB ATI? Radeon? 5870, Windows 7 Prof. 64 Bit
Gibson SG 61' Reissue ; Ibanez Prestige RG 2550 E, Marshall Valvestate VS100 + Modell Vs412 (4 x 12''), Cubase Studio