游戏开发：碰撞模型，球球大作战小游戏【VB编程经典案例】

案例功能实现目标

0、键盘事件，控制主角物体的移动，需要有一个方向变量

1、碰撞模型

2、获取到吃到的物体的颜色

3、主角的宽高大小变化由迟到的物体加上去

自定义函数

Function关键字的使用

格式1

Function 函数名称（参数1，参数2，。。。。）

End function

格式2

Function 函数名称（参数1，参数2，。。。。） as 返回值的类型

函数名称=返回值

End function

Len(“aaa”)=3

调用函数或过程使用关键字call

Call 函数名称

由返回值的时候，调用方式举例crash(shapeball, Shape2)

碰撞模型

Function  crash(A as shape,B asshape) as Boolean’返回true表示撞到，false表示没碰到

dim f as Boolean

ifA.left+A.width>=B.left  andA.left

   A.top+A.height>B.top andA.top

f=true

endif

crash=f ‘vb6中返回值的写法

RGB函数

颜色函数

红绿蓝三原色

0-255之间表示一种颜色

课堂总结

1、碰撞模型的理解

2、rgb函数的运动

3、自定义函数的使用