Возвращает значение типа Single, содержащее случайное число.
Синтаксис
Rnd[(число)]
Необязательный аргумент numberявляется одним или любым допустимым числовым выражением.
Возвращаемые значения
| Значение аргумента "число" | Результат функции Rnd |
|---|---|
| Меньше нуля | Одно и то же число каждый раз, используя число в качестве начального значения. |
| Больше нуля | Следующее случайное число в последовательности. |
| Равно нулю | Последнее созданное число. |
| Не задано | Следующее случайное число в последовательности. |
Замечания
Функция Rnd возвращает значение меньше 1 и не меньше нуля.
Значение числа определяет, как Rnd создает случайное число:
Для любого заданного начального значения генерируется одна и та же последовательность чисел, поскольку при каждом последующем вызове функции Rnd в качестве начального значения для следующего числа в последовательности используется предыдущее число.
Перед вызовом Rnd используйте оператор Randomize без аргумента, чтобы инициализировать генератор случайных чисел с начальным значением на основе системного таймера.
Для генерации случайных целых чисел в заданном диапазоне используется следующая формула:
Int((upperbound - lowerbound + 1) * Rnd + lowerbound)
где upperbound — наибольшее, а lowerbound — наименьшее число в диапазоне.
Примечание
Чтобы повторить последовательности случайных чисел, вызовите функцию Rnd с отрицательным аргументом непосредственно перед использованием инструкции Randomize с числовым аргументом. Если использовать инструкцию Randomize с тем же значением для аргумента число, предыдущая последовательность повторяться не будет.
Пример запроса
| Выражение | Результаты |
|---|---|
| SELECT ProductSales.ProductID, Rnd([Discount]) AS RandomNumbers FROM ProductSales; | Возвращает идентификатор продукта вместе со случайными числами в столбце RandomNumbers. |
Пример VBA
Примечание
В примерах ниже показано, как использовать эту функцию в модуле Visual Basic для приложений (VBA). Чтобы получить дополнительные сведения о работе с VBA, выберите Справочник разработчика в раскрывающемся списке рядом с полем Поиск и введите одно или несколько слов в поле поиска.
В данном примере функция Rnd используется для генерации случайного целого значения в диапазоне от 1 до 6.
Dim MyValue
' Generate random value between 1 and 6.
MyValue = Int((6 * Rnd) + 1)