Microsoft(R) Visual Basic(R) Scripting Edition Randomize 语句 | 语言参考 起始页|版本 1

请参阅

##### 描述

> 初始化随机数生成器。

##### 语法

> Randomize [number]

> number 参数可以是任何有效的数值表达式。

##### 说明

> Randomize 使用 number 参数初始化 Rnd 函数的随机数生成器，赋给它新的种子值。如果省略 number，则使用系统计时器返回的值作为新的种子值。

> 如果不使用 Randomize，则第一次调用 Rnd 函数（无参数）时，它将使用相同的数字作为种子值，随后使用最后生成的数值作为种子值。

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

> 下面例子举例说明如何使用 Randomize 语句:

> >     Dim MyValue, Response
> >     Randomize    '初始化随机数生成器。

> >     Do Until Response = vbNo
> >        MyValue = Int((6 * Rnd) + 1)    ' 产生 1 到 6 之间的随机数。
> >        MsgBox MyValue
> >        Response = MsgBox ("Roll again? ", vbYesNo)
> >     Loop

(C) 1998 Microsoft Corporation. All rights reserved. Terms of Use.