首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)在考生文件夹下有一个工程文件sjt3.vbp,窗体上有一个矩形和一个圆,还有垂直和水平滚动条各一个。程序运行时,移动某个滚动条的滚动块,可使圆做相应方向的移动。滚动条刻度值的范围是圆可以在矩形中移动的范围。以水平滚动条为例,滚动块在最左边时,圆靠在矩
(1)在考生文件夹下有一个工程文件sjt3.vbp,窗体上有一个矩形和一个圆,还有垂直和水平滚动条各一个。程序运行时,移动某个滚动条的滚动块,可使圆做相应方向的移动。滚动条刻度值的范围是圆可以在矩形中移动的范围。以水平滚动条为例,滚动块在最左边时,圆靠在矩
admin
2017-09-22
25
问题
(1)在考生文件夹下有一个工程文件sjt3.vbp,窗体上有一个矩形和一个圆,还有垂直和水平滚动条各一个。程序运行时,移动某个滚动条的滚动块,可使圆做相应方向的移动。滚动条刻度值的范围是圆可以在矩形中移动的范围。以水平滚动条为例,滚动块在最左边时,圆靠在矩形的左边线上,如图3.153(a)所示;滚动块在最右边时,圆靠在矩形的右边线上,如图3。153(b)所示。垂直滚动条的情况与此类似。
文件中已经给出了全部控件和程序,但程序不完整,请去掉程序中的注释符,把程序中的“?”改为正确的内容。注意:不能修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。
(2)在考生文件夹下有一个工程文件sjt4.vbp。窗体中已经给出了所有控件,如图3.154所示。运行时,单击“发射”按钮,航天飞机图标将向上运动,速度逐渐加快,全部进入云中后则停止,并把飞行距离(用坐标值表示)、所用时间(单位为秒)分别显示在标签Label1和Label2中;单击“保存”按钮,则把飞行距离、所用时间存入考生文件夹下的out4.txt文件中。
文件中已经给出了程序,但不完整,请去掉程序中的注释符,把程序中的“?”改为正确的内容。
注意:不能修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。
选项
答案
(1)步骤1:打开考生文件下的本题工程文件sjr3.vbp,在代码编辑窗口,去掉程序中的注释符“’”,将问号“?”改为正确的内容。参考代码: HScroll1.Max=Shape2.Width+ Shape2.Left-Shape1.Width VScroll1.Max=Shape2.Height+ Shape2.Top-Shape1.Height: Shape1.Left=HScroll1.Value Shape1.Top=VScroll1 步骤2:按要求将文件保存至考生文件夹中。 (2)步骤1:打开考生文件夹中的本题工程文件sjt4.vbp,在代码编辑窗口,去掉程序中的注释符“’”,将问号“?”改为正确的内容。参考代码: Timerl.Enabled=True Timerl.Enabled=False d=d-Image1.Top t=t+1 步骤2:按
键运行程序,先单击“发射”按钮,计算完毕后单击“存盘”按钮,最后单击窗体右上角的关闭按钮结束程序。 步骤3:按要求将文件保存至考生文件夹中。
解析
(1)本题在窗体加载过程中初始化水平滚动条和垂直滚动条的Min属性和Max属性值,以使其能与圆形Shape1所能到达的左边界、右边界、上边界、下边界一致,其中:HScroll1.Max=Shape2.Width+Shape2.Left-Shape1.Width,VScrolll.Max=Shape2.Height+Shape2.Top-Shape1.Height。当水平或垂直滚动条移动时,通过在其Change事件过程中设置Shape1的Left属性值或Top属性值与滚动条的Value属性值一致即可。
(2)本题通过计时器来控制航天飞机移动。单击“发射”按钮时启动计时器(即Timerl.Enabled=True),并记录下此时航天飞机(Imagel)上部的坐标值(d=Image1.Top);在计时器的Timer事件过程中,每次让航天飞机向上移动50的a倍(a为实现航天飞机加速移动的系数),如果移动后航天飞机己全部进入云中(即Imagel.Top+Imagel.Height<=Image2.Top+Image2.Height-200),则通过停止计时器(即Timerl.Enabled=False)来停止航天飞机上移,并将此时飞行距离d(d=d.Imagel.Top)显示在标签Label1中,飞行时间(t*Timerl.Interval/1000)显示在标签Label2中。如果航天飞机还没全部进入云中,则加速系数增加0.1,并用变量t记录一次飞行时间(t=t+1)。
转载请注明原文地址:https://kaotiyun.com/show/wjGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
阅读下列程序: PrivateSubCommand1_Click() DimiAsInteger,kAsInteger k=2 Fori=1To3 PrintH(k); Nexti EndSub Fu
一个工程中含有窗体Form1、Form2和标准模块Model1,如果在Fomil中有语句PublicXAsInteger,在Model1中有语句PublicYAsInteger.则以下叙述中正确的是
为了使命令按钮(名称为Command1)右移200,应使用的语句是
假定有下表所列的菜单结构:要求程序运行后,如果单击菜单项“大图标”,则在该菜单项前添加一个“√”。以下正确的事件过程是
CommonDialog控件可以显示______种对话框。
在下图中,要在窗体的标签Label1上显示“二级VB等级考试”字样,标签属性应设置为______。
在窗体上有一个命令按钮Command1,编写如下程序:PrivateSubCommand1_Click()Printpp1(3,7)EndSubPublicFunctionpp1(xAsSingle
窗体上有两个按钮,执行程序后按Cancel按钮的输出结果是______。PrivateSubCommandl_Click()Print“北京”;EndSubPrivateSubCommand2,_Click()
要把一个命令按钮设置成无效,应设置属性______的值为False。
随机试题
公式“=YEAR(’’2015-5-14’’)”的值为()
评价化学毒物急性毒性大小最重要的参数是
骨性关节炎的诊断最有价值
A、职业特殊性B、理智坚持C、医师义务D、医师权力E、尊重患者不以个人利益满足与否为衡量前提是
城市规划编制的特点有()。①综合性;②相对性;③政策性;④超前性;⑤短期性;⑥长期性;⑦科学性;⑧多样性。
2009年副食加工店缴纳个人所得税的应纳税所得额()元。
下列关于山东省的交通建设,说法不正确的是:
A、B、C、D4台主机之间哪些可以直接通信?哪些需要通过设置网关(或路由器)才能通信?请画出网络连接示意图,并注明各个主机的子网地址和主机地址。若要使主机A、B、C、D4台主机在这个网上都能直接相互通信,可采取什么办法?
______caresmostaboutpoliticsandsocialproblems?______wasfirstplayedmostlyfordancingthenforlistening?
Sometimeinthenextcentury,thefamiliarearly-newspaperonthefrontgatewilldisappear.Andinsteadofreadingyournewspap
最新回复
(
0
)