Vrne podatkovni tip Število z enojno natančnostjo, ki vsebuje naključno število.
Sintaksa
Rnd[(število)]
Izbirna številkaargument ena ali katera koli veljavna številski izraz.
Vrednosti vrnitve
Če je število |
Rnd ustvari |
manjše kot nič |
Enako število vsakič, ko uporabite številko kot temeljna vrednost. |
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 poizvedbe
Izraz |
Rezultati |
SELECT ProductSales.ProductID, Rnd([Discount]) AS RandomNumbers FROM ProductSales; |
Vrne ID izdelka skupaj z naključnimi števili v stolpcu RandomNumbers. |
Primer VBA
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)