vb中关于rnd函数
各位高手,我刚开始学习VB,想问一个有关于rnd问题
Private Sub Form_Click()
Dim a As Integer
a = 100 * Rnd
Print a
End Sub
每次运行时,输出的值都相同,为什么啊
各位高手,我刚开始学习VB,想问一个有关于rnd问题
Private Sub Form_Click()
Dim a As Integer
a = 100 * Rnd
Print a
End Sub
每次运行时,输出的值都相同,为什么啊
Randomize语句是用来初始化随机数发生器的,一般使用随机函数之前都先调用这个,如果你想让rnd函数产生一定范围内的随机整数,可以用以下这个表达式:
Int((上限-下限+1)*Rnd+下限)
Int()的含义是取小数的整数部分,具体例子如下:
要产生11~30的随机数,可以这样写
Private Sub Form_Click()
Dim a As Integer
Randomize
a = Int((30-11+1)*Rnd+11)
Print a
End Sub