Visual Basic - Ayuda!!!

Por favor alguien ayudeme, no puedo usar el comando datediff, la variables que comparo son tipo date, esta bien eso?, tengo dos botones, uno "iniciar" tiene el codigo
dim hi as date
hi= now

y el otro "terminar" tiene el codigo

dim hf as date, tiempo as integer
hf=now
tiempo = datediff("s",hi,hf)
msgbox "Tiempo: " & tiempo

esta muy sencillo, solo lo hice asi porque no puedo usar el comando, me marca un error que dice:

run-time error 6:
Overflow

lo que pasa es que estas declarando las variables para uso local(o sea solo de los procedimientos donde son usados), pureba hacer lo siguiente:

Dim Hi, Hf As Date
Dim Tiempo As Integer
Sub Iniciar()
Hi=Now
End Sub

Sub Terminar()
Hf=Now
Tiempo=DateDiff("s",Hi,Hf)
Msgbox "Tiempo: " & Tiempo
End Sub