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
iReklama.cz - nový reklamní systém