发布网友 发布时间:2024-10-23 22:34
共3个回答
热心网友 时间:2024-10-24 08:40
Dim minNum As Integer
Dim mazNum As Integer
minNum = 0
maxNUM = 999
RandomNum = minNum + int((maxNUM - minNum) * Rnd())
给定一个最大数和最小数,则生成他们之间的一个随机数
如:上面就是生成一个0~999的随机数
热心网友 时间:2024-10-24 08:35
Randomize()
Dim a As Integer = 1000 * Rnd()
------------------------------
a就是 。。。楼上的貌似每次运行出来的随机数都是一样的。。用了Randomize()就不会
热心网友 时间:2024-10-24 08:35
公式是
minNum + int((maxNUM - minNum+1) * Rnd)
返回[minNum,maxNUM]区间的随机整数