大橙子网站建设,新征程启航
为企业提供网站建设、域名注册、服务器等服务
1.做游戏。我做过坦克大战
站在用户的角度思考问题,与客户深入沟通,找到青羊网站设计与青羊网站推广的解决方案,凭借多年的经验,让设计与互联网技术结合,创造个性化、用户体验好的作品,建站类型包括:成都网站制作、网站建设、企业官网、英文网站、手机端网站、网站推广、空间域名、雅安服务器托管、企业邮箱。业务覆盖青羊地区。
2.编程。我做过《职工管理系统V2.10》用VB操作数据库。
3.演示文稿。辅助讲座、上课。
4.制作电脑、学习等方面的小工具。如练习打字的软件、学习英语的软件……这本质上也是编程。
如果技术够用,能实现你的愿望。
暂停,就是除恢复外所有操作都无效,你可以用一变量来控制,不需挂起。
利用vb控件做个坦克大战类的游戏即可,炮弹和坦克都用控件实现就行。唯一难点是控制控件移动以及炮弹击中目标的碰撞检测判断。给你一个简单实现代码
这是一种碰撞检测方法,下述属于简化的矩形碰撞检测,若是需要复杂碰撞可以用一个数组来记录大量需要碰撞检测的物体
image1里读入坦克的图片
image2里读入地雷的图片
然后用下面代码即可实现
Private
Sub
Form_KeyPress(KeyAscii
As
Integer)
'按键盘A和D键控制猫图片image1左右移动
If
KeyAscii
=
97
Then
Image1.Left
=
Image1.Left
-
10
If
KeyAscii
=
100
Then
Image1.Left
=
Image1.Left
+
10
'如果坦克图片与地雷图片相遇则提示碰撞到了
If
Image1.Left
+
Image1.Width
Image2.Left
Then
If
Image1.Left
Image2.Left
+
Image2.Width
Then
If
Image1.Top
+
Image1.Height
Image2.Top
Then
If
Image1.Top
Image2.Top
+
Image2.Height
Then
MsgBox
"坦克碰到地雷,已经被炸毁了"
End
If
End
If
End
If
End
If
End
Sub