Question

重金求，vb如何判断两个移动的控件是否接触? 我利用vb做了一个赛车小游戏，车是用的picture

重金求，vb如何判断两个移动的控件是否接触?
我利用vb做了一个赛车小游戏，车是用的picture控件实现的，在移动过程中，不能让两个赛车碰撞，该如何设置啊！

Answer 1

写一个函数，参数是两个小车控件的左上角坐标，在函数内，通过这两个坐标，和小车控件尺寸来计算他们之间距离，如果距离小于尺寸了，就是撞了，返回值true

追问

谢谢您，可是控件的坐标怎么设置为参数啊，您方便给个例子吗

追答

额，控件名.top 控件名.left 不就是左上角的坐标

自己写函数，会不会呢，等我找一下格式，额

Public Function ssif(x As Integer,y As Integer) As Boolean

ssif = False
ssif = True
End Function

如果是判断两个小车，参数就是四个，两个小车的坐标是四个整数