Funzione Rnd

Restituisce un numero casuale tra 0 e 1.

Sintassi:

Rnd [(Espressione)]

Valore restituito:

Double

Parametri:

Espressione: non ha effetto, se fornita sarà ignorata.

La funzione Rnd restituisce le frazioni decimali da 0 (incluso) a 1 (escluso) in base a una distribuzione uniforme. Utilizza il generatore casuale Mersenne Twister 19937. Per generare interi casuali in un intervallo specificato, utilizza la formula come nell'esempio sotto. In anticipo, può essere utilizzata un'istruzione Randomize con un valore di popolamento definito, se è richiesta una sequenza prevedibile di numeri.

Codici di errore:

5 Richiamo di procedura non valido

Esempio:

Sub ExampleRandomSelect

Dim iVar As Integer

    iVar = Int((15 * Rnd) -2)

    Select Case iVar

        Case 1 To 5

            Print "Numero da 1 a 5"

        Case 6, 7, 8

            Print "Numero da 6 a 8"

        Case Is > 8 And iVar < 11

            Print "Maggiore di 8"

        Case Else

            Print "Al di fuori dell'intervallo 1-10"

    End Select

End Sub