目录

# Rnd 函数

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

## 语法:

    Rnd [(Expression)]

## 返回值:

Double

## 参数:

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

「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 语句