VB趣味编程《分等级的弹球小游戏》导学案.docx
-
资源ID：3168382
资源大小：36.43KB
全文页数：2页
- 资源格式： DOCX
下载积分：6.99金币
|
友情提示
2、PDF文件下载后，可能会被浏览器默认打开，此种情况可以点击浏览器菜单，保存网页到桌面，就可以正常下载了。
3、本站不支持迅雷下载，请使用电脑自带的IE浏览器，或者360浏览器、谷歌浏览器下载即可。
4、本站资源下载后的文档和图纸-无水印,预览文档经过压缩，下载后原文更清晰。
5、试题试卷类文档，如果标题没有明确说明有答案则都视为没有答案，请知晓。
|
VB趣味编程《分等级的弹球小游戏》导学案.docx
VB趣味编程分等级的弹球小游戏导学案项目六分等级的弹球小游戏 一、设计界面如下 二、设置属性如下 1按钮属性设置如下 2Picture及小球、球拍的属性设置如下 3Timer属性设置如下 4label属性设置如下 三、编写代码如下 Private Sub Picture1_KeyDown(KeyCode As Integer, Shift As Integer) Select Case KeyCode Case 37 '如果按下左箭头,使板子向左移动 If Line1.X1 <= Picture1.Left Then Line1.X1 = Picture1.Left Else Line1.X1 = Line1.X1 - (100 + move_x) Line1.X2 = Line1.X2 - (100 + move_x) End If Case 39 '如果按下右箭头,使板子向右移动 If Line1.X2 >= Picture1.Left + Picture1.Width Then Line1.X2 = Picture1.Left + Picture1.Width Else Line1.X1 = Line1.X1 + (100 + move_x) Line1.X2 = Line1.X2 + (100 + move_x) End If End Select End Sub 四、作业：添加代码，使小球撞击到弹板时能随机变化颜色。
