Can this be condesed to one line???

aduration = Int(ms / 1000)
bduration = aduration Mod 60 'calculates secs
cduration = (aduration - bduration) / 60 'calculates mins
Duration = cduration & ":" & bduration


This code uses the Mod function to convert seconds to Minutes and seconds. However, I need all of this in just on line for what duration =.... can this be condensed?

Dont mind me, im still awake at 6am (no sleep in 2 days) and im being powered by a bottle of CocaCola...

I dident test this out, but i think (if the coca cola is doin its job) that this will do it.

Duration = (int(ms / 1000) - (int(ms / 1000) mod 60) / 60) & ":" & int(ms / 1000) mod 60

Duration = (int(ms / 1000) - (int(ms / 1000) mod 60) / 60) & ":" & (int(ms / 1000) mod 60)

Same thing, but i put a cuple extra brackets in their. Probably wont effect the outcome, but just for the hell of it... (and an extra post on my score!)

Why? Your original solution is much more performnace efficient.

If you want best perfomance, the ultimate solution is:

aduration = ms \ 1000
bduration = aduration Mod 60 'calculates secs
cduration = aduration \ 60 'calculates mins

well, with my marks in my math class, im just glad it actualy worked... lol


To the starter of the thread... if this post was related to your other post, heres the solution to it...

(damn, i should lay off the brackets ;D (yes, i know i use them too much (heh (its how i think things thru easyer))))

Private Sub Form_Load()
MsgBox (((TimeInSeconds - (TimeInSeconds Mod 60)) / 60) & ":" & (TimeInSeconds Mod 60))
End Sub