Funkcija Rnd

Vrne podatkovni tip Število z enojno natančnostjo, ki vsebuje naključno število.

Sintaksa

Rnd[(število)]

Izbirni argument število je število z enojno natančnostjo ali poljuben veljaven številski izraz.

Vrednosti vrnitve

Če je število

Rnd ustvari

manjše kot nič

Vsakič isto število z uporabo argumenta število kot osnovne vrednosti.

večje od nič

Naslednje naključno število v zaporedju.

je enako nič

Zadnje ustvarjeno število.

Ni navedeno

Naslednje naključno število v zaporedju.


Opombe

Funkcija Rnd vrne vrednost, manjšo od 1, vendar večjo ali enako nič.

Vrednost argumenta število določa, kako funkcija Rnd ustvari naključno število:

Za vse dane začetne temeljne vrednosti se ustvari isto številsko zaporedje, zato ker vsak naslednji priklic funkcije Rnd uporabi prejšnjo številko za temeljno vrednost v naslednjem številskem zaporedju.

Preden prikličete funkcijo Rnd, uporabite izjavo Randomize brez argumenta za inicializacijo generatorja naključnih števil s temeljno vrednostjo glede na sistemski časovnik.

Za ustvarjanje naključnih celih števil v določenem obsegu, uporabite to formulo:

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

Tukaj je upperbound najvišje število v obsegu celic in lowerbound najmanjše število v obsegu.

Opomba :  Za ponovitev zaporedij naključnih števil, prikličite funkcijo Rnd z negativnim argumentom neposredno pred uporabo izjave Randomize s številskim argumentom. Z uporabo izjave Randomize z enako vrednostjo za število se ne bo ponovilo prejšnje zaporedje.

Primer

Opomba : V spodnjih primerih je prikazana uporaba te funkcije v modulu Visual Basic for Applications (VBA). Če želite več informacij o delu z modulom VBA, izberite Vsebina za razvijalce na spustnem seznamu ob možnosti Iskanje in v iskalno polje vnesite enega ali več izrazov.

V tem primeru se funkcija Rnd uporablja za ustvarjanje naključne vrednosti celih števil od 1 do 6.

Dim MyValue
' Generate random value between 1 and 6.
MyValue = Int((6 * Rnd) + 1)
Razširite svoja znanja
Oglejte si izobraževanje
Prvi dobite nove funkcije
Pridružite se programu Office Insider

Vam je bila informacija v pomoč?

Zahvaljujemo se vam za povratne informacije.

Zahvaljujemo se vam za povratne informacije. Videti je, da bi vam prišla prav pomoč enega od naših Officeovih agentov za podporo.

×