Applies ToAccess za Microsoft 365 Access 2024 Access 2021 Access 2019 Access 2016

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

Sintaksa

Rnd[(broj)]

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

Vraćanje vrijednosti

Ako je broj

Rnd generira

Manje od nule

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

Veće od nule

Sljedeći slučajni broj u nizu.

Jednako nuli

Zadnji generirani broj.

Nije isporučeno

Sljedeći slučajni broj u nizu.

Napomene

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

Vrijednost broja određuje kakoRnd generira slučajni broj:

Za bilo koje početno sjeme generira se isti niz brojeva jer svaki uzastopni poziv funkciji Rnd koristi prethodni broj kao sjeme za sljedeći broj u nizu.

Prije nego što nazovete Rnd,upotrijebite naredbu Slučajni slučajni broj bez argumenta da biste inicijalizirali generator slučajnog broja pomoću sjemenja na temelju mjerača vremena sustava.

Da biste dobili slučajne cijele brojeve u danom rasponu, koristite ovu formulu:

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

Ovdje je gornji broj najveći broj u rasponu, a donji je najniži broj u rasponu.

Napomena:  Da biste ponovili nizove slučajnih brojeva, nazovite Rnd negativnim argumentom neposredno prije korištenja randomiziranog broja s brojčanim argumentom. Korištenje slučajne pogreške s istom vrijednošću za broj ne ponavlja prethodni niz.

Primjer upita

Izraz

Rezultati

SELECT ProductSales.ProductID, Rnd([Popust]) AS RandomNumbers FROM ProductSales;

Vraća ID proizvoda zajedno sa slučajnim brojevima u stupcu RandomNumbers.

VBA primjer

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 koristi funkcija Rnd za generiranje slučajne cjelobrojne vrijednosti od 1 do 6.

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

Potrebna vam je dodatna pomoć?

Želite dodatne mogućnosti?

Istražite pogodnosti pretplate, pregledajte tečajeve za obuku, saznajte kako zaštititi uređaj i još mnogo toga.

Zajednice vam pomažu da postavljate pitanja i odgovarate na njih, pošaljete povratne informacije i čujete se sa stručnjacima s bogatim znanjem.