利用随机函数产生100-999范围内的一个正整数用vb表达式
答案:4 悬赏:0 手机版
解决时间 2021-11-21 09:26
- 提问者网友：抽煙菂渘情少年
- 2021-11-21 01:00
利用随机函数产生100-999范围内的一个正整数用vb表达式
最佳答案
- 五星知识达人网友：十鸦
- 2021-11-21 01:19
Private Sub Command1_Click()
Dim n As Integer
Randomize
n = Int(Rnd * 900) + 100
Print "100~999之间的随机数是：" & n
End Sub
Dim n As Integer
Randomize
n = Int(Rnd * 900) + 100
Print "100~999之间的随机数是：" & n
End Sub
全部回答
- 1楼网友：一把行者刀
- 2021-11-21 04:34
Int(Rnd * 900) + 100
- 2楼网友：上分大魔王
- 2021-11-21 03:15
Int(900 * Rnd + 100)
- 3楼网友：杯酒困英雄
- 2021-11-21 02:32
Dim a As Integer
a = Int(Rnd() * 900 + 100)
a = Int(Rnd() * 900 + 100)
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
点此我要举报以上问答信息
大家都在看
推荐资讯