volevo vedere se qualcuno se ne accorgeva

bDispari=CBool(iNumero mod 2)