Overloads Public Shared Sub Main(args() As String)
   
    ' Create a trace listener for the event log.
    Dim myTraceListener As New EventLogTraceListener("myEventLogSource")
    
    ' Add the event log trace listener to the collection.
    Trace.Listeners.Add(myTraceListener)
    
    ' Write output to the event log.
    Trace.WriteLine("Test output")
End Sub 'Main

public static void Main(string[] args) {

    // Create a trace listener for the event log.
    EventLogTraceListener myTraceListener = new EventLogTraceListener("myEventLogSource");
 
    // Add the event log trace listener to the collection.
    Trace.Listeners.Add(myTraceListener);
 
    // Write output to the event log.
    Trace.WriteLine("Test output");
 }
 

int main()
{
   
   // Create a trace listener for the event log.
   EventLogTraceListener^ myTraceListener = gcnew EventLogTraceListener( "myEventLogSource" );
   
   // Add the event log trace listener to the collection.
   Trace::Listeners->Add( myTraceListener );
   
   // Write output to the event log.
   Trace::WriteLine( "Test output" );
}

public static void main(String[] args)
{
    // Create a trace listener for the event log.
    EventLogTraceListener myTraceListener = 
        new EventLogTraceListener("myEventLogSource");

    // Add the event log trace listener to the collection.
    Trace.get_Listeners().Add(myTraceListener);

    // Write output to the event log.
    Trace.WriteLine("Test output");
} //main