Atgriež Single vērtību, kas ietver nejaušu skaitli.
Sintakse
Rnd[(skaitlis)]
Neobligātais numursarguments ir Single vai jebkura derīga skaitliska izteiksme.
Atgrieztās vērtības
Ja skaitlis ir |
Ģenerē Rnd |
Mazāks par nulli |
Tas pats skaitlis katru reizi, izmantojot skaitli kā iedīglis. |
Lielāks par nulli |
Nākamais nejaušais skaitlis secībā. |
Vienāds ar nulli |
Pēdējais ģenerētais skaitlis. |
Nav nodrošināts |
Nākamais nejaušais skaitlis secībā. |
Piezīmes
Funkcija Rnd atgriež vērtību, kas ir mazāka par 1, bet lielāka vai vienāda ar nulli.
Skaitļa vērtība nosaka, kā Rnd ģenerē nejauši izvēlētu skaitli:
Jebkurai sākotnējai iedēklai tiek ģenerēta tā pati ciparu secība, jo katrs nākamais zvans uz funkciju Rnd izmanto iepriekšējo numuru kā nākamā skaitļa sietu secībā.
Pirms zvanāt Rnd, izmantojiet priekšrakstu Randomize bez argumenta, lai inicializētu gadījumskaitļa ģeneratoru ar sēji uz sistēmas taimeri.
Lai izveidotu gadījuma veselus skaitļus dotajā diapazonā, izmantojiet šo formulu:
Int((upperbound - lowerbound + 1) * Rnd + lowerbound)
Šeit augstākā robeža ir lielākais skaitlis diapazonā, un apakšējā skaitļa diapazons ir zemākais skaitlis.
Piezīme.: Lai atkārtotu nejauši izvēlētu skaitļu secību, izsaukiet Rnd ar negatīvu argumentu tieši pirms randomize izmantošanas ar skaitlisku argumentu. Izmantojot Randomize ar to pašu skaitļa vērtību, iepriekšējā secība netiek atkārtota.
Vaicājuma piemērs
Izteiksme |
Rezultāti |
SELECT ProductSales.ProductID, Rnd([Discount]) AS RandomNumbers FROM ProductSales; |
Atgriež Produkta ID kopā ar nejauši izvēlētiem skaitļiem kolonnā RandomNumbers. |
VBA piemērs
Piezīme.: Turpmākajos piemēros redzama šīs funkcijas izmantošana Visual Basic for Applications (VBA) modulī. Lai iegūtu papildinformāciju par darbu ar VBA, nolaižamajā sarakstā atlasiet Uzziņas materiāli izstrādātājiem blakus meklēšanas lodziņam un ievadiet šajā lodziņā vienu vai vairākus vārdus.
Šajā piemērā izmantota funkcija Rnd , lai ģenerētu nejauši izvēlētu veselu skaitli no 1 līdz 6.
Dim MyValue
' Generate random value between 1 and 6. MyValue = Int((6 * Rnd) + 1)