randomize
'rnd restituisce 1 numero decimale casuale tra 0 e 1
msgbox int(10*rnd)+1