Zjištění počtu číslic v čísle
Funkce
:
Private Function GetDigitCount(inValue As Double) As Integer
GetDigitCount = Int(Log(inValue) / Log(10)) + 1
End Function
Zpět
Autor: The Bozena
iReklama.cz - nový reklamní systém