Funkcija RND

Svarbu :  Šis straipsnis išverstas naudojant mašininį vertimą, žr. atsakomybės atsisakymą. Su šio straipsnio versija anglų kalba galite susipažinti čia .

Grąžina į vieną su atsitiktinį skaičių.

Sintaksė

RND [(number)]

Pasirinktinis skaičiųargumentas yra vieną arba visus galioja skaitinis reiškinys.

Grąžina reikšmę

Jei skaičius yra

RND sukuria

Mažiau negu nulis

Tiek pat kiekvieną kartą, naudojant skaičius kaip pirminė reikšmė.

Didesnis už nulį

Kitame atsitiktinių skaičių seka.

Lygios nuliui

Labiausiai neseniai sukurtas skaičius.

Nepateiktas

Kitame atsitiktinių skaičių seka.


Pastabos

Funkcija Rnd grąžina reikšmę, mažiau nei 1, bet didesnis už arba lygus nuliui.

Skaičiaus reikšmę nustato, kaip Rnd sugeneruoja atsitiktinį skaičių:

Bet nurodyto pradinio pradinio, ta pati numeracija sugeneruojamas dėl kiekvieno vienas po kito einančių skambučio Rnd funkcijos naudoja ankstesnis kaip į pirminė reikšmė seka kitą numerį.

Prieš skambinant Rnd, inicijuoti atsitiktinių skaičių generatorius su į sistemos laikmatį pagal naudokite sakinio Randomize be argumentas.

Norėdami gauti atsitiktinį sveikųjų skaičių, nurodytą diapazone, naudokite šią formulę:

Int((upperbound - lowerbound + 1) * Rnd + lowerbound)

Čia, viršutinės yra didžiausią skaičių diapazone, ir apatinis yra mažiausią skaičių diapazone.

Pastaba : Norėdami pakartoti sekos atsitiktinį skaičių, skambučių Rnd su neigiama argumentas prieš naudojant Randomize su argumentu. Naudojant Randomize su tokia pačia reikšme skaičių kartoti ankstesnį seka.

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 sugeneruoti atsitiktinį sveikojo skaičiaus reikšmę nuo 1 iki 6.

Dim MyValue
' Generate random value between 1 and 6.
MyValue = Int((6 * Rnd) + 1)

Pastaba : Mašininio vertimo atsakomybės atsisakymas: Šis straipsnis išverstas naudojant kompiuterinę sistemą be žmogaus įsikišimo. „Microsoft“ pateikia šiuos mašininius vertimus norėdama padėti anglų kalbos nesuprantantiems vartotojams perskaityti turinį apie „Microsoft“ produktus, paslaugas ir technologijas. Šis straipsnis išverstas mašininio vertimo būdu, todėl jame gali būti žodyno, sintaksės ar gramatikos klaidų.

Tobulinkite savo įgūdžius
Ieškoti mokymo
Pirmiausia gaukite naujų funkcijų
Prisijunkite prie „Office Insider“ dalyvių

Ar ši informacija buvo naudinga?

Dėkojame už jūsų atsiliepimus!

Dėkojame už jūsų atsiliepimą! Panašu, kad gali būti naudinga jus sujungti su vienu iš mūsų „Office“ palaikymo agentų.

×