求vb小游戏代码

2025-02-25 21:10:44

推荐回答（1个）

回答1：

Private Sub Command1_Click()
Dim a As String
a = InputBox("请输入0-9任意一个数", "猜数游戏")
Randomize
b = Int(Rnd * 9)
If a = b Then
MsgBox "你猜对了" & b
Else
MsgBox "错" & b
End If
End Sub

最新问答

手机qq微云密码丢失怎么办？

四川大学结构工程的研究生怎么样。主要是就业方向和前景。

我的画38张，我的画片比你的2倍还多18张，小光和小辉一共有画片多少张

为什么联通人工服务老是打不进？

win7升级win10后开机很慢怎么办

联想笔记本电脑L3000G430A