求助求高手帮忙写下vb代码。题目彩票随机抽奖机。只有一个按钮，点击按钮出现一个inputbox信息，
答案:1 悬赏:0 手机版
解决时间 2021-10-20 21:14
- 提问者网友：
- 2021-10-20 04:32
求助求高手帮忙写下vb代码。题目彩票随机抽奖机。只有一个按钮，点击按钮出现一个inputbox信息，
最佳答案
- 五星知识达人网友：人類模型
- 2021-10-20 04:58
Private Sub Command1_Click()Dim a$, b$Randomizea = Format(Int(Rnd * 1000), "000")b = InputBox("请输入3位数")If Val(b) > 0 And Val(b) < 1000 And Len(b) = 3 ThenIf b = a Then MsgBox "你中奖啦!"Else MsgBox "你没有中奖，中奖号码是" & aEnd IfElse MsgBox "请输入正确数字"End IfEnd Sub
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
点此我要举报以上问答信息
大家都在看
推荐资讯