IBM Lotus Symphony


Функция Rnd [встроенная]

Возвращает случайное число в диапазоне от 0 до 1.

Синтаксис:

Rnd [(Выражение)]

Возвращаемое значение:

Двойной

Параметры:

Выражение: произвольное числовое выражение, определяющее способ создания псевдослучайных чисел.

Отрицательное: всегда возвращать одно и то же псевдослучайное число.

Положительное: возвращать следующее псевдослучайное число из последовательности.

Нуль: возвращать последнее созданное псевдослучайное число.

Не указано: возвращать следующее псевдослучайное число из последовательности.

Одинаковые аргументы функции Rnd дают одинаковые результаты. Причина в том, что заданное Выражение служит исходной точкой для вычисления псевдослучайного числа.

Функция Rnd возвращает значения от 0 до 1. Для создания псевдослучайных чисел в заданном диапазоне воспользуйтесь приведенной ниже формулой:

Коды ошибок

5 Недопустимый вызов процедуры

Пример:

Sub ExampleRandomSelect

Dim iVar As Integer

iVar = Int((15 * Rnd) -2)

Select Case iVar

Case 1 To 5

Print "Число от 1 до 5"

Case 6, 7, 8

Print "Число от 6 до 8"

Case Is > 8 And iVar < 11

Print "Число больше 8"

Case Else

Print "Вне диапазона от 1 до 10"

End Select

end sub


Комментарии по продукту | Дополнительная документация | Товарные знаки