Pređi na glavni sadržaj

Funkcija „Rnd”

Daje tip podataka Jednostruki koji sadrži nasumični broj.

Sintaksa

Rnd [broj)]

Opcionalni brojargument predstavlja jedan ili bilo koji važeći brojni izraz.

Vraćene vrednosti

Ako je broj

Rnd generiše

Manje od nule

Isti broj svaki put, koristeći broj kao početna vrednost.

Veće od nule

Sledeći slučajni broj u nizu.

Jednako nula

Poslednji generisan broj.

Nije isporučeno

Sledeći slučajni broj u nizu.

Napomene

Funkcija Rnd vraća vrednost manju od 1, ali veću ili jednaku nuli.

Vrednost broja određuje kako Rnd generiљe nasumični broj:

Za bilo koje dato inicijalno Seme, generiše se isti sekvenc brojeva zato što svaki sledeći poziv funkcije Rnd koristi prethodni broj kao seme za sledeći broj u nizu.

Pre nego što pozovete Rnd, koristite listu Randomize bez argumenta argument da biste pokrenuli generator slučajnog broja sa semenom na osnovu sistemskog tajmera.

Da biste proizvodili nasumične brojeve u datom opsegu, koristite ovu formulu:

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

Ovde je gornji broj najveći broj u opsegu, a lowerna je najniži broj u opsegu.

Napomena:  Da biste ponovili sekvence nasumičnih brojeva, pozovite Rnd sa negativnim argumentom neposredno pre korišćenja Randomize sa numeričkim argumentom. Korišćenje stavke Randomize sa istom vrednošću za broj ne ponavlja prethodni redosled.

Primer upita

Izraz

Rezultati

Izaberite stavke Proizvođivanje. ProductID, Rnd ([popust]) kao Nasumimbrojevi iz proizvoda proizvodi;

Daje ID proizvoda zajedno sa nasumičnim brojevima u kolonama nasumičnih brojeva.

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 vrednosti celog broja od 1 do 6.

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

Napomena:  Ova stranica je prevedena automatski i može da sadrži gramatičke greške ili netačnosti. Naš cilj je da ovaj sadržaj bude koristan. Možete li da nam javite da li su informacije bile korisne? Ovo je članak na engleskom jeziku za referencu.​

Razvijte Office veštine
Istražite obuku
Prvi nabavite nove funkcije
Pridružite se Office Insider korisnicima

Da li su vam ove informacije koristile?

Hvala vam na povratnim informacijama!

Hvala za povratne informacije! Izgleda da će biti od pomoći ako vas povežemo sa našim agentima Office podrške.

×