vb小游戏源代码 vb小游戏制作步骤和代码

【vb小游戏源代码 vb小游戏制作步骤和代码】大家好,小编来为大家解答以上的问题 。vb小游戏制作步骤和代码,vb小游戏源代码这个很多人还不知道,现在让我们一起来看看吧!

vb小游戏源代码 vb小游戏制作步骤和代码

文章插图
1、Rem 窗体创建三个单选框按钮,OptionOption2、Option3 Private Sub Form_Activate() Option1.Caption ="石头"Option2.Caption ="剪刀"Option3.Caption ="布"Option1.Value = https://www.zibosky.com/shbk/202208/False Option2.Value = False Option3.Value = False End Sub Private Sub Option1_Click() Randomize Select Case Int(3 * Rnd) Case 0: MsgBox"对方也出石头!继续!"Case 1: MsgBox"哈哈!你赢了!对方出的是剪刀!奖励你一个苹果!"Case 2: MsgBox"你输了!对方出的是布哦!不好意思,苹果给对方了哈!"End Select Option1.Value = https://www.zibosky.com/shbk/202208/False End Sub Private Sub Option2_Click() Randomize Select Case Int(3 * Rnd) Case 0: MsgBox"你输了!对方出的是石头哦!不好意思 。
2、苹果给对方了哈!"Case 1: MsgBox"对方也出剪刀!继续!"Case 2: MsgBox"哈哈!你赢了!对方出的是布!奖励你一个苹果!"End Select Option2.Value = https://www.zibosky.com/shbk/202208/False End Sub Private Sub Option3_Click() Randomize Select Case Int(3 * Rnd) Case 0: MsgBox"哈哈!你赢了!对方出的是石头!奖励你一个苹果!"Case 1: MsgBox"你输了!对方出的是剪刀哦!不好意思,苹果给对方了哈!"Case 2: MsgBox"对方也出布!继续!"End Select Option3.Value = https://www.zibosky.com/shbk/202208/False End Sub 。
本文到此分享完毕,希望对大家有所帮助 。