Visual Basic Rnd 函数

定义和用法

Rnd 函数可返回一个随机数。数字总是小于 1 但大于或等于 0 。

因每一次连续调用 Rnd 函数时都用序列中的前一个数作为下一个数的种子，所以对于任何最初给定的种子都会生成相同的数列。

在调用 Rnd 之前，先使用无参数的 Randomize 语句初始化随机数生成器，该生成器具有基于系统计时器的种子。

要产生指定范围的随机整数，请使用以下公式：

Math.Int((upperbound - lowerbound + 1) * Rnd() + lowerbound)

这里， upperbound 是此范围的上界，而 lowerbound 是此范围内的下界。

注释：要重复随机数的序列，请在使用数值参数调用 Randomize 之前，立即用负值参数调用 Rnd。使用同样 number 值的 Randomize 不能重复先前的随机数序列。

语法

Rnd[(number)]

实例

例子 1

Module Module1
    Sub Main()
        Console.WriteLine(Rnd())
    End Sub
End Module

输出：

0.7055475

例子 2

如果您使用例子 1 中的代码，相同的随机数会重复出现。

可以使用 Randomize 语句在页面每次重新载入的时候生成一个新的随机数：

Module Module1
    Sub Main()
        Randomize
        Console.WriteLine(Rnd())
    End Sub
End Module

输出：

0.4758112

例子 3

Module Module1
    Sub Main()
        dim max,min
        max=100
        min=1
        Console.WriteLine(Math.Int((max-min+1)*Rnd()+min))
    End Sub
End Module

输出：

71