B4J Question Format a time: got from a game a timevalue as Float

Dim secondsLeft As Double = FloatValueFromGame   'Casting to Double for better precision in math
Dim minutes As Int = secondsLeft/60
secondsLeft = secondsLeft - minutes*60
Dim seconds As Int = secondsLeft
secondsLeft = secondsLeft - seconds
Dim milliSeconds As Int = secondsLeft*1000       'I'm assuming you meant milliseconds since you specified 3 digits in the format
                         'Change 1000 to 1000000 if you really want microseconds, but you'll need more than
                         '3 digits to fully represent all possible microsecond values
Dim formattedString As String = NumberFormat2(minutes,2,0,0,False) & "." & NumberFormat2(seconds,2,0,0,False) & _
          "." & NumberFormat2(milliSeconds,3,0,0,False)
Log(formattedString)

    Dim hh, mm, ss As Int
    hh =  RTime/3600
    mm = (RTime mod 3600)/60
    ss = ((RTime mod 3600) mod 60)
    lblTime.Text = "Gesamtzeit: " &NumberFormat(hh,2,0) &"h "& NumberFormat(mm,2,0) &"m " '& NumberFormat(ss,2,0)&"s"