首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt4.vbp,窗体中有一个矩形和一个圆,程序运行时,单击“开始”按钮,圆可以横向或纵向运行(通过选择单选按钮来决定),碰到矩形的边时,则向其相反方向运动,单击“停止”按钮,则停止运动,如图所示。可以通过选择单选按钮随时改变运
在考生文件夹下有一个工程文件sjt4.vbp,窗体中有一个矩形和一个圆,程序运行时,单击“开始”按钮,圆可以横向或纵向运行(通过选择单选按钮来决定),碰到矩形的边时,则向其相反方向运动,单击“停止”按钮,则停止运动,如图所示。可以通过选择单选按钮随时改变运
admin
2016-06-23
46
问题
在考生文件夹下有一个工程文件sjt4.vbp,窗体中有一个矩形和一个圆,程序运行时,单击“开始”按钮,圆可以横向或纵向运行(通过选择单选按钮来决定),碰到矩形的边时,则向其相反方向运动,单击“停止”按钮,则停止运动,如图所示。可以通过选择单选按钮随时改变运动方向。
已经给出了所有控件和程序,但程序不完整,请去掉程序中的注释符,把程序中的?改为正确的内容。
注意:不得修改已经存在的内容和控件属性,最后将修改后的文件按原文件名存盘。
选项
答案
[操作步骤] 步骤1:打开本题工程文件。 步骤2:打开代码编辑窗口,去掉程序中的注释符“’”,将问号改为正确的内容。 参考代码(画下划线部分是需填入的内容) Dim d As Integer Private Sub Command1_Click() Timer1.Enabled=True’当单击"开始"按钮时,Timer生效 End Sub Private Sub Command2_Click()
Timer.Enabled
=False’当单击"停止"按钮时,Timer失效 End Sub Private Sub Form_Load() d=1 End Sub Private Sub Timer1_Timer() If Option1 Then’判断Option1是否被单击 Shape2.Top=
Shape2.Top
+d*50’实现圆垂直移动 If Shape2.Top<=Shape1.
Top
OrShape2.Top+Shape2.Width>=Shape1.Top+Shape1.Height Then’判断Shape2与Shape1的位置 d=-d’当圆移出Shape1时,改变移动方向 End If Elself Option2 Then Shape2.Left=
Shape2.Left
+d*50’实现水平移动 If Shape2.Left<=Shape1.Left Or Shape2.Left+Shape2.Width>=Shape1.Left+Shape1.Width Then d=-d’当圆移出Shapel时。则改变移动方向 End If End If End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
转载请注明原文地址:https://kaotiyun.com/show/PSLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
假定有如下事件过程:PrivateSubForm_MouseDown(BuaonAsInteger,ShiftAsInteger,xAsSingle,y_AsSingle) IfButton=2Then
执行如下语句:a=InputBox("Today","Tomorrow","Yesterday",,,"Daybeforeyesterday",5)将显示一个对话框,在对话框的输入区中显示的信息是
以下叙述中错误的是()。
下列程序段的执行结果为()。A=0:B=1A=A+B:B=A+B:PrintA:BA=A+B:B=A+B:PrintA:BA=A+B:B=A+B:PrintA:B
以下程序段执行后整型变量n的值为()。n=0Fori=1to20Step5n=n+1Nexti
块结构条件语句中的必选项是______。
以下关系表达式中,其值为假的是
在VisualBasic中,要将一个窗体从内存中释放,应使用的语句是
在3种不同类型的组合框中,只能选择而不能输入数据的组合框是______。
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。在名称为Forml标题为”选课”的窗体上画一个复选框数组,名称为CHl,共有四个复选框,按顺序其标题分别是”数学”、”语文”、”外语”、”计算机”,其中”语文”、”计算机”复选
随机试题
基底膜中最主要的胶原成分是
患者,男,40岁。有上腹受伤致肝破裂。意识清楚,上腹部明显压痛,面色苍白,四肢湿冷,脉搏130次/分,血压80/60mmHg,尿少,口渴,过度换气。患者的诊断是
社会主义医学道德原则的根本宗旨是
模板、脚手架等施工设施,除按适用的标准定型选用外,一般需按设计及施工要求进行专项设计,对其()应作为重点进行控制。
货币政策中的间接信用指导包括()。Ⅰ.规定利率限额与信用配额Ⅱ.信用条件限制Ⅲ.窗口指导Ⅳ.道义劝告
现代物流的最新发展趋势有()。
实现公有制与市场经济相结合的有效途径是()。
•Youwillhearapublicrelationsmanagertellingaboutthewaytommonthecharm.•Asyoulisten,forquestions1-12,complete
Howwillthemangototheskislopesafterhisairjourney?
A、Wherethecountriesare.B、Howtomakeatravelaroundtheworld.C、Whathetoldaboutisquitetrue.D、Howtofindtheblack
最新回复
(
0
)