LibreOffice 24.8 帮助
返回大于 0 且小于 1 的随机数。
Rnd [(Expression)]
Double
「表达式」: 没有任何作用,如果提供则会被忽略。
「Rnd」函数会返回0到1之间的十进制小数,包含0但不包含1,且符合均匀分布。它使用 Mersenne Twister 19937 随机数生成器。要生成给定区间的随机数,请使用类似以下例子中的公式。如果您要生成一组可预期的数字序列,那么可以事先使用包含特定seed的「Randomize」语句。
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