Declare Function GetNumberOfEventLogRecords Lib "advapi32.dll" ( _
ByVal hEventLog As Long, _
NumberOfRecords As Long) _
As Long
GetNumberOfEventLogRecords возвращает число записей в заданном журнале событий
Смотри пример функции OpenEventLog
GetOldestEventLogRecord, OpenEventLog