Find time difference

Hi folks

I want to find the time difference using vba. when the form is intialized then the starttime gets stored in textbox1 as follows:

textbox1.value=format(now,"hh:mm:ss")

The finish time is calculated when the enter button is clicked and is stored in variable t as follows:

dim t as date
t=format(now,"hh:mm:ss")

Now I am writing the following line of code to find time diff but it gives me type mismatch error:

dim b as date
b=t-textbox1.value

Can anyone please figure it out.

Thanks
Aman

Try to put this code at form initialization:

textbox1.value = Now - Date

then use this code at enter button click:

dim t as Double
t = Now - Date

and then to calculate difference you can use:

Dim b as Double, c as string
b = t - Textbox1.value
c = format (b, "hh:mm:ss")

Regards,
Antonio

Look at datediff (VBEditor, F1)

Thanks a lot Antonio. It works absolutely fine.