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

Aidez-nous !