作业帮 > 综合 > 作业

按键精灵随机输入30-40的随机数

来源:学生作业帮 编辑:作业帮 分类:综合作业 时间:2024/10/05 00:54:24
按键精灵随机输入30-40的随机数
每个数字输入间隔0.5秒
要求是整数
Do Until Response = vbNo
MyValue = Int((10 * Rnd) + 30) ' 产生 1 到 6 之间的随机数.
Delay 500
MsgBox MyValue
Response = MsgBox ("还要继续吗", vbYesNo)
Loop
再问: 谢谢你大哥 ,输入到文本里面。 所以不用出现那个框框也不用出现要不要继续 , 连续输出 每隔0.5秒输出一个数字就行了两个数字之间不需要空格 我是准备往word里面输出