VBScript Randomize 语句

来源:岁月联盟 编辑:exp 时间:2008-11-20
 randomize 语句

  初始化随机数生成器。

  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