VB趣味编程《分等级的弹球小游戏》导学案

VB趣味编程《分等级的弹球小游戏》导学案


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条)

  • 暂无评论

联系我们

400-800-8888

在线咨询: QQ交谈

邮件:admin@example.com

工作时间:周一至周五,9:30-18:30,节假日休息

关注微信