comparar un label con la hora del sistema (solucionado)

Iniciado por pedraosone, 5 Octubre 2015, 15:11 PM

0 Miembros y 1 Visitante están viendo este tema.

pedraosone

Hola, tengo un label con el siguiente caption:
label1.caption = "23:00:00" ' esta hora se la asigna una variable
y quiero que un timer me la compare con la hora del sistema
he usado este codigo:

Private Sub Timer1_Timer()
Dim procID As Integer
If Time$ = Label1.Caption Then
procID = Shell("C:\Users\PITU\Desktop\PISQUITOAVISO1.exe", vbMaximizedFocus)
End if
End Sub

si en lugar de poner label1.caption pongo directamente la hora asi "23:00:00" si que funciona y probe a poner directamente el nombre de la variable que asigna el caption al label pero tampoco me funciona espero que alguien me ayude
gracias a todos

ya encontre la solucion, de todos modos gracias  a todos aqui dejo como lo solucione por si le sirve a alguien:

Private Sub Timer1_Timer()
Dim procID As Integer

If Hour(Time$) = Val(Text1.Text) And Minute(Time$) = Val(Text2.Text) And Second(Time$) = 0 Then
     
       procID = Shell("C:\Users\PITU\Desktop\PISQUITOAVISO1.exe", vbMaximizedFocus)
       
    End If

End Sub