sintassi:
Int ((valoremassimo - valoreminimo + 1) * Rnd + valoreminimo)
esempio: fornisce un numero intero compreso tra 1 e 100
Randomize Timer
Int ((100 - 1 + 1) * Rnd + 1)
esempio: a seconda se viene 0 o 1 assegna il valore alla variabile
Dim variabile
Randomize Timer
If Int(2 * Rnd) = 0 Then
variabile = "zero"Else
variabile = "uno"End If