VBScript 函数生成随机数代码：深入指南324

VBScript 是一种脚本语言，通常用于自动化任务和创建交互式网页。其中一项最有用的功能是生成随机数，这对于游戏、模拟和密码生成等应用程序至关重要。

使用 Rnd 函数生成随机数

VBScript 中生成随机数最简单的方法是使用 Rnd 函数。此函数返回一个介于 0.0 到 1.0 之间的随机浮点数，包括两种值。
' 生成一个随机浮点数
randomNumber = Rnd

使用 SystemTimer 函数生成整数

如果需要生成一个整数，可以使用 SystemTimer 函数。此函数返回系统时钟的当前值，可以将此值取模为所需范围中的数字。
' 生成一个介于 1 到 100 之间的随机整数
randomNumber = SystemTimer Mod 100
' 生成一个介于 -10 到 10 之间的随机整数
randomNumber = SystemTimer Mod 21 - 10

使用 Randomize 函数初始化随机数生成器

默认情况下，Rnd 函数会生成相同的随机数序列。要确保每次运行脚本时生成不同的随机数，可以在脚本开始时使用 Randomize 函数。
' 使用系统时钟初始化随机数生成器
Randomize SystemTimer

使用 Rand 函数生成分布式随机数

Rnd 函数生成均匀分布的随机数，这意味着数字在给定范围内出现的概率相等。如果需要生成非均匀分布的随机数，可以使用 Rand 函数。
' 生成一个具有正态分布的随机数
randomNumber = Exp(-Rnd) * Sqr(-2 * Log(Rnd))

其他随机数生成函数

除了上述函数外，VBScript 还提供以下生成随机数的函数：
RandObj：生成一个随机对象。
DSGetRandomRefers：生成一个随机网络引荐者字符串。
DSGetRandomSeed：生成一个随机种子。

示例：生成随机密码

以下 VBScript 代码可用于生成一个 8 位随机密码，其中包含大写字母、小写字母、数字和特殊字符：
' 定义变量
password = ""
' 生成 8 个随机字符
For i = 1 to 8
' 生成一个 0 到 61 之间的随机整数
randomNumber = SystemTimer Mod 62

' 根据随机整数选择字符
Select Case randomNumber
Case 0 To 25
' 大写字母
password = password & Chr(65 + randomNumber)
Case 26 To 51
' 小写字母
password = password & Chr(97 + randomNumber - 26)
Case 52 To 61
' 数字或特殊字符
Select Case randomNumber
Case 52 To 57
' 数字
password = password & Chr(48 + randomNumber - 52)
Case 58
' 星号
password = password & "*"
Case 59
' 句号
password = password & "."
Case 60
' 冒号
password = password & ":"
Case 61
' 分号
password = password & ";"
End Select
End Select
Next
' 显示密码
MsgBox password