Daje tip podataka Jednostruki koji sadrži nasumični broj.
Sintaksa
Rnd[(broj)]
Opcionalni argument brojaje jedan ili bilo koji važeći numerički izraz.
Povratne vrednosti
| Ako je broj | Rnd generiše |
|---|---|
| Manje od nule | Isti broj svaki put, koristeći broj kao i početna vrednost. |
| Veće od nule | Sledeći nasumični broj u nizu. |
| Jednako nuli | Poslednje generisan broj. |
| Nije obezbeđeno | Sledeći nasumični broj u nizu. |
Napomene
Funkcija Rnd daje vrednost manju od 1, ali veću ili jednaku nuli.
Vrednost broja određuje kako će Rnd generisati nasumični broj:
Za bilo koje dato početno sekvence, generiše se ista sekvenca broja zato što svaki uzlazni poziv funkcije Rnd koristi prethodni broj kao početni broj za sledeći broj u nizu.
Pre pozivanja funkcije Rnd, koristite instancu Randomize bez argumenta da biste pokrenuli generator nasumičnih brojeva sa seedom zasnovanim na sistemskom tajmeru.
Da biste proizvedli nasumične cele brojeve u datom opsegu, koristite ovu formulu:
Int((upperbound - lowerbound + 1) * Rnd + lowerbound)
Ovde je gornji broj u opsegu, a donji je najniži broj u opsegu.
Napomena
Da biste ponovili sekvence nasumičnih brojeva, pozovite Rnd sa negativnim argumentom neposredno pre korišćenja nasumičnog argumenta sa numeričkim argumentom. Korišćenje nasumičnog sa istom vrednošću za broj ne ponavlja prethodnu sekvencu.
Primer upita
| Izraz | Rezultati |
|---|---|
| SELECT ProductSales.ProductID, Rnd([Discount]) AS RandomNumbers FROM ProductSales; | Daje ID proizvoda zajedno sa nasumičnim brojevima u koloni RandomNumbers. |
VBA primer
Napomena
Primeri koji slede pokazuju upotrebu ove funkcije u Visual Basic for Applications (VBA) modulu. Za više informacija o radu sa VBA modulom izaberite stavku Referenca razvojnog programera sa padajuće liste pored stavke Pretraga i unesite termine u polje za pretragu.
Ovaj primer koristi funkciju Rnd za generisanje nasumične celobrojne vrednosti od 1 do 6.
Dim MyValue
' Generate random value between 1 and 6.
MyValue = Int((6 * Rnd) + 1)