TODOPIC

Lenguajes de programación para PC => Visual Basic => Mensaje iniciado por: nacha4 en 13 de Enero de 2006, 00:37:00

Título: comparar la hora actual con otra
Publicado por: nacha4 en 13 de Enero de 2006, 00:37:00

tengo que comparar la hora real con una que yo quiro poner en un TEXTBOX que si son iguales haga algo, se puede hacer eso. a la hora real ya lo hice pero no se como compararla

Título: RE: comparar la hora actual con otra
Publicado por: vszener en 13 de Enero de 2006, 08:33:00

Pues restala con la hora que quieres y si el resultado es cero que realiza tu proposito y sino pus que siga el programa su curso:

Codigo:


          flag_hora=hora - hora_comparar

          IF  flag_hora= 0 THEN 
                      operaciona  ealizar
          ENDIF

Suerte!!!

Título: RE: comparar la hora actual con otra
Publicado por: nacha4 en 13 de Enero de 2006, 09:32:00

Con que variables tengo que declarar  flag_hora, hora y hora_comparar.
Para poner la hora que yo quiero lo que hago es lo siguiente fijate si esta bien

Private Sub Text1_Change()
Dim M As Date
M = Text2.Text
End Sub

Título: RE: comparar la hora actual con otra
Publicado por: LordLafebre en 13 de Enero de 2006, 09:37:00

Hola:

Puedes hacer esto que es muy sencilo, con un timer y dos textbox

Codigo:
Private Sub Timer1_Timer()
    Text2 = Time
    If Text2.Text = Text1.Text Then
        MsgBox "iguales"
    End If
End Sub

.

El timer esta configurado a 1 segundo, cada segundo al text2 le asigna la hora del sistema, en el otro texto escribes la hora pero en el mismo formato, luego lo que hace es comparar textos, por eso tiene que la hora tener el mismo formato.

Suerte...!!!