Autor Tema: comparar la hora actual con otra  (Leído 3007 veces)

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

Desconectado nacha4

  • PIC16
  • ***
  • Mensajes: 113
comparar la hora actual con otra
« 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

Desconectado vszener

  • Moderadores
  • PIC24H
  • *****
  • Mensajes: 2395
RE: comparar la hora actual con otra
« Respuesta #1 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!!!Giño
· Nos vemos en los bares!!!!!
· Mi Blog: Aqueronte

Desconectado nacha4

  • PIC16
  • ***
  • Mensajes: 113
RE: comparar la hora actual con otra
« Respuesta #2 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

Desconectado LordLafebre

  • Moderador Global
  • DsPIC30
  • *****
  • Mensajes: 3529
    • Micros & micros
RE: comparar la hora actual con otra
« Respuesta #3 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...!!! Sonrisa Gigante



 

anything