Returnerer en enkelt, der indeholder et vilkårligt tal.
Syntaks
Rnd[(tal)]
Det valgfrie talargumenter et enkelt eller et gyldigt numerisk udtryk.
Returværdier
| Hvis tal er | Rnd genererer |
|---|---|
| Mindre end nul | Det samme tal hver gang med tal som frø. |
| Større end nul | Det næste tilfældige tal i sekvensen. |
| Lig med nul | Det senest genererede tal. |
| Leveres ikke | 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 et givet startbasistal genereres den samme talserie, fordi hvert efterfølgende kald til funktionen Rnd bruger det forrige tal som et basistal for det næste tal i sekvensen.
Før du kalder Rnd, skal du bruge sætningen Randomize uden et argument til at initialisere random-number generatoren med et seed baseret på systemtimeren.
Hvis du vil frembringe tilfældige heltal i et givet område, skal du bruge denne formel:
Int((upperbound - lowerbound + 1) * Rnd + lowerbound)
Her er øvre grænse det højeste tal i området, og nedre grænse 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 du bruger Tilfældig med et numerisk argument. Hvis du bruger Tilfældigt 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)