首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)考生文件夹中有工程文件sjt3.vbp。窗体上有一个名称为Label1、抓题为“标签控件”的标签;有一个名称为Command1、标题为“命令按钮”的命令按钮、单击上述两控件中的任一控件,则在标签Label2中显示所单击控件的标题内容(标题内容前添加“
(1)考生文件夹中有工程文件sjt3.vbp。窗体上有一个名称为Label1、抓题为“标签控件”的标签;有一个名称为Command1、标题为“命令按钮”的命令按钮、单击上述两控件中的任一控件,则在标签Label2中显示所单击控件的标题内容(标题内容前添加“
admin
2020-07-22
44
问题
(1)考生文件夹中有工程文件sjt3.vbp。窗体上有一个名称为Label1、抓题为“标签控件”的标签;有一个名称为Command1、标题为“命令按钮”的命令按钮、单击上述两控件中的任一控件,则在标签Label2中显示所单击控件的标题内容(标题内容前添加“单击”二字),下图是单击命令按钮后的窗体外观。请去掉程序中的注释符,把程序中的?改为正确的内容。
注意:考生不得修改窗体文件中已经存在的控件和程序,最后程序按原文件名存盘。
(2)在考生文件夹下有一个工程文件sit4.vbp,其窗体上有一个由八个图片框控件组成的控件数组、两个命令按钮及一个计时器控件,如图1所示。
程序功能:
将计时器控件设置为每隔0.5秒触发一次Timer事件。运行程序时,只显示下标为0的图片框控件数组元素,其他图片桩均不可见。单击“开始”按钮,数组中的每个图片框自左至右依次显示,时间间隔为0.5秒,产生“月亮”从左向右移动的效果,如图2所示。月亮移到右端后再从左端重新开始。单击“停止”按钮,“月亮”停止移动。
要求:按照题目要求设置控件属性,去掉程序中的注释符,把程序中的?改为止确的内容。
注意:不能修改程序的其他部分和控件属性,最后将修改后的文件按原文件名进行存盘。
选项
答案
(1)步骤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 Label.Caption="单击"&Label1.Caption End If End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。 (2)步骤1:打开本题工程文件,将Timerl的Interval属性设置为500。 步骤2:打开代码编辑窗口,去掉程序中的注释符“’’,将问号改为正确的内容。 参考答案 Private Sub Form_Load() Picturel(0).Left=0 Picturel(0).Top=100 For k=1 To 7 Picturel(k).Visible=False 当窗体装载时,下标为1~7的图片都不显示 Next End Sub Private Sub Command1_C1ick() Timerl.Enabled=True’单击Command1按钮,Timer事件触发 End Sub Private Sub Command2_Click() Timerl.Enabled=False End Sub Private Sub Timerl Timer() Statlc i As Integer Picturel(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的控件类型是Com-mandButton,那么Label2的Caption属性设置为"单击"&Command1.Caption,显示控件的标题内容。
(2)首先将Timerl的Interval属性设置为500,使计时器控件设置为每隔0.5秒触发一次。在Form_Load事件过程中,通过图片框Visible属性设置只显示下标为0的图片框控件数组元素,其他下标为1~7的图片框均不显示。单击“开始”按钮,计时器的Enabled属性设置为True,Timerl_Timer事件启动,运用循环语句将数组中的每个图片框自左向右依次显示,产生“月亮”从左向右移动的效果,循环变量设置为局部变量Static,使“月亮”移到右端后再从左端重新开始。单击“停止”按钮,“月亮”停止移动。
转载请注明原文地址:https://kaotiyun.com/show/UJHp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设窗体名称为frm1。以下叙述中正确的是()。
以下数组定义语句中,错误的是
设:a=2,b=8,c=6,d=3,表达式a>bAndNot(c>d)Ord>c的值是
窗体上有一个文本框Text1和一个水平滚动条HScroll1,且HScroll1的Min和Max属性值分别为10和40。程序运行后,如果移动HScroll1的滚动框,则文本框Text1中的文字大小随着滚动框位置的变化同步改变。以下能实现上述操作的过程是(
以下变量名中合法的是
以下关于文件的叙述中,错误的是
在窗体上画一个列表框List1、一个组合框Combo1和一个文本框Text1,编写如下程序代码:PrivateSubForm_Load()List1.AddItem"111"List1.AddItem"222"Lis
设已经在菜单编辑器中设计了弹出式菜单mnuStyle,要求程序运行时,当用户在文本框Text1上单击鼠标右键时,能够弹出该菜单,则应使用的事件过程是()。
窗体上有三个水平滚动条,名称分别为HSRed、HSGreen和HSBlue,取值范围均是0~255,代表颜色的三种基色。改变滚动框的位置,可以改变三种基色的值,从而改变窗体的背景色,如下图所示。程序代码如下:Dimcolor(3)AsIn
一棵二叉树中共有80个叶子结点与70个度为1的结点,则该二叉树中的总结点数为
随机试题
在CPU的状态寄存器中,若符号标志为“1”,表示运算结果是()。
A.肽键B.离子键C.二硫键D.氢键E.疏水键蛋白质变性时不被破坏的化学键是
关于羊水正确的是
患者女,69岁,慢性支气管炎5年,近日感冒后病情加重,夜间咳嗽频繁,痰量多。查体:神志清,口唇轻度发绀,双肺呼吸音低,动脉血气分析:PaO285mmHg,PaCO245mmHg,经治疗后病情缓解,护士对其进行的健康教育中不包括()
某工程建设项目进行货物招标,规定各投标人必须先提交投标保证金70万元,以下投标保证金有效的有()。
票据丧失后的救济途径包括()。
某税务师事务所属于增值税一般纳税人,2017年4月提涉税咨询服务,取得含税收入800000元;销售自己使用过的2008年购人的小汽车1辆,取得含税收入52000元。根据增值税法律制度的规定,该事务所上述业务应缴纳增值税()元。
某社会工作服务机构承接的“城市低保家庭就业促进”项目结束后,该社会工作服务机构安排评估人员运用程序逻辑模式对项目进行成效评估。评估人员通过查阅服务档案了解到,社会工作者为了让服务对象更积极地面对就业,举办了4次政策宣传活动,开展了2个“自力更生”
视崖实验
ManyAdecadeago,atatimewhenplaiceslikeIvoryCoastandEquatorialGuineawerebeinglargelyignoredbythepetroleumwor
最新回复
(
0
)