DateDiff Hoours and Minutes (1 Viewer)

[ddrew]

Can somebody please show me where I'm going wriong here. Im trying to calculate the number of hours and minutes that have passed.

Me.ElapsedTime = DateDiff("h", EventStartTime.Column(1), EventTinishTime.Column(1))

With this it rounds down to the nearest hour, I wnat to show hours and minutes. I know I have to put"n" in there somewhere, just not shure where!

 

[gemma-the-husky]

i presume this will work

do date diff with a n qualifier (n=minutes, not m=month)

this should give you the total minutes.

now elapsed hours will be minutes/60
elapsed minutes will be minutes mod 60

 

[vbaInet]

now elapsed hours will be minutes/60
elapsed minutes will be minutes mod 60

Post #1 (without the IIF()) shows you how this is implemented:

http://www.access-programmers.co.uk/forums/showthread.php?t=216449

 

[ddrew]

i presume this will work

do date diff with a n qualifier (n=minutes, not m=month)

this should give you the total minutes.

now elapsed hours will be minutes/60
elapsed minutes will be minutes mod 60

Humm, somethings not right! If I set the EventStartTime at 10:00 and the EventFinishTime as 11:15 I get 1.25 which is right as an equation but not as elapsed time

 

[gemma-the-husky]

yes it is - you are evaluating hours

1hr 15mins is 1.25 hours.

-----
as i said, evaluate minutes - then you will get 75

 

[ddrew]

yes it is - you are evaluating hours

1hr 15mins is 1.25 hours.

-----
as i said, evaluate minutes - then you will get 75

OK, clearly I'm not understanding at the minute! This is my code now

Me.ElapsedTime = DateDiff("h", EventStartTime.Column(1), EventTinishTime.Column(1))

asnd as you said I get 75, thats fine. But I want it to show 1.15

 

[gemma-the-husky]

and i said, you need to get the 75 minutes -

then you can show the hours and minutes

totalminutes = datediff ("n", etc)

elapsedtime = totalminutes/60 & ":" & totalminutes mod 60
or maybe
elapsedtime = int(totalminutes/60) & ":" & totalminutes mod 60

 

[ddrew]

and i said, you need to get the 75 minutes -

then you can show the hours and minutes

totalminutes = datediff ("n", etc)

elapsedtime = totalminutes/60 & ":" & totalminutes mod 60
or maybe
elapsedtime = int(totalminutes/60) & ":" & totalminutes mod 60

Think I understand. I created an Unbound TextBox to hold the totalminutes (not sure if that was the right thing to do or not) then built in:

 Me.ElapsedTime = Me.totalminutes / 60 & ":" & totalminutes Mod 60

the result that I got was. 1.25:15 So I used

elapsedtime = int(totalminutes/60) & ":" & totalminutes mod 60

and I got 1:15

 

[ddrew]

One furthur thing, how should I deal with situations when the time goes past 00:00 i.e Start time 20:30 Finish time 00:30 at the minute I get -20:0 for that!

 

[r.harrison]

Hi,

You would need to use an if statement.

if StartTime > Finishtime then elapsedtime=elapsedtime+24

or something similar.