Question

vbs 随机生成1到10的随机数,

最后可以改这个范围哦!小弟学习下,谢谢了

Answer 1

randomize'随机函数
a = int(rnd * 9 + 1)
msgbox a

这是1-9

randomize
a = round(rnd * 9 + 1)
msgbox a

round函数是五舍六入,这种随机时可能会比较好.上面2种方法

Answer 2

Function GetRandomMath(m,n)
Randomize
GetRandomMath = Int(((n-m+1) * Rnd) + m)
End Function

msgbox GetRandomMath(1,10)