Visual Basic - necesito ayuda

hola, tengo que calcular una diferencia de horas y que me diga despues cuantas horas son si es 1 o 4 pero si se pasa de una hora y 10 se redondea a la siguiente hora se que tengo que usar el datediff pero no se como usarlo

Hola, fíjate en este ejemplo

Dim dInicio As Date, dFin As Date
Dim lHoras As Long, lMinutos As Long

dInicio = Text1.Text
dFin = Now
lMinutos = DateDiff("n", dInicio, dFin)
lHoras = lMinutos \ 60
lMinutos = lMinutos - (lHoras * 60)
If lMinutos > 10 Then lHoras = lHoras + 1

MsgBox lHoras & " horas"

gracias pero si la hora fin no es la que tengo actual en la pc? como hago porque asi me puede dar errores

¿Dónde tienes la hora fin, en un TextBox? Pues sólo cambia la asignación de la variable:

dFin = Text2.Text