下载 >  开发技术 >  VB > 经典VB小游戏代码来啦

经典VB小游戏代码来啦

无聊的厉害,突发奇想,做了一个猜拳的小游戏。让大家看看吧。 要代码好多~其实代码我忘了放在电脑的哪个位置了。不过还好今天让我看到了。老早写的了~代码里有错误~而且有附加的功能没有使用~。有喜欢自己慢慢研究吧。其实还有更好的办法实现这个判断的功能~。
2009-06-10 上传大小:1.63MB
分享
收藏 举报
自己写的贪吃蛇代码 简单小游戏VB源码

代码很简单,小 游戏也很简陋, 因为是自己写的, 所以注释还是比较齐的, 适合初学者参考

立即下载
VB扫雷小游戏代码

VB编写的扫雷游戏,和系统自带的界面非常相似,功能也相当,界面还是挺专业的。

立即下载
几个用VB编写的小游戏

用visual Basic编写的几个小游戏,包括,贪吃蛇,五子棋等。

立即下载
打飞机小游戏【VB源码】

Microsoft Visual Basic 6.0编写的打飞机小游戏

立即下载
一个小型的VB战略游戏源代码

摘要:VB源码,游戏编程,Vb游戏源码   一个小型的VB战略游戏源代码,参考老外的战略游戏做了一个加强版,源码包中包括了战略主程序和网格生成程序。用VB6可以直接编译,对研究VB游戏编程参考价值极高。

立即下载
vb小游戏代码

vb小游戏代码vb小游戏代码vb小游戏代码vbvb小游戏代码小vb小游戏代码游戏代码vb小游戏代码

立即下载
vb做一个简单的射击游戏

用vb做一个简单的射击游戏 Option Explicit Dim RandX As Single Dim RandY As Single Dim Score As Single Dim Thisscore As Single Dim Average As Single Dim Shot As Integer Dim Appear As Boolean Dim Distance As Single Private Sub Command1_Click() Timer1.Enabled = True Command3.Enabled = True If Command1.Enabled = True Then Command3.Caption = "暂停" End If Command4.Enabled = True End Sub Private Sub Command2_Click() If Command4.Enabled = True Then MsgBox "请先结束游戏", 48, "警告" Else End End If End Sub Private Sub Command3_Click() Command1.Enabled = False Command3.Caption = "继续" Timer1.Enabled = Not Timer1.Enabled If Timer1.Enabled = True Then Command3.Caption = "暂停" End If End Sub Private Sub Command4_Click() Timer1.Enabled = False Command3.Enabled = False Command1.Enabled = True Picture1.Cls Label1.Caption = "射击:" Label2.Caption = "平均得分:" Label3.Caption = "环数:" Label4.Caption = "总分:" Command4.Enabled = False Command3.Caption = "暂停" End Sub Private Sub Form_Load() Appear = False Timer1.Enabled = False Thisscore = 0 Score = 0 Shot = 0 End Sub Private Sub Picture1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) Beep Shot = Shot + 1 Picture1.DrawWidth = 4 Picture1.PSet (X, Y), RGB(255, 0, 0) Distance = Sqr((X - RandX) * (X - RandX) + (Y - RandY) * (Y - RandY)) If Appear And Timer1.Enabled Then Thisscore = 5 - Int(Distance / 10) If Thisscore <= 0 Then Thisscore = 0 End If Score = Score + Thisscore Average = Int((Score / Shot) * 100) / 100 Label1.Caption = "射击:" + Str(Shot) + "发" Label2.Caption = "平均得分:" & Format(Average, "0.00") & "环" Label3.Caption = "环数:" + Str(Thisscore) + "环" Label4.Caption = "总分:" + Str(Score) + "环" End If End Sub Private Sub Timer1_Timer() Dim i As Integer Appear = Appear Xor True RandX = 500 * Rnd() RandY = 370 * Rnd() If Appear Then Form1.Picture1.AutoRedraw = True Picture1.DrawWidth = 1 Picture1.DrawStyle = 0 For i = 10 To 50 Step 10 Picture1.Circle (RandX, RandY), i, RGB(0, 0, 255) Next i Picture1.Line (RandX - 60, RandY)-(RandX + 60, RandY) Picture1.Line (RandX, RandY - 60)-(RandX, RandY + 60) Else Picture1.Cls End If End Sub

立即下载
VB猜数字游戏代码

有关VB的一个小游戏的代码,主要是代码,页面没进行详细的排版。

立即下载
VB编写的小游戏一个,适合初学者

VB编写的小游戏一个,适合初学者,高手谢绝

立即下载
java经典游戏和经典实例含源码(必须得收藏了亲)

这个5分当然是物有所值,我不会坑你们的亲,是女友当初想学java帮她收集的所有参考源码打包的。这个对于初学者和进阶者都是不错的,因为他包含了初学者的源码实例和进阶的源码实例,里面有100个经典实例,还有java+ajax写的登录实例、猜拳小游戏、英文打字小游戏、扫雷、贪吃蛇、推箱子、五子棋、桌面放大镜、约瑟夫环演示applet、博饼小游戏、当然这些都有源码。还有运行于JBuilder的100个java实例,可以说应有尽有了,希望大家java水平更上一层楼,第一次解压无需密码,里面有一个后面文件要的密码说明

立即下载
用Java开发的一些经典游戏源码

这个不是游戏 只有游戏的源码参考 如果是为了玩游戏的请不要下载 大家可以学着怎么做这些小游戏 从而锻炼一下自己

立即下载
各类经典小游戏、小软件源码

迷宫、汉诺塔、计算器、换位游戏等的源码,主要来自于清华大学出版设,但其中有一些的更改,添加了一些新的功能。主要用于交流学习。

立即下载
vb拼图小游戏完整源码可运行用

vb拼图小游戏完整源码可运行用,支持图片任选和返回操作

立即下载
几个经典小游戏C语言源码

1.任务管理器2.坦克3.贪吃蛇4.扫雷5.三位魔方6.计算器7.俄罗斯方块8.推箱子9.地空对战

立即下载
打地鼠小游戏vb源码

打地鼠 两只地鼠 简单小游戏 这还要凑够二十个字正麻烦啊 自己下了看不就知道了没分了啊

立即下载
基于VB的简单拼图游戏(源代码+可执行程序)

一个易于VB的拼图游戏,用的最简单代码,非常适合初学者参考。

立即下载
几个经典的C语言小游戏源码

我从网上搜了一些几个C语言小游戏源码,觉得不错,分享给大家,供大家参考!

立即下载
用VB做扫雷附全部代码

用VB做扫雷游戏的一个简单论文 1. For...Next循环应用 在游戏设计上,利用了两个二维数组分别记录地雷的分布状况及地雷区及表面探测情形。利用数据循环的对比,不但速度快,而且在设计阶段,程序的架构比较清楚。 2.Load及Unload动态增加或删除组件 利用Load及Unload指令,可动态新增及删除组件。在游戏的雷区,依照使用者自定义的地图类型,布置未探测的地雷方块。加载组件后,通过Image组件的Move属性,将组件布置于预定的位置。Move函数的原型如下: 组件. Move X坐标,[Y坐标],[组件宽度][组件高度] 再配合双循环的变量值,可以控制组件布置于窗体的方向及方式。 3.MouseDown与MouseUp事件 在游戏过程中,利用鼠标所发出的信息了解使用者的意图,进而做出相应的动作。在MouseDown与MouseUp事件中,可以捕捉鼠标所按下或放开的按键为何、鼠标光标在该组件上的坐标及是否同时按下辅助键等。用Button参数值表示鼠标上的按钮数值。其意义如下: 1:左键 2:右键 4:中央键 若同时按下不止一个按键时,则传回数值为按键数相加。例如同时按下左键及右键,则Button值为1+2=3. 在本游戏中,利用右键的MouseDown事件标示“已标示”方块,利用左键的MouseDown事件,标示使用者准备按下的方块,利用左键的MouseUp事件确定翻开的方块。

立即下载
C语言经典小程序和C语言编写的小游戏,带注释

非常强大的C语言 写的很多程序,带有注释,也含有几个C语言 小游戏,很棒

立即下载
5个经典游戏源代码合集

经典游戏源代码合集:中国象棋,俄罗斯方块,迷宫,扫雷,跳棋

立即下载
关闭
img

spring mvc+mybatis+mysql+maven+bootstrap 整合实现增删查改简单实例.zip

资源所需积分/C币 当前拥有积分 当前拥有C币
5 0 0
点击完成任务获取下载码
输入下载码
为了良好体验,不建议使用迅雷下载
img

经典VB小游戏代码来啦

会员到期时间: 剩余下载个数: 剩余C币: 剩余积分:0
为了良好体验,不建议使用迅雷下载
VIP下载
您今日下载次数已达上限(为了良好下载体验及使用,每位用户24小时之内最多可下载20个资源)

积分不足!

资源所需积分/C币 当前拥有积分
您可以选择
开通VIP
4000万
程序员的必选
600万
绿色安全资源
现在开通
立省522元
或者
购买C币兑换积分 C币抽奖
img

资源所需积分/C币 当前拥有积分 当前拥有C币
5 4 45
为了良好体验,不建议使用迅雷下载
确认下载
img

资源所需积分/C币 当前拥有积分 当前拥有C币
5 0 0
为了良好体验,不建议使用迅雷下载
VIP和C币套餐优惠
img

资源所需积分/C币 当前拥有积分 当前拥有C币
5 4 45
您的积分不足,将扣除 10 C币
为了良好体验,不建议使用迅雷下载
确认下载
下载
您还未下载过该资源
无法举报自己的资源

兑换成功

你当前的下载分为234开始下载资源
你还不是VIP会员
开通VIP会员权限,免积分下载
立即开通

你下载资源过于频繁,请输入验证码

您因违反CSDN下载频道规则而被锁定帐户,如有疑问,请联络:webmaster@csdn.net!

举报

若举报审核通过,可返还被扣除的积分

  • 举报人:
  • 被举报人:
  • *类型:
    • *投诉人姓名:
    • *投诉人联系方式:
    • *版权证明:
  • *详细原因: