Visual Basic - ayuda con timer!!!

hola a todos
estoy prgramando para controlar interruptores electricos por puerto paralelo, ahora mi problema es que una vez cargado el proframa no trabaja. tengo este codigo en el Timer, el programa se levanta al arrancar la pc

Private Sub Timer2_Timer()
' encender a las 8:00

If Time = "08:00:00" Then
SetPortBit Out_Port, 0
End If
' apagar a las 9:00

If Time = "09:00:00" Then
ClrPortBit Out_Port, 0
End If

End Sub

el Interval esta a 50, ya probe con 60000, no da resultado, que codigo le falta?

Pruba con cdate() en el valor de la hora que comparas, de este modo realmente compararás datos del mismo tipo.
Por ejemplo:
....
If Time = cdate("08:00:00") Then
...

Por otro lado, el timer está activo??, supongo que si, pero por si acaso.

Un saludo y suerte.