User Form

[Sandy Radjenovic]

I have a User Form where the following is entered:

Start Date & Start Time
End Date & End Time

I would like to include an additional calculated field in the form which will display the variance in time between the two.

How would I insert this calculated field into the form?

Any insight would be great!

 

[giacomo]

you can use the change event on your start_time and end_time fields to call a function that calculates the difference and places it into your elapsed time field.

Private Sub end_time_Change()
If start_time <> vbNullString Then
elapsed_time = getDiff
End If
End Sub

Function getDiff() As String
' This will give you the hours difference
diff = DateDiff("h", CDate(start_time), CDate(end_time))

getDiff = diff & " Hours"
End Function

 

[Sandy Radjenovic]

Thanks alot for the heads up. I was able to get this to work. Was playing with the events on the wrong text field.