>Do you mean that you want your log entries to appear in one of the existing sources such as 'Application'? If so it's just a question of setting the EventLog.Source property. e.g:
Dim el As EventLog = New EventLog()
> el.Source = "Application"
> el.WriteEntry("Oops")
What I mean is this new section that appears, as shown in the attached image.