Problemas con horas

[FedericoC]

Buenas, el problema que tengo, es basicamente este:

Necesito saber como puedo hacer para restar/sumar horas, en pocas palabras, necesito calcular cuantas horas faltan desde la hora actual para las 12 de la noche, espero que se entienda la verdad que me esta volviendo loco

Desde ya gracias.

pd: utilizo Visual Basic 6

[seba123neo]

Hola,algo asi?

Código:

Private Sub Form_Load()
MsgBox FormatDateTime((Date + 1) - Now, vbLongTime)
End Sub

saludos.

[FedericoC]

Si, era eso lo que buscaba, gracias. Otra cosita, se puede cambiar el formato de la hora?, osea que en vez que diga 10 PM, diga 22 hs ?..

Gracias.

[vbx3m]

Otra forma de hacerlo es asi

Código:

Dim t0 As Variant, t1 As Variant
t0 = "12:00"
t1 =Time
MsgBox Format(TimeValue(t1) - TimeValue(t0), "hh:mm:ss")

...se puede cambiar el formato de la hora?, osea que en vez que diga 10 PM, diga 22 hs ?..

Con Format(Time, "h:mm") le das ese formato a la hora...