Saludos!
Hoy ando por aquí listo para una aportación
. . .
Seguramente alguna vez has necesitado una diferencia de horas, minutos ó simples segundos, lo malo es que si lo hicieramos de la forma tradicional nos saldría algo mas ó menos así:
1 hora 0 minutos 4933 segundos
Lo cuál no es el resultado esperado no es verdad?
Con el siguiente código pueden por fin hacer su pequeño contador hehehe . . . espero les sirva . . .
Código:
fini = "FECHA INICIAL"
fact = Now()
segundosonline = DateDiff("s", fini, fact)
minutosonline = Int(segundosonline/60)
horasonline = Int(minutosonline/60)
minutosmod = minutosonline Mod 60
segundosmod = segundosonline Mod 60 Mod 60 Mod 60
If(minutosmod<10) Then minutosmod ="0"&minutosmod End If
If(segundosmod<10) Then segundosmod ="0"&segundosmod End If
If segundosonline < 60 Then
tiempo = segundosonline&" segundos"
ElseIf segundosonline > 60 And segundosonline < 3600 Then
tiempo = minutosmod&":"&segundosmod&" minutos"
Else
tiempo = horasonline&":"&minutosmod&":"&segundosmod&" horas"
End If Lo cuál nos daría algo como:
1:24:03 horas
Fácil y rápido . . .
Hasta la proxima ! ! !