Funktsioon Rnd

Tagastab juhuslikku arvu sisaldava lihttäpsusega arvu.

Süntaks

Rnd[(number)]

Valikuline argument number on lihttäpsusega arv või mis tahes sobiv arvuline avaldis.

Tagastusväärtused

Arv

Rnd genereeritud tulem

Väiksem kui null

Iga kord sama arv, kasutades argumenti number lähteväärtusena.

Suurem kui null

Järjekorras järgmine juhuslik arv.

Võrdne nulliga

Viimati genereeritud arv.

Pole sisestatud

Järjekorras järgmine juhuslik arv.


Kommentaarid

Funktsioon Rnd tagastab väärtuse, mis on väiksem kui 1, kuid suurem kui null või võrdne nulliga.

Argumendi number väärtus määrab selle, kuidas funktsioon Rnd genereerib juhusliku arvu.

Kõigi sisestatud algsete lähteväärtuste korral genereeritakse sama arvujärjestus, kuna funktsiooni Rnd iga järgmise kutse korral kasutatakse eelmist arvu järjekorras järgmise arvu lähteväärtusena.

Enne funktsiooni Rnd kutsumist kasutage ilma argumendita lauset Randomize, et lähtestada juhusliku arvu generaator süsteemiajastil põhineva lähteväärtusega.

Määratud vahemikus juhuslike täisarvude genereerimiseks kasutage järgmist valemit:

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

Siin on argument upperbound vahemiku suurim arv ja argument lowerbound vahemiku väikseim arv.

Märkus. :  Juhuslike arvude järjestuse kordamiseks kutsuge negatiivse argumendiga funktsioon Rnd vahetult enne arvargumendiga lause Randomize kasutamist. Lause Randomize kasutamine argumendi number sama väärtusega ei korda eelmist järjestust.

Näide

Märkus. : Järgmised näited kujutavad selle funktsiooni kasutamist rakenduse Visual Basic for Applications (VBA) moodulis. Lisateabe saamiseks VBA-ga töötamise kohta valige välja Otsing kõrval kuvatavast ripploendist väärtus Tootearendusmaterjal ja sisestage otsinguväljale üks või mitu sõna.

Selles näites kasutatakse funktsiooni Rnd vahemikku 1–6 jääva juhusliku täisarvu genereerimiseks.

Dim MyValue
' Generate random value between 1 and 6.
MyValue = Int((6 * Rnd) + 1)
Täiendage oma oskusi
Tutvuge koolitusmaterjalidega
Kasutage uusi funktsioone enne teisi
Liituge Office Insideri programmiga

Kas sellest teabest oli abi?

Täname tagasiside eest!

Täname tagasiside eest! Tundub, et võiksime teid kokku viia ühega meie Office'i tugiagentidest, kes aitab teil probleemi lahendada.

×