Visual Basic - como sumar horas

Life is soft - evento anual de software empresarial
 
Vista:

como sumar horas

Publicado por Ariel (94 intervenciones) el 17/02/2005 18:13:30
Hola a todos

necesito sumar horas

h1=20:40
h2=10:10

htotal=h1+h2

suponiendo q htotal, deberia dar como resultado 30:50

Gracias a todos.

Ariel...
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:como sumar horas

Publicado por ChaRLinux (60 intervenciones) el 17/02/2005 18:25:34
yo ocupo lo siguiente

A = Format((TimeValue(Text1.Text) - TimeValue(Text2.Text)), "hh:mm:ss")
Label1 = "Horas del Proceso " & A

espero te sirve
ChaRLinux Corporation
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:como sumar horas

Publicado por Ariel (94 intervenciones) el 18/02/2005 00:26:54
Agradezco tu ayuda

pero el problema de VB, es que
no se puede guardar en una variable una hora, que exceda de las 23:59:59 a no ser de que sea tipo String.

atte
ariel
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:como sumar horas

Publicado por Benjo (679 intervenciones) el 18/02/2005 01:32:39
Sólo debés manejarla como String, ya que las horas no pueden superar las 24

Private Sub Command1_Click()
hh = Hour(Text1.Text) + Hour(Text2.Text)
mm = Minute(Text1.Text) + Minute(Text2.Text)
ss = Second(Text1.Text) + Second(Text2.Text)

If ss >= 60 Then
ss = "00"
mm = Val(mm) + 1
End If

If mm >= 60 Then
mm = "00"
hh = Val(hh) + 1
End If


Debug.Print "Horas del Proceso " & hh & ":" & mm & ":" & ss

End Sub

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