首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)考生文件夹中有工程文件sjt3.vbp。窗体上有一个名称为Label1、标题为“标签控件”的标签;有一个名称为Command1、标题为“命令按钮”的命令按钮。单击上述两控件中的任一控件,则在标签Label2中显示所单击控件的标题内容(标题内容前添加“
(1)考生文件夹中有工程文件sjt3.vbp。窗体上有一个名称为Label1、标题为“标签控件”的标签;有一个名称为Command1、标题为“命令按钮”的命令按钮。单击上述两控件中的任一控件,则在标签Label2中显示所单击控件的标题内容(标题内容前添加“
admin
2019-06-24
49
问题
(1)考生文件夹中有工程文件sjt3.vbp。窗体上有一个名称为Label1、标题为“标签控件”的标签;有一个名称为Command1、标题为“命令按钮”的命令按钮。单击上述两控件中的任一控件,则在标签Label2中显示所单击控件的标题内容(标题内容前添加“单击”二字),下图是单击命令按钮后的窗体外观。请去掉程序中的注释符,把程序中的?改为正确的内容。
注意:考生不得修改窗体文件中已经存在的控件和程序,最后程序按原文件名存盘。
(2)在考生文件夹下有一个工程文件sjt4.vbp,其窗体上有一个由八个图片框控件组成的控件数组、两个命令按钮及一个计时器控件,如图1所示。
程序功能:
将计时器控件设置为每隔0.5秒触发一次Timer事件。运行程序时,只显示下标为0的图片框控件数组元素,其他图片框均不可见。单击“开始”按钮,数组中的每个图片框自左至右依次显示,时间间隔为0.5秒,产生“月亮”从左向右移动的效果,如图2所示。月亮移到右端后再从左端重新开始。单击“停止”按钮,“月亮”停止移动。
要求:按照题目要求设置控件属性,去掉程序中的注释符,把程序中的?改为正确的内容。
注意:不能修改程序的其他部分和控件属性,最后将修改后的文件按原文件名进行存盘。
选项
答案
(I)【操作步骤】 步骤1:打开本题工程文件。 步骤2:打开代码编辑窗口,去掉程序中的注释符“*”,将问号改为正确的内容。 参考答案(画线部分是需考生填入的内容) Private Sub Command1_Click() Call ShowName(
Command1
)’将Command1控件传入ShowName End Sub Private Sub Label1_Click() Call ShowName(
Label1
)’将Label控件传入ShowName End Sub Private Sub ShowName(c As
Control
)’两者类型都为控件 If TypeOf c Is CommandButton Then Label2.Caption="单击"&Command1.Caption End If If TypeOf c Is Label Then
Label2.Caption
="单击"&Labell.Captlon End If End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。 (2)【操作步骤】 步骤1:打开本题工程文件,将Timer1的Interval属性设置为500。 步骤2:打开代码编辑窗口,去掉程序中的注释符“’”,将问号改为正确的内容。 参考答案(画线部分是需考生填入的内容) Private Sub Form_Load() Picture1(0).Left=0 Picture1(0).Top=100 For k=1 To 7 Picture1(k).Visible=
False
’当窗体装载时。下标为1—7的图片都不显示 Next End Sub Private Sub Command1_Click() Timer1.Enabled=
True
’单击Command1按钮。Timer事件触发 End Sub Private Sub Command2 Click() Timer1.Enabled=False End Sub Private Sub Timer1 Timer() Statlc 1 As Integer Picture1(i).Visible=False i=i+1 If i=
8
Then’判断图片是否执行到最后一张 i=
0
’重置i值 End If Picturel(i).Visible=True End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
(1)单击两个控件中的任一个,通过Call语句调用函数ShowName()实现在标签Label2中显示所单击控件的标题内容,自定义函数ShowName()用于判断控件的类型,CommandButton表示命令按钮,Label表示标签,如果变量c的控件类型是CommandButton,那么Label2的Caption属性设置为"单击"&Command1.Caption,显示控件的标题内容。
(2)首先将Timerl的Interval属性设置为500,使计时器控件设置为每隔0.5秒触发一次。在Foral_Load事件过程中,通过图片框Visible属性设置只显示下标为0的图片框控件数组元素,其他下标为1一7的图片框均不显示。单击“开始”按钮,计时器的Enabled属性设置为True,Timer1_Timer事件启动,运用循环语句将数组中的每个图片框自左向右依次显示,产生“月亮”从左向右移动的效果,循环变量设置为局部变量Static,使“月亮”移到右端后再从左端重新开始。单击“停止”按钮,“月亮”停止移动。
转载请注明原文地址:https://kaotiyun.com/show/lqUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在考生文件夹中有一个工程文件sjt5.vbp,如图3—164所示。运行程序时,从文件中读入矩阵数据并放入二维数组a中。单击“计算”按钮时,将统计矩阵两个对角线的元素中能被3整除的个数,统计结果显示在标签lblFirst中;同时计算矩阵主对角线的元素之和,计
(1)在考生目录下有一个工程文件vbsj3.vbp,窗体上有一个命令按钮cmdNext(标题为“下一个”)。要求:在窗体上建立一个单选按钮数组optItem,含4个单选按钮,标题分别为“A”、“B”、“C”、“D”,初始状态下,“A”为选中状态。如图3—
在窗体上画一个命令按钮,其名称为Command1,然后编写如下代码:OptionBase1PrivateSubCommand1_Click()Dimaa=Array(1,2,3,4):j=1For
编写如下程序:PrivateSubCommand1_Click()Subsubf(s1AsString,s2AsString)Dimstr1AsString,str2AsString
设在窗体上有一个名称为Check1的复选框数组,并有以下事件过程:PrivateSubCheck1_Click(IndexAsInteger)…EndSub则下面叙述中错误的是
下面程序的功能是输出100以内所有素数:PrivateSubCommand1_Click()Forn=2To100isprime=True:k=2DoWhilek
设窗体上有一个名称为List1的列表框,并有若干列表项。下面语句中不能在所有列表项之后追加一个列表项的是
数据库管理系统是
在窗体上有1个名为Cd1的通用对话框,为了在运行程序是时打开保存文件对话框,险则在程序中应使用的语句是
考生文件夹下有工程文件sjt5.vbp和数据文件in5.txt。in5.txt中有多条记录,每条记录占一行,含4个数据项,数据项的含义依次是:姓名、数学成绩、语文成绩、英语成绩。窗体上按钮“读取数据”的功能是把in5.txt中的所有记录读到数组a中(每个数
随机试题
脂肪进入小肠可以引起
适用于具有一定技术开发能力的企业的新产品开发方式是()。
下列关于我国为进一步扩大改革开放采取的措施,说法错误的是:
属于肩关节外展拮抗肌的是()。
《中华人民共和国合同法》自1999年10月1日生效后,原《经济合同法》《涉外经济合同法》《技术合同法》的效力为()
四逆汤的组成药物是
乙女与甲男婚后多年未生育,后甲男发现乙女因不愿生育曾数次擅自中止妊娠,为此甲男多次殴打乙女。乙女在被打住院后诉至法院要求离婚并请求损害赔偿,甲男以生育权被侵害为由提起反诉,请求乙女赔偿其精神损害。法院经调解无效,拟判决双方离婚。下列哪些选项是正确的?(20
[背景资料]某项工程建设项目,业主与施工单位按《建设工程施工合同(示范)文本》签订了工程施工合同,工程未投保保险。在工程施工过程中,遭受暴风雨不可抗力的袭击,造成了相应的损失,施工单位及时向监理工程师提出索赔要求,并附有与索赔有关的资料和证据。索赔报告中
党的十八届二中全会和十二届全国人大一次会议审议通过的《国务院机构改革和职能转变方案》,把职能转变放在突出位置,得到社会各界普遍好评。2013年5月15日,中国政府网公布了《国务院关于取消和下放一批行政审批项目等事项的决定》。随着133项行政审批等事项的取消
情景:新年就要到了,为了迎接新年,学校准备在12月31日晚在学校大礼堂举行联欢会。请你根据学过的知识写一篇80词左右的通知。任务:1.晚会7点开始,请全体师生准时参加。2.衣着整洁。3.晚会期间保持安静。4.禁止吸烟。通知写在答题卡上该题的序
最新回复
(
0
)