Servicio de windows: no pasa nada al iniciarlo

[oscuros]

Buenas, os comento mi problema, he desarrollado una aplicación de servicio de windows, la instalo, todo bien, pero cuando la inicio no pasa nada de nada.

Alguien sabe que hago mal?

Este es el codigo:

Imports System
Imports System.IO

Public Class Service1

Protected Overrides Sub OnStart(ByVal args() As String)
' Agregue el código aquí para iniciar el servicio. Este método debería poner
' en movimiento los elementos para que el servicio pueda funcionar.
Timer1.Enabled = True
End Sub

Protected Overrides Sub OnStop()
' Agregue el código aquí para realizar cualquier anulación necesaria para detener el servicio.
Timer1.Enabled = False
End Sub

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
If Not Directory.Exists("C:\Documents and Settings\elorente\Escritorio\Carpeta_Prova_Service _Windows") Then
Directory.CreateDirectory("C:\Documents and Settings\elorente\Escritorio\Carpeta_Prova_Service _Windows")
End If
End Sub

Public Sub New()

' Llamada necesaria para el Diseñador de Windows Forms.
InitializeComponent()
Timer1.Interval = 10000
Timer1.Enabled = True
Timer1.Start()

' Agregue cualquier inicialización después de la llamada a InitializeComponent().

End Sub
End Class


Si a alguien se le ocurre que puede pasar que me lo diga por favor.
Muchas gracias


PD: Ya se que el timer lo inicio dos veces, pero es que lo he probado de ambas formas