rt
vb 产生随机数的公式(上界-下界+1)*rnd+下界你的题目就应该是(99-10+1)*rnd +10一般用rnd的时候还要在前面加一条 randomize 初始化随机种 子
温馨提示:答案为网友推荐,仅供参考
第1个回答 2013-11-12
Randomize Time '初始化
Print Int(Rnd * 90) + 10 '产生随机数,并输出
Print Int(Rnd * 90) + 10 '产生随机数,并输出
第2个回答 2013-11-12
dim Tmp as Byte Randomize Timer ' 随机种子 Tmp=int(rnd * 90+10) msgbox tmp ' 输出随机数
第3个回答 推荐于2018-04-13
Private Sub Form_Click()
Randomize
For i = 10 To 99
n = Int(Rnd * i + 10)
Next
Print nEnd Sub本回答被网友采纳
Randomize
For i = 10 To 99
n = Int(Rnd * i + 10)
Next
Print nEnd Sub本回答被网友采纳