Module
Contents
Index 🔎︎

# Rnd 函数

返回大于 0 且小于 1 的随机数。

## 语法：

    Rnd [(Expression)]

## 返回值：

双精度型

## 参数：

表达式：没有任何作用，如果提供则会被忽略。

Rnd 函数会返回0到1之间的十进制小数，包含0但不包含1，且符合均匀分布。它使用 Mersenne Twister 19937 随机数生成器。要生成给定区间的随机数，请使用类似以下例子中的公式。如果您要生成一组可预期的数字序列，那么可以事先使用包含特定seed的Randomize语句。

## 错误代码：

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

相关主题

Randomize 语句