Rnd Function

Nagbabalik ng random na numero sa pagitan ng 0 at 1.

Syntax:


Rnd [(Expression)]

Ibinalik na halaga:

Double

Mga Parameter:

Expression: Walang epekto, hindi pinapansin kung ibinigay.

Ang Rnd function ay nagbabalik ng mga decimal fraction mula 0 (kasama) hanggang 1 (ibinukod) ayon sa isang pare-parehong pamamahagi. Ginagamit nito ang Mersenne Twister 19937 random-number generator. Upang makabuo ng mga random na integer sa isang ibinigay na hanay, gumamit ng formula tulad ng sa halimbawa sa ibaba. A I-randomize Ang pahayag na may tinukoy na halaga ng binhi ay maaaring gamitin muna, kung ang isang predictable sequence ng mga numero ay ninanais.

Mga error code:

5 Di-wastong procedure call

Halimbawa:


Sub ExampleRandomSelect
Dim iVar As Integer
    iVar = Int((15 * Rnd) -2)
    Select Case iVar
        Case 1 To 5
            I-print ang "Numero mula 1 hanggang 5"
        Case 6, 7, 8
            I-print ang "Numero mula 6 hanggang 8"
        Case Is > 8 And iVar < 11
            I-print ang "Higit sa 8"
        Case Else
            I-print ang "Sa labas ng hanay 1 hanggang 10"
    End Select
End Sub

Randomize na Pahayag