Funkcija Rnd

Vraća vrijednost Single koja sadrži nasumični broj.

Sintaksa

Rnd[(broj)]

Neobavezni brojargument jedan je ili bilo koji valjani numerički izraz.

Povratne vrijednosti

Ako je broj

Rnd generira

Manje od nule

Isti broj svaki put, pomoću broja kao početni broj.

Veće od nule

Sljedeći slučajni broj u slijedu.

Jednako nuli

Posljednji generirani broj.

Nije isporučeno

Sljedeći slučajni broj u slijedu.

Napomene

Funkcija Rnd vraća vrijednost manju od 1, ali veće od ili jednako nuli.

Vrijednost broja određuje način na koji Rnd generira slučajni broj:

Za bilo koje početno sjeme, generira se isti numerički slijed jer svaki uzastopni pozivanje na funkciju Rnd koristi prethodni broj kao sjeme za sljedeći broj u slijedu.

Prije pozivanja Rnd-a, pomoću obrazloženje naredbe bez argumenta možete inicijalizirati generator slučajnih brojeva s sjemenkama na temelju sistemskog mjerača vremena.

Da biste stvorili slučajne cijele brojeve u zadanom rasponu, koristite ovu formulu:

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

Ovdje je najviši broj u rasponu, a na donjoj stranici je najniži broj u rasponu.

Napomena:  Da biste ponavljali sekvence nasumičnih brojeva, pozovite Rnd uz negativan argument neposredno prije korištenja nasumičnih brojčanih argumenata. Korištenje nasumičanih vrijednosti s istom vrijednošću za broj ne ponavlja prethodni slijed.

Primjer upita

Izraz

Rezultati

Odaberite ProductSales. Idproductid, Rnd ([popust]) kao Nasumični brojevi iz programa ProductSales;

Vraća ID proizvoda uz slučajne brojeve u nasumičnim brojevima stupaca.

Primjer VBA

Napomena: Primjeri koji slijede prikazuju korištenje te funkcije u modulu jezika Visual Basic for Applications (VBA). Da biste pronašli dodatne informacije o radu s VBA-om, na padajućem popisu uz stavku Traži odaberite stavku Referenca za razvojne inženjere pa unesite jedan ili više izraza u okvir pretraživanja.

U ovom se primjeru funkcija Rnd koristi za generiranje nasumične vrijednosti cijelih brojeva od 1 do 6.

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

Potrebna vam je dodatna pomoć?

Proširite svoje vještine korištenja sustava Office
Istražite osposobljavanje

Jesu li vam ove informacije bile korisne?

×