使用VBscript生成序列中的随机数

我不熟悉vbscript

到目前为止我已经知道了

Function random_number_generator (lowerLim, upperLim)
    Randomize
    randNumber = Int(((upperLim-lowerLim+1)* Rnd())+ lowerLim)
    random_number_generator = randNumber
End Function

但是，我如何让它有一个序列来生成，比如说9位数的社会保险号码

---

例如，如果第一个社会保险是200030886，那么下一个将是200030887，依此类推。

我不知道为什么你的问题中有一个随机元素。我看你只是想要个柜台

Dim start, ends
start = 200030886
ends = 200040000

for k = start to ends
    MsgBox k
next

如果你需要一个像上面的数字格式的随机数，你可以试试这个

MsgBox random_number_generator(1, 10000)

Function random_number_generator (lowerLim, upperLim)
    Randomize
    randNumber = Int(((upperLim-lowerLim+1)* Rnd())+ lowerLim)
    random_number_generator = "2" & RIGHT("000000000" & randNumber, 8)
End Function

---

希望这有帮助

9位数字只是0到99999999之间的任意数字，因此您需要做的就是相应地调整上限和下限。您可以发布您需要的输出外观吗。请包括几个示例VBScript中没有随机数函数。

Dim RandNumber

RandNumber = RandomNumber(1,10000)

Print RandNumber