Visual Basic - Horas?

Life is soft - evento anual de software empresarial
 
Vista:

Horas?

Publicado por JoseVa (1 intervención) el 30/01/2002 12:16:45
Necesito saber como puedo restar dos horas y obtener una hora resultante con la que operar acontinuación
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:Horas?

Publicado por Josep (5 intervenciones) el 30/01/2002 21:22:16
Se puede hacer asi:

Dim HoraActual As Date
Dim HoraMenos2 As Date

HoraActual = Hour(Now) & ":" & Minute(Now) & ":" & Second(Now)
HoraMenos2 = (Hour(Now) - 2) & ":" & Minute(Now) & ":" & Second(Now)
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:Horas?

Publicado por Manuel Pastrana (53 intervenciones) el 31/01/2002 03:03:10
Puedes probar este ejemplo

Private Sub Command1_Click()
Dim hora_1 As Date
Dim hora_2 As Date
Dim hora_3 As Date

hora_1 = Format(InputBox("digite la hora 1", "Formato 24 horas", "hh:mm:ss"), "HH:MM:SS")
hora_2 = Format(InputBox("digite la hora 2", "Formato 24 horas", "hh:mm:ss"), "HH:MM:SS")
hora_3 = hora_1 - hora_2
MsgBox Format(hora_3, "HH:MM:SS AMPM")
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