[求助]vb中rnd()函数可以产生100-1000之间的随机数吗？
我昨天尝试着用该函数产生一个大于100小于1000的随机数但是失败了！有谁愿意指点迷津啊？谢了先！
2006-03-03 09:26
2006-03-03 10:27
是可以的但是我不知道怎么生成的，那个随机数的 上限和下限怎么定义啊？
2006-03-03 10:34
Option Explicit
Private Sub Command1_Click()
Static Sum As Integer
Sum = Sum + 1
Dim Random As Integer
Random = Int(901 * Rnd() + 100)
Print Random;
If Sum Mod 10 = 0 Then Print
End Sub
2006-03-03 13:13
楼上的大哥谢谢了啊！
2006-03-03 14:04
精简了哈，嘿嘿！
Private Sub Command1_Click()
Dim random As Integer
random = (900 * Rnd(1) + 100)
Print random
End Sub
2006-03-03 14:19
2006-03-09 15:51
Int(1000-100)*Rnd+100
2006-03-12 15:49