Zwraca wartość typu Pojedyncza precyzja, zawierającą liczbę losową.
Składnia
Rnd[(liczba)]
Opcjonalny numerargument to pojedynczy lub dowolny prawidłowy wyrażenie numeryczne.
Zwracane wartości
Jeśli argument liczba jest |
Generuje Rnd |
Mniej niż zero |
Ta sama liczba za każdym razem, przy użyciu liczby co inicjator. |
Większe niż zero |
Następna liczba losowa w sekwencji. |
Równa zero |
Ostatnio wygenerowany numer. |
Nie dostarczono |
Następna liczba losowa w sekwencji. |
Uwagi
Funkcja Rnd zwraca wartość mniejszą niż 1, ale większą niż lub równą zero.
Wartość liczby określa sposób generowania liczby losowej przez funkcję Rnd :
Dla każdego początkowego materiału siewnego jest generowana ta sama sekwencja numerów, ponieważ każde kolejne wywołanie funkcji Rnd używa poprzedniego numeru jako elementu siewnego dla następnego numeru w sekwencji.
Przed wywołaniem Rnd użyj instrukcji Randomize bez argumentu, aby zainicjować generator liczb losowych z materiałem siewnym opartym na czasomierzu systemowym.
Aby uzyskać losowe liczby całkowite w danym zakresie, użyj następującej formuły:
Int((upperbound - lowerbound + 1) * Rnd + lowerbound)
W tym miejscu najwyższą liczbą w zakresie jest ruch górny , a dolna — najmniejsza liczba w zakresie.
Uwaga: Aby powtórzyć sekwencje liczb losowych, wywołaj Rnd z argumentem ujemnym bezpośrednio przed użyciem funkcji Randomize z argumentem liczbowym. Użycie funkcji Randomize z tą samą wartością liczby nie powoduje powtórzenia poprzedniej sekwencji.
Przykład kwerendy
Expression |
Wyniki |
SELECT ProductSales.ProductID, Rnd([Discount]) AS RandomNumbers FROM ProductSales; |
Zwraca identyfikator produktu wraz z liczbami losowymi w kolumnie RandomNumbers. |
Przykład języka VBA
Uwaga: Poniższe przykłady przedstawiają sposób użycia tej funkcji w module języka Visual Basic for Applications (VBA). Aby uzyskać dodatkowe informacje na temat pracy w języku VBA, wybierz pozycję Dokumentacja dewelopera z listy rozwijanej obok przycisku Wyszukaj i wprowadź odpowiednie terminy w polu wyszukiwania.
W tym przykładzie użyto funkcji Rnd w celu wygenerowania losowej wartości całkowitej z zakresu od 1 do 6.
Dim MyValue
' Generate random value between 1 and 6. MyValue = Int((6 * Rnd) + 1)