怎么给遥控飞机充电:求随机输出整数的VB代码

来源:百度文库 编辑:神马品牌网 时间:2024/07/05 19:35:34
求随机输出整数的VB代码..
用来随机学号的..
感谢中...

Private Sub Command1_Click()
Randomize
Dim a As Long
a = 655535 * Rnd + 1
MsgBox a
End Sub

a=int(rnd*(max-min+1)+min)
max为随机数最大值
min为随机数最小值