Returnerer en enkelt, der indeholder et vilkårligt tal.
Syntaks
Rnd[(tal)]
Det valgfrie talargument er en Enkelt eller en gyldig numerisk udtryk.
Returværdier
|
Hvis tal er |
Rnd genererer |
|
Mindre end nul |
Det samme tal hver gang ved hjælp af tal som basistal. |
|
Større end nul |
Det næste tilfældige tal i sekvensen. |
|
Lig med nul |
Det senest oprettede nummer. |
|
Ikke angivet |
Det næste tilfældige tal i sekvensen. |
Bemærkninger
Funktionen Rnd returnerer en værdi, der er mindre end 1, men større end eller lig med nul.
Værdien af tal bestemmer, hvordan Rnd genererer et tilfældigt tal:
For en given startfrø genereres den samme nummerserie, fordi hvert efterfølgende kald til funktionen Rnd bruger det forrige nummer som en frø til det næste nummer i sekvensen.
Før du kalder Rnd, skal du bruge Randomize-sætningen uden et argument til at initialisere generatoren for tilfældige tal med et frø baseret på systemtimeren.
Hvis du vil oprette tilfældige heltal i et givet område, skal du bruge denne formel:
Int((upperbound - lowerbound + 1) * Rnd + lowerbound)
Her er upperbound det højeste tal i området, og nedre er det laveste tal i området.
Bemærk!: Hvis du vil gentage sekvenser af tilfældige tal, skal du kalde Rnd med et negativt argument umiddelbart før brug af Randomize med et numerisk argument. Hvis du bruger Randomize med den samme værdi for tal , gentages den forrige sekvens ikke.
Eksempel på forespørgsel
|
Udtryk |
Resultater |
|
SELECT ProductSales.ProductID, Rnd([Discount]) AS RandomNumbers FROM ProductSales; |
Returnerer produkt-id'et sammen med tilfældige tal i kolonnen RandomNumbers. |
VBA-eksempel
Bemærk!: Følgende eksempler demonstrerer brugen af denne funktion i et VBA-modul (Visual Basic for Applications). Hvis du vil have mere at vide om at arbejde med VBA, skal du vælge Udviklerreference på rullelisten ud for Søg og skrive ét eller flere ord i søgefeltet.
I dette eksempel bruges funktionen Rnd til at generere en tilfældig heltalsværdi fra 1 til 6.
Dim MyValue' Generate random value between 1 and 6.MyValue = Int((6 * Rnd) + 1)
