CONTARE CIFRE IN UNA STRINGA

Ecco a voi un interessante trucco per contare le cifre in una stringa con
Visual Basic oppure con ASP/VBscript.

Supponendo di avere un variabile A di tipo intero, ci assegnamo un valore 1245 e poi utilizziamo la funzione length su di essa, otterremo magicamente il valore 4 come risultato!

DIM A AS INTEGER
A=1245
DIM B AS INTEGER
B=Len(A)

Un esempio di implementazione di una banale funzione per contare.

In Visual Basic si ha:

Function ContaCifre(NUM AS VARIANT) AS INTEGER
 ContaCifre=Len(NUM)
End Function  

In ASP/VBScript si ha:

Function ContaCifre(NUM)
 ContaCifre=Len(NUM)
End Function  

(B) sarà uguale a 4 cioè il numero di cifre del valore in A!


Giovanni Ceglia
giovanniceglia@xungame.com