Foro de elhacker.net

Programación => Programación Visual Basic => Mensaje iniciado por: pedraosone en 5 Octubre 2015, 15:11 pm



Título: comparar un label con la hora del sistema (solucionado)
Publicado por: pedraosone en 5 Octubre 2015, 15:11 pm
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