VBS教程:VBScript 语句-Randomize 语句
人气:0想了解VBS教程:VBScript 语句-Randomize 语句的相关内容吗,在本文为您仔细讲解的相关知识和一些Code实例,欢迎阅读和指正,我们先划重点:VBBSS教教程程VVBBSSccrriipptt语语句句RRaannddoommiizzee语语句句,下面大家一起来学习吧。
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
加载全部内容