首页 > 综合百科 > vb小游戏制作步骤和代码(vb小游戏源代码)

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

来源:互联网转载 时间:2025-05-04 15:31:01 浏览量:

1、Rem 窗体创建三个单选框按钮,OptionOption2、Option3 Private Sub Form_Activate() Option1.Caption = "石头" Option2.Caption = "剪刀" Option3.Caption = "布" Option1.Value = 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 = 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 = 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 = False End Sub。

TAG: vb小游戏

© 转乾企业管理-攻考网 版权所有 | 黔ICP备2023009682号

免责声明:本站内容仅用于学习参考,信息和图片素材来源于互联网,如内容侵权与违规,请联系我们进行删除,我们将在三个工作日内处理。联系邮箱:303555158#QQ.COM (把#换成@)