hola foro, estuve buscando en internet la manera de hacer cierta cosa dentro de un intervalo de tiempo. por ejemplo:
en el evento load poner esto
si time está entre el intervalo de 12:40:20 pm y las 08:15:10 am hacer lo siguiente (aca codigo para hacer)
pero no logre encontrar nada, alguna idea?
saludos
Busca sobre la funcion DateDiff (http://www.programandoenvb6.com.ar/2009/09/datediff.html)
Cita de: z_ane_666 en 8 Noviembre 2011, 02:36 AM
si time está entre el intervalo de 12:40:20 pm y las 08:15:10 am hacer lo siguiente (aca codigo para hacer)
ammm no te entiendo...
Intervalo = Sucesion de una serie desde A hasta B de N en N.
o que quieres es un Rango? es decir la diferencia?
Dulces Lunas!¡.
muchas gracias a los que respondieron, yo mismo ya hice el codigo, asi que lo cuelgo por si alguna persona lo necesite:
supongamos que quiera ver que la hora actual este contenida entre las 05:15:14 p.m. y las 09:16:11 a.m.(del dia sgte obviamente)
(creo que lo correcto seria llamarlo dentro del rango de..)
Option Explicit
Private Declare Function GetTickCount& Lib "kernel32" ()
Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
Private Sub Form_Load()
Dim a As Date
Dim b As Date
a = CDate("08/01/2009" & " " & "05:15:14 p.m.")
b = CDate("08/01/2009" & " " & "09:16:11 a.m.")
Dim criterio As Date
criterio = CDate("08/01/2009" & " " & Time)
If DateDiff("s", a, b) < 0 Then
b = DateAdd("d", 1, b)
End If
If DateDiff("s", a, criterio) > 0 And DateDiff("s", b, criterio) < 0 Then
MsgBox "esta contenido"
End If
End Sub
saludos
HOLA!!!
Llego tarde pero aca tenes un tema con muchos ejemplos de fechas:
http://foro.elhacker.net/empty-t305069.0.html
GRACIAS POR LEER!!!