当前位置: 首页 > 图文教程 > 脚本技术 > VBScript > VBS教程:VBScript 语句-Randomize 语句

VBScript
VBS教程:方法-Skip 方法
VBS教程:方法-Remove 方法
VBS教程:方法-ReadLine 方法
VBS教程:方法-ReadAll 方法
VBS教程:方法-Read 方法
VBS教程:方法-OpenTextFile 方法
VBS教程:方法-OpenAsTextStream 方法
VBS教程:方法-MoveFolder 方法
VBS教程:方法-MoveFile 方法
VBS教程:方法-Move 方法
VBS教程:方法-Keys 方法
VBS教程:方法-Items 方法
VBS教程:方法-GetTempName 方法
VBS教程:方法-GetSpecialFolder 方法
VBS教程:方法-GetParentFolderName 方法
VBS教程:方法-GetFolder 方法
VBS教程:方法-GetFileName 方法
VBS教程:方法-GetFile 方法
VBS教程:方法-GetExtensionName 方法
VBS教程:方法-GetDriveName 方法

VBS教程:VBScript 语句-Randomize 语句


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-09-11   浏览: 82 ::
收藏到网摘: n/a

Randomize 语句

初始化随机数生成器。

Randomize [number]

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

说明

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

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

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

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

Dim MyValue, ResponseRandomize '初始化随机数生成器。Do Until Response = vbNo MyValue = Int((6 * Rnd) + 1)' 产生 1  6 之间的随机数。 MsgBox MyValue Response = MsgBox ("Roll again? ", vbYesNo)Loop