檬味博客 » 问答 » vb游戏代码大全vb小游戏源代码

vb游戏代码大全vb小游戏源代码

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 Sel...
vb游戏代码大全vb小游戏源代码
关于vb游戏代码大全，vb小游戏源代码这个很多人还不知道，今天来为大家解答以上的问题，现在让我们一起来看看吧！
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。2024-04-11
mengvlog 阅读 8 次 更新于 2025-07-21 04:12:26 我来答关注问题0
1 个回答檬味博客专题活动
  • 卓7358 VB制作小游戏源代码

    Begin VB.CommandButton Command2 Caption = "重新开始"Height = 615 Left = 2640 TabIndex = 2 Top = 2760 Width = 1095 End Begin VB.CommandButton Command1 Caption = "确定"Height = 615 Left = 840 TabIndex = 1 Top =...

  • 云易网络科技 vb游戏代码大全vb小游戏源代码

    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 Sel...

  • 游戏放松小助手 如何用vb做一个小游戏

    1、首先双击桌面图标启动 visual basic 6.0。2、然后新建工程，选择标准EXE。3、选择完工程后，点击打开，就可以新建一个exe工程了。4、然后双击 FORM1 窗体，在弹出的代码窗体中复制该代码到 Form_Click() 事件中。5、代码：If a * 100 + b * 10 + c = a ^ 3 + b ^ 3 + c ^...

  • 宸辰游艺策划 求一个VB 小游戏代码 越简单越好谁帮忙写一个 网站上复制的不要

    这是一个简单的鼠标打靶游戏。当鼠标点击窗口时，一个红色的圆形会在随机位置出现。如果点击的位置在红色圆形附近，分数就会增加。游戏代码如下：首先定义了两个子程序，Form_Click 和 Pdraw。Form_Click 用来处理鼠标点击事件。当点击时，获取鼠标位置，并计算一个随机的圆形位置。然后检查点击位置是否在圆...

  • 阿暄生活 vb小游戏自己做

    制作一个简单的猜数字VB小游戏，可以按照以下步骤进行：一、设计游戏界面 Form1界面设计：设置Form1的BorderStyle属性为3（固定对话框）。添加以下控件：Command1按钮，标题为“开始游戏/重置”。Command2按钮，标题为“确定”。Command3按钮，标题为“退出”。Command4按钮，标题为“显示答案”。Command5...

其他代码类似问题

檬味博客在线解答立即免费咨询

代码相关话题

Copyright © 2023 WWW.MENGVLOG.COM - 檬味博客
返回顶部