Visual Basic - Restar Horas para calculo de tiempo.

Hola amigos:

Quisiera saber si hay alguna forma más sencilla de restar horas sin necesidad de usar tantas variables y lineas de código, pues el codigo que yo uso es muy largo y confuso por la cantidad de variables que uso. Por ejemplo:

10:20 - 9:40 = 0:40
HoraFinal – HoraInicial = 0 horas 40 minutos

15:10 – 12:50 = 2:20
HoraFinal – HoraInicial = 2 hora 20 minutos

Pero para hacer esto tengo que escribir un codigo bastante largo, por eso quisiera saber si existe alguna forma de hacercon con pocas lineas y pocas variables.

Gracias.

Private Sub Command1_Click()
Dim Horas As String
Horas = Format(TimeValue(Text1.Text) - TimeValue(Text2.Text), "hh:mm")
MsgBox Horas
End Sub

Alguna duda, escribeme ;) Buena suerte!!!

Una función que toma varios rangos es el DateDiff, si lo que quieres es sumar o restar es DateAdd:

HoraFinal = DateDiff([rango], [fecha_inicio], [fecha_final])