2024年2月8日发(作者:)
项目六《分等级的弹球小游戏》
一、设计界面如下
二、设置属性如下
1.按钮属性设置如下
2.Picture及小球、球拍的属性设置如下
3.Timer属性设置如下
4.label属性设置如下
三、编写代码如下
Private Sub Picture1_KeyDown(KeyCode As Integer, Shift As Integer)
Select Case KeyCode
Case 37 '如果按下左箭头,使板子向左移动
If Line1.X1 <= Then
Line1.X1 =
Else
Line1.X1 = Line1.X1 - (100 + move_x)
Line1.X2 = Line1.X2 - (100 + move_x)
End If
Case 39 '如果按下右箭头,使板子向右移动
If Line1.X2 >= + Then
Line1.X2 = +
Else
Line1.X1 = Line1.X1 + (100 + move_x)
Line1.X2 = Line1.X2 + (100 + move_x)
End If
End Select
End Sub
四、作业:添加代码,使小球撞击到弹板时能随机变化颜色。
发布者:admin,转转请注明出处:http://www.yc00.com/news/1707379462a1499299.html
评论列表(0条)