Pateikia reikšmę Viengubas, kurioje yra atsitiktinis skaičius.
Sintaksė
Rnd[(skaičius)]
Pasirinktinis skaičiausargumentas yra viengubas arba bet kuris galiojantis skaitinis reiškinys.
Pateikiamos reikšmės
| Jei skaičius yra | Rnd generuoja |
|---|---|
| Mažiau nei nulis | Kiekvieną kartą tas pats skaičius, naudojant skaičių kaip sėklą. |
| Daugiau nei nulis | Kitas atsitiktinis skaičius sekoje. |
| Lygu nuliui | Naujausias sugeneruotas skaičius. |
| Nepridedama | Kitas atsitiktinis skaičius sekoje. |
Pastabos
Funkcija Rnd grąžina reikšmę, mažesnę nei 1, bet didesnę arba lygią nuliui.
Skaičiaus reikšmė lemia, kaip Rnd generuoja atsitiktinį skaičių:
Kiekvienai nurodytai pradinei sėklai sugeneruojama ta pati skaičių seka, nes kiekvienas paskesnis funkcijos Rnd iškvietimas naudoja ankstesnį numerį kaip kito sekos skaičiaus pradinę vietą.
Prieš iškviesdami Rnd, naudokite sakinį Atsitiktinė funkcija be argumento, kad inicijuotumėte atsitiktinių skaičių generatorių naudodami sėkla, pagrįstą sistemos laikmačiu.
Norėdami duotame diapazone gauti atsitiktinius sveikuosius skaičius, naudokite šią formulę:
Int((upperbound - lowerbound + 1) * Rnd + lowerbound)
Čia viršutinė riba yra didžiausias diapazono skaičius, o apatinė riba yra mažiausias diapazono skaičius.
Pastaba
Norėdami kartoti atsitiktinių skaičių sekas, iškvieskite Rnd su neigiamu argumentu prieš naudodami atsitiktinį nustatymą su skaitiniu argumentu. Naudojant atsitiktinį nustatymą su ta pačia skaičiaus reikšme, ankstesnė seka nekartojama.
Užklausos pavyzdys
| Išraiška | Rezultatai |
|---|---|
| SELECT ProductSales.ProductID, Rnd([Discount]) AS RandomNumbers FROM ProductSales; | Pateikia produkto ID kartu su atsitiktiniais skaičiais stulpelyje RandomNumbers. |
VBA pavyzdys
Pastaba
Pateiktuose pavyzdžiuose parodyta, kaip naudoti šią funkciją „Visual Basic for Applications“ (VBA) modulyje. Daugiau informacijos apie darbą su VBA rasite išplečiamajame sąraše pasirinkę Kūrėjų nuoroda (šalia Ieškos) ir ieškos lauke įvedę vieną ar daugiau sąlygų.
Šiame pavyzdyje naudojama funkcija Rnd , kad būtų sugeneruota atsitiktinė sveikojo skaičiaus reikšmė nuo 1 iki 6.
Dim MyValue
' Generate random value between 1 and 6.
MyValue = Int((6 * Rnd) + 1)