Dim mins As Int = 800
Dim H As Int
Dim M As Int
H = mins/60
M = mins Mod 60
Log(M)
Log(NumberFormat(H,2,0) & ":" & NumberFormat(M,2,0))
Log(MinutesToTime(800))
Dim test As Float = 800
Log(MinutesToTime(test))
Dim dTest As Double = 800
Log(MinutesToTime(dTest))