Fonction Rnd

Renvoie un nombre aléatoire entre 0 et 1.

Syntaxe :

Rnd [(Expression)]

Valeur de retour :

Double

ParamĂštres :

Expression : N'a aucun effet, est ignorée.

La fonction Rnd renvoie des nombres compris entre 0 (inclus) et 1 (exclus) rĂ©partis selon une distribution uniforme. Elle utilise le gĂ©nĂ©rateur de nombres alĂ©atoires Mersenne Twister 19937. Pour gĂ©nĂ©rer des entiers alĂ©atoires dans une plage donnĂ©e, utilisez une formule semblable Ă  celle de l'exemple ci-dessous. Une instruction Randomize avec une graine dĂ©finie peut ĂȘtre utilisĂ©e prĂ©alablement si une sĂ©quence de nombres prĂ©visible est souhaitĂ©e.

Codes d'erreur :

5 appel de procédure incorrect

Exemple :

Sub ExampleRandomSelect

Dim iVar As Integer

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

    Select Case iVar

        Case 1 To 5

            Print "Nombre entre 1 et 5"

        Case 6, 7, 8

            Print "Nombre entre 6 et 8"

        Case Is > 8 And iVar < 11

            Print "Supérieur à 8"

        Case Else

            Print "En dehors de la plage 1 Ă  10"

    End Select

End Sub