Public Function Frac(ByVal Number As Double) As Double
Returns the fractional (decimal) part. Ie: Frac(3.14159) returns .14159
SendDebug Frac(Pi) 'Prints 0.14159265358979312
SendDebug Frac(1.1) 'Prints 0.10000000000000009
SendDebug Frac(-3.3) 'Prints -0.2999999999999998