VB的Rnd函数,其作用就是产生(0,1)之间的随机数,还不是[0,1].
即：0 < Rnd < 1
根据上式,结合VB的Int（）等函数,可以产生你所需要的任意范围内的随机数.
例如1：根据 0 < Rnd < 1
那么就有：0 < Rnd *10 < 10 产生(0,10)之间的随机数,注意这是实数
例如2：0
再问： 怎么才能产生0~1，且包含1的随机数？
再答： 抱歉题目看错一个字，把“如何”看成“为何”了？ RND函数产生的范围是（0，1），不包括0和1的，所谓随机，无非是从概率的角度去理解的。 我想为了得到0和1，可以根据自己的需要，把原来产生的随机数，保留到若干位小数，比如保留4位小数，那么可以这样处理： Dim x As Single x = Rnd If x = 0.9999 Then x = 1 End If Print x
