Visual Basic - TIMER URGENTE!

Life is soft - evento anual de software empresarial
 
Vista:

TIMER URGENTE!

Publicado por Juan (4 intervenciones) el 15/02/2007 15:10:07
Hola !!

Podria decirme alguien si hay algun control parecido al timer pero que permita intervalos de horas. Es decir poder poner que se ejecute su evento cada 30 minutos o 1 hora. Es que el timer es muy limitado.

Muchas gracias y por favor contestarme.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:TIMER URGENTE!

Publicado por Javier (1 intervención) el 15/02/2007 20:55:41
Si en realidad se queda algo corto, prueba asi:

Dim Fecha As Date

Private Sub Form_Load()
Timer1.Interval = 60000
Fecha = Format(Time, "hh:mm")
End Sub

Private Sub Timer1_Timer()
If Format(Time, "hh:mm") >= Fecha + TimeValue("00:30") Then MsgBox "Cumple la condición de 30m"
End Sub

Te hace falta poner un timer, la variable Fecha la pones a nivel del formulario. El Timer1 está en 60000ms (60s) y a la variable fecha le cargo la hora del sistema (cuando arranca la aplicación)
Despues compara la hora del reloj con la de la variable fecha + el tiempo que quieras, en el ejemplo he usado 30m. Cuando cumpla quiere decir que lleva 30m en marcha.

No se si te será útil, pero espero que te sirva de ejemplo.
Un saludo.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:TIMER URGENTE!

Publicado por Juan Antonio (4 intervenciones) el 16/02/2007 08:25:59
Muchas gracias Javier.
Un saludo.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar