Функция Rnd

Важно : Тази статия е преведена машинно – вижте отказа от отговорност. Английската версия на тази статия за справка можете да намерите тук .

Връща Единична съдържаща случайно число.

Синтаксис

Rnd [(number)]

По желание – броятаргумент е единствен или всяко валидно числов израз.

Връщат стойности

Ако числото е

Rnd генерира

По-малък от нула

Един и същ брой всеки път, използване на число като зародиш.

По-голямо от нула

Следващата случайно число в последователност.

Е равно на нула

Най-много наскоро генерирани число.

Не е осигурено

Следващата случайно число в последователност.


Забележки

Функция Rnd връща стойност, по-малко от 1, но по-голямо или равно на нула.

Стойността на числото определя как Rnd генерира случайно число:

За всеки даден първоначален семена поредицата от един и същ се генерира защото всяко поредни извикване на функцията Rnd използва номера на предходната като семе за следващия номер в последователност.

Преди да се обадите Rnd, използвайте случайност декларация без аргумент да се инициализира генератор на случайни числа със семена въз основа на таймера на системата.

За да произвежда случайни числа в зададен диапазон, използвайте тази формула:

Int((upperbound - lowerbound + 1) * Rnd + lowerbound)

Тук горното е най-голямото число в диапазона и долното е най-малкото число в диапазона.

Забележка : За да повторите последователността на случайни числа, обадете Rnd с отрицателни аргумент непосредствено преди да използвате случайност с числов аргумент. Използване на случайност с една и съща стойност за номер не се повтаря предишния последователност.

Пример

Забележка : Примерите по-долу илюстрират използването на тази функция във Visual Basic for Applications (VBA). За повече информация относно работата с VBA изберете Справочни материали за разработчици в падащия списък до Търсене и въведете един или няколко термина в полето за търсене.

Този пример използва функцията Rnd да генерира случайна целочислена стойност от 1 до 6.

Dim MyValue
' Generate random value between 1 and 6.
MyValue = Int((6 * Rnd) + 1)

Забележка : Отказ от отговорност за машинен превод: Тази статия е преведена от компютърна система без човешка намеса. Microsoft предлага тези машинни преводи, за да помогне на потребителите, които не говорят английски, да се възползват от съдържанието за продукти, услуги и технологии на Microsoft. Тъй като статията е преведена машинно, е възможно да съдържа грешки в речника, синтаксиса и граматиката.

Разширете уменията си
Преглед на обучението
Получавайте първи новите функции
Присъединете се към участниците в Office Insider

Беше ли полезна тази информация?

Благодарим ви за обратната връзка!

Благодарим ви за вашата обратна връзка. Изглежда, че ще бъде полезно да ви свържем с един от нашите агенти по поддръжката на Office.

×