Rand
Integer = Rand ( Min [ , Max ] )
Calcula um número inteiro pseudo aleatórios.
  - 
Se um parâmetro for especificado, retorna um número pseudo aleatório no intervalo [ 0, Min ].
- 
Se ambos os parâmetros são especificados, devolve um número pseudo aleatório no intervalo [ Min , Max ].
Ao contrário de 
Rnd, o valor máximo do intervalo pode ser retornado.
Exemplos
' Entre 0 e 2
Print Rand(2)
2
' Entre 1 e 10
Print Rand(1, 10)
3
Public Sub Main()
  Dim Dice AS Integer
  Randomize
  Dice = Rand(1, 6)
  ' Lança o dado entre 1 e 6
  Print "Você jogou um " & dice
End
Veja também