《VB趣味编程《分等级的弹球小游戏》导学案.pdf》由会员分享,可在线阅读,更多相关《VB趣味编程《分等级的弹球小游戏》导学案.pdf(10页珍藏版)》请在taowenge.com淘文阁网|工程机械CAD图纸|机械工程制图|CAD装配图下载|SolidWorks_CaTia_CAD_UG_PROE_设计图分享下载上搜索。
项目六 分等级 的弹球小游戏一、设计界面如下二、设置属性如下1按钮属性设置如下2Picture 及小球、球拍的属性设置如下3Timer 属性设置如下4label 属性设置如下三、编写代码如下Private Sub Picture1_KeyDown(KeyCode As Integer,Shift As Integer)Select Case KeyCode Case 37 如果按下左箭头,使板子向左移动If Line1.X1=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 四、作业:添加代码,使小球撞击到弹板时能随机变化颜色。