一个贪吃蛇游戏只有36k建18个image控件组名为sn(0);sn(1)...sn(17)一个timer1一个label2用来记分三个image名为pg;she和st分别放苹果;蛇身和蛇头的图片所有image的长宽都为255一个shape名为sh长宽为4590源码如下;(本人要读书,不太完善)DimnAsByteDimczAsIntegerPrivateSubForm_KeyDown(KeyCodeAsInteger,ShiftAsInteger)IfKeyCode=37OrKeyCode=38OrKeyCode=39OrKeyCode=40ThenIfcz-Ke