7

我想知道如何（在 VBScript 中）生成一个在不同计算机上不一样的随机数，然后使用该数字和一些 If 语句，以便可以激活 10 个可能选项之一，例如.

If (A random number between 1 - 10, eg. 2) then (Continue on part of script then wscript.quit)
Else if (A different number, eg. 7) then (continue on to different part of script then wscript.quit)

等等

这样我就有 10 个不同的选项供脚本随机选择。

这可能吗？如果是这样，那么有人能够编译一个这样的例子，这样我就可以把我自己的脚本放进去并使用它吗？感谢任何答案！

4

3 回答 3

11

你需要randomize和rnd。
int(rnd * n) + 1计算结果为 1 到 n 之间的整数。
你也可以select case...在这里使用，试试这个： 

dim r
randomize
r = int(rnd*10) + 1
select case r
    case 2
        '... 

    case 7
        '... 

end select
于 2013-08-18T07:03:50.003 回答
6

如果你想从最小值到最大值：

Dim max,min,rand
max=54
min=23
Randomize
rand = Int((max-min+1)*Rnd+min)
WScript.Echo rand
于 2014-10-31T10:22:52.107 回答
-2 
Dim i

For i=1 to 5

Randomize

a=Rnd
b=a+1

msgbox b

Next
于 2015-12-11T05:58:26.113 回答