IBM Lotus Symphony


Rnd 函数 [运行时]

返回一个 0 到 1 之间的随机数。

语法:

Rnd [(Expression) ]

返回值:

双倍行距

参数:

Expression:用于定义如何生成随机数的任何数字表达式。

小于 0:始终返回相同的随机数。

大于 0:返回序列中的下一个随机数。

等于 0:返回上次生成的随机数。

不指定:返回序列中的下一个随机数。

对于每一次连续的调用,如果传送相同的数到 Rnd 函数,那么生成的随机数序列也相同。这是因为 Expression 参数被用作下一个数的起始点。

Rnd 函数仅返回大于 0 且小于 1 的值。要在给定范围内生成随机整数,请使用以下示例中的公式:

错误代码

5 无效的过程调用

示例:

Sub ExampleRandomSelect

Dim iVar As Integer

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

Select Case iVar

Case 1 To 5

Print "Number from 1 to 5"

Case 6, 7, 8

Print "Number from 6 to 8"

Case Is > 8 And iVar < 11

Print "Greater than 8"

Case Else

Print "Outside range 1 to 10"

End Select

end sub


产品反馈 | 其他文档 | 商标