Rnd
Float = Rnd ( [ Min [ , Max ] ] )
返回浮点型的伪随机数。
-
如果没有指定参数,返回一个位于[
0
, 1
)之间的伪随机数。
-
如果仅指定一个参数,返回一个位于[
0
, Min )之间的伪随机数。
-
如果指定两个参数,返回一个位于[ Min , Max )之间的伪随机数。
注意:伪随机数从来不会到达范围的上界。
产生伪随机数的算法是一个扭转的广义反馈移位寄存器。
示例
' 0 和 1 之间
PRINT Rnd
' 0 和 2 之间
PRINT Rnd(2)
' Pi 和 Pi*2 之间
PRINT Rnd(Pi, Pi(2))
Public Sub Main()
Dim Dice AS Integer
Randomize
Dice = Int(Rnd(1, 7))
'掷筛子,得到1~6的一个整数。
PRINT "你掷出了" & dice
End
参见