ZjiÜt∞nφ poΦtu Φφslic v Φφsle

Private Function GetDigitCount(inValue As Double) As Integer 
   GetDigitCount = Int(Log(inValue) / Log(10)) + 1
End Function

Zp∞t