VB Function to convert Decimal to Elapsed Time [h]:mm:ss (like in Excel)?

[yarbrough40]

Can anyone help me to display a Decimal (or double) to elapsed time [h]:mm:ss (hours:minutes: seconds)using vb.net?
example:
if you were to type "1.346666666666 67" into a cell in Excel then choose Custom Format [h]:mm:ss The result is an elapsed time of "32:19:12". Using the OADate function only runs on a 24 hour clock so this does not work for longer durations unfortunately.. .

[yarbrough40]

ok so I figured it out with math I don't normally have patience for so in case anyone cares... I created these two simple functions produce the result

Private Function ElapsedTime(ByVal DNum As Double) As String
 
        Dim hh, mm, ss As Integer
        Dim _hh, _mm, _ss As Double
 
        _hh = DNum * 24
        hh = Math.Truncate(_hh)
 
        _mm = DecimalPart(_hh) * 60
        mm = Math.Truncate(_mm)
 
        _ss = DecimalPart(_mm) * 60
        ss = Math.Truncate(_ss)
 
 
        ElapsedTime = hh & ":" & mm & ":" & ss
 
        Return ElapsedTime
    End Function
 

Private Function DecimalPart(ByVal nbr As Decimal) As Double
 
        Dim wholePart, fractionalPart As Decimal
 
        wholePart = Math.Truncate(nbr)
        fractionalPart = nbr - wholePart
 
        DecimalPart = fractionalPart
        Return DecimalPart
 
    End Function
 

[iam_clint]

You can use a stopwatch to do elapsed time...

Can you explain better what you are actually trying to accomplish

[iam_clint]

i'm sure there is a better way to accomplish what you are actually trying to get can you get a little more detail on what you are doing

[yarbrough40]

I litterally have a database with elapsed times (in double format) so I have no need to use a stopwatch since I already have the elapsed times. I simply need to display those elapsed times on the page in the format of [h]:mm:ss

the functions I wrote do work. if u have a better suggestion that would be excellent, however I don't believe there is an existing function for this...

example: 1.3466666666666 7
A) multiply the entire decimal by 24 (the whole part of the answer is hours) = 32
B) multiply the entire decimal from (A) and multiply it by 60(the whole part is the minutes) = 19
C) multiply the entire decimal from (B) and multiply it by 60(the whole part is the seconds) = 12

put em all together separated by ":" and there u have it
"32:19:12"