HELP With Elapsed Time in Form

[accessineedhelp]

Please see a screenshot of my form here:



http://i1111.photobucket.com/albums/...work1/form.jpg

I want the user to be able to click on the "Calculate" button, and then the text field of the "Elapsed Incident Time" shows how many hours, minutes, and seconds since the start and the end of the incident. I have the date and time separated as fields so that it looks nice for the user - does this complicate things?

What code do I put in for the "On event - click" for the calculate button? And how do I make it so the format comes out nice, in a way that makes sense (i.e. 33 hrs, 2 mins, 43 sec)????

HELP!! This is for work and I really need to finish it. I am really new to this so please explain to me what I have to do... as if I am three years old.

[ssanfu]

Yes, it will make it a little harder, but it can be done.
Try this: (UNTESTED)

you will need the code from
http://www.accessmvp.com/djsteele/Diff2Dates.html

(put the "Diff2Dates" function in a standard module)

Private Sub cmdDoCalc_Click()
   Dim dtStart As Date
   Dim dteEnd As Date

' combine the dates/times
   dtStart = DateValue(Me.StartDate) + TimeValue(Me.StartTime)
   dteEnd = DateValue(Me.EndDate) + TimeValue(Me.EndTime)


   ' the  function Diff2Dates is from    http://www.accessmvp.com/djsteele/Diff2Dates.html
   Me.Elapsed = Diff2Dates("dhns", dtStart, dteEnd)


End Sub

[accessineedhelp]

Wow it worked!!!!!! Thank you sooooo much I was really stressing about this!

Thanks thanks thanks!

[ssanfu]

Wonderful...
Are you ready to mark this solved?

[accessineedhelp]

Yes for sure I am! I just don't know how...

[ssanfu]

Toward the top of the page is a header that starts with "LinkBack", then "Thread Tools". Click on the down arrow next to "Thread Tools". The bottom selection is "Mark thread solved".

[accessineedhelp]

Done, thanks!