求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

最新问答

实用新型专利转让的流程

跟前男友分手后，他竟然把我的名字纹在他胸口上？

上海市商贸旅游学校是中专还是职校？代码上有2的、也有4的、麻烦详细一点，学校

我要找“黑龙江省克山县滨河乡众心村二社”的姚志伟，能提供下这个村子人的电话么？非常感谢，急！!

《二十不惑》中姜小果拒绝了周寻，是移情别恋了吗？

关于好好过日子的句子有哪些？

爬山注意事项，露宿野营注意事项，告诉我就采纳（与图无关）

android studio 需要配置环境么

谁有中文翻版的歌，要深情，调别太高，速度啊，不要像Tong hua一样有英文也有中文，就像吻别那样。谢谢

青岛即墨双星鞋厂在那里