Joe Castillo
08 de Agosto del 2003

Que tal esperando me puedas ayudar te planteo mi siguiente duda.
Tengo
1 button.
2 Textbox.
Quiero que al darle Click en el boton se me ponga la hora actual del sitema en el primer Textbox lo cual lo logro con time.
El problema es que al mismo tiempo quiero que en el segundo Textbox se me empieze a contabilizar el tiempo en minutos y si pasa los sesenta pues también en horas.
No quiero que me saque la diferencia entre dos intervalos sino que me este contabilizando en tiempo real basandose en el cambio de minuto del sistema.

Juan
08 de Agosto del 2003

Con la función DateDiff calculas el nº de minutos entre
las dos horas, después prar saber las hora y minutos
correspondientes haces algo así:

horas = totalMinutos 60
minutos = totalMinutos mod 60

Fijate que he usado el operador barra invertida "" para
la división ya que este da un resultado sin decimales.

kisspis
08 de Agosto del 2003

Hola, con este codigo con un boton empiezas a contar el tiempo del sistema y con el otro boton lo paras. Necesitas un Timer.
Supongo que te orientará.

Private Sub Command1_Click()
Timer1.Interval = 100 ' arranca
End Sub
Private Sub Command2_Click()
Timer1.Interval = 0 ' para
End Sub
Private Sub Timer1_Timer()
Text1.Text = Time ' hora actual del sistema
Text2.Text = Minute(Now) ' minutos del sistema
End Sub