Sapere se la cifra delle unità di un numero è zero

Per sapere se la cifra delle unità di un qualsiasi numero è zero, si può adottare questa modalità:

Dim s As Single

s = 1234560 / 10

If Frac(s) > 0.0 Then Print Frac(s)