源码网商城,靠谱的源码在线交易网站 我的订单 购物车 帮助

源码网商城

VBS教程:VBScript 语句-Randomize 语句

  • 时间:2022-05-19 21:47 编辑: 来源: 阅读:
  • 扫一扫,手机访问
摘要:VBS教程:VBScript 语句-Randomize 语句

Randomize 语句

初始化随机数生成器。 [code][b]Randomize [/b][number][/code] [b]number[/b] 参数可以是任何有效的数值表达式。 [h3]说明[/h3][b]Randomize[/b] 使用 [b]number[/b] 参数初始化 [b]Rnd[/b] 函数的随机数生成器,赋给它新的种子值。如果省略 [b]number[/b],则使用系统计时器返回的值作为新的种子值。 如果不使用 [b]Randomize[/b],则第一次调用 [b]Rnd[/b] 函数(无参数)时,它将使用相同的数字作为种子值,随后使用最后生成的数值作为种子值。 [b]注意 [/b]要重复随机数的序列,请在使用数值参数调用 [b]Randomize[/b] 之前,立即用负值参数调用 [b]Rnd[/b]。使用相同的 [b]number[/b] 值的 [b]Randomize[/b] 不能重复先前的随机数序列。 下面例子举例说明如何使用 [b]Randomize[/b] 语句:
[code]Dim MyValue, Response[b]Randomize[/b] '[/code]初始化随机数生成器。[code]Do Until Response = vbNo[/code][code]   MyValue = Int((6 * Rnd) + 1)' [/code]产生[code] 1 [/code]到[code] 6 [/code]之间的随机数。[code]   MsgBox MyValue[/code][code]   Response = MsgBox ("Roll again? ", vbYesNo)[/code][code]Loop[/code]
  • 全部评论(0)
联系客服
客服电话:
400-000-3129
微信版

扫一扫进微信版
返回顶部