Protected Overrides Sub OnStart(ByVal args() As String)
        ' Code zum Starten des Dienstes hier einfügen. Diese Methode sollte 
        ' Vorgänge
        ' ausführen, damit der Dienst gestartet werden kann.
 
 
    End Sub
 
    Protected Overrides Sub OnStop()
        ' Hier Code zum Ausführen erforderlicher Löschvorgänge zum Beenden des 
        ' Dienstes einfügen.
 
 
    End Sub

Ich verwende Micorsoft Windows 7 (64Bit) und Visual Studio 2005 Professional.