VB问题。请大家帮帮忙！我自己做的VB贪吃蛇小程序

Question

请大家帮帮忙！我自己做的VB贪吃蛇小程序，它能运动，用键盘上下左右都可以,但是吃食物的时候，食物不能消失。蛇直接穿过了食物。 不知道是否属性设置的问题，还是键盘输入的问题。下面有两个程序，一个是正确的，一个错误的，求大家帮忙调试一下。
http://pan.baidu.com/s/1dE6HLAh 无需密码，直接下载下来，调试即可。谢谢大家！谢谢啊。C币不够，发个支付宝账号过来。直接支付。（10-20元都是可以接受的）

Answer 1

我也用vb做过贪吃蛇，我当时用按钮控件做的食物和蛇，当蛇头的坐标与食物的坐标重合，代表食物被蛇吃。得分后，就将位置数组中相应的元素置零，代表食物被吃，然后用随机数函数生成新的坐标，以得到新的食物。"食物"不会消失，只是位置改变了而已。在生成新的坐标时，注意不要让食物落在蛇身上，如果刚好落在蛇身上，就重新生成一个新的坐标。