首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)在考生目录下有一个工程文件sjt3.vbp,窗体上有一个组合框Combo1,其中已经预设了内容;还有一个文本框Text1和三个命令按钮,名称分别为Command1、Command2、Command3,标题分别为“修改”、“确定”、“添加”。程序运行时
(1)在考生目录下有一个工程文件sjt3.vbp,窗体上有一个组合框Combo1,其中已经预设了内容;还有一个文本框Text1和三个命令按钮,名称分别为Command1、Command2、Command3,标题分别为“修改”、“确定”、“添加”。程序运行时
admin
2015-06-30
50
问题
(1)在考生目录下有一个工程文件sjt3.vbp,窗体上有一个组合框Combo1,其中已经预设了内容;还有一个文本框Text1和三个命令按钮,名称分别为Command1、Command2、Command3,标题分别为“修改”、“确定”、“添加”。程序运行时,“确定”按钮不可用,如图所示。
程序的功能是:在运行时,如果选中组合框中的一个列表框,单击“修改”按钮,则把该项复制到Text1中(可在Text1中修改),并使“确定”按钮可用;若单击“确定”按钮,则把修改后的Text1中的内容替换组合框中该列表项的原有内容,同时使“确定”按钮不可用;若单击“添加”按钮,则把在Text1中的内容添加到组合框中。
所提供的窗体文件已经给出了所有控件和程序,但程序不完整,请去掉程序中的注释符,把程序中的“?”改为正确的内容。但不能修改程序中的其他部分,也不能修改控件和属性。最后把修改后的文件按原文件名存盘。
(2)在考生目录下有一个工程文件Sjt4.vbp,窗体中有两个滚动条分别表示红灯亮和绿灯亮的时间(秒),移动滚动框可以调节时间,调节范围为1—10秒。刚运行时,红灯亮。单击“开始”按钮则开始切换:红灯到时后自动变为黄灯,1秒后变为绿灯;绿灯到时后自动变为黄灯,1秒后变为红灯,如此切换(如图所示)。
所提供的窗体文件已经给出了所有控件和程序,但程序不完整,请去掉程序中的注释符,把程序中的“?”改为正确的内容。
提示:在三个图片框picture1、picture2、picture3中分别放置了红灯亮、绿灯亮、黄灯亮的图标,并重叠在一起,当要使某个灯亮时,就使相应的图片框可见,而其他图片框不可见,并保持规定时间,时间到就切换为另一个图片框可见,其他图片框不可见。
注意:考生不得修改工程中已经存在的内容和控件属性,最后把修改后的文件按原文件名存盘。
选项
答案
(1)【操作步骤】 步骤1:打开本题工程文件,确定控件的属性。程序中用到的控件及属性见表3.154。 [*] 步骤2:分析并编写程序代码。 程序提供代码 Private Sub Command1_Click() Text1 = Combo1.Text Command2.Enabled = True End Sub Private Sub Command2_Click() Combo1.List(Form1.Combo1.ListIndex) = Text1 Text1 = "" Command2.Enabled = False End Sub Private Sub Command3_Click() Combo1.AddItem Text1 End Sub 程序结束 步骤3:调试并运行程序,关闭程序后按题目要求存盘。 (2)【操作步骤】 步骤1:打开本题工程文件,计时器的Enabled属性设为True。 步骤2:分析并编写程序代码。 程序提供代码 Dim red, green Private Sub Command1_Click() red = HScroll1.Value green = HScroll2.Value Timer1.Enabled = True End Sub Private Sub Timer1_Timer() If Picture1.Visible Then red = red - 1 If red = 0 Then Picture1.Visible = False Picture3.Visible = True End If ElseIf Picture3.Visible Then Picture3.Visible = False If red = 0 Then Picture2.Visible = True red = HScroll1.Value Else Picture1.Visible = True green = HScroll2.Value End If ElseIf Picture2.Visible Then green = green - 1 If green = 0 Then Picture2.Visible = False Picture3.Visible = True End If End If End Sub 程序结束 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
转载请注明原文地址:https://kaotiyun.com/show/5MQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
若要添加CommonDialog控件,则应从“工程”菜单中选定“部件”,在“部件”对话框的“控件”选项卡中选择______,将控件添加到工具箱中。
在使用打印直接输出信息时,下列哪个属性或方法实现了使文件结束打印()。
按条件f对关系R进行选择,其关系代数表达式为______。RooR
如果一个工程含有多个窗体及标准模块,则以下叙述中错误的是()
为清除PietureBox控件中的图形,下列方法正确的是()
栈和队列______。
完全不考虑程序的内部结构和内部特征,而只是根据程序功能导出测试用例的测试方法是
循环链表的主要优点是()
设有语句Open"c:\Test.Dat"ForOutputAs#1则以下错误的叙述是______。
在n个运动员中选出任意r个人参加比赛,有很多种不同的选法,选法的个数可以用公式计算,下图窗体中3个文本框的名称依次是Text1、Text2、Text3。程序运行时在Text1、Text2中分别输入n和r的值,单击Command1按钮即可求出选法的个数,并显
随机试题
A.第一对鳃弓B.第一、二对鳃弓C.第二、三、四对鳃弓D.第三、四、五对鳃弓E.第一、二、三对鳃弓
导致妇科疾病的外来因素中,外感常以何邪为主
胸膜腔闭式引流的引流管脱出时应首先
下列关于质量管理与质量控制关系的说法正确的是()。
甲工业企业为增值税一般纳税企业,适用的增值税税率为17%。本期购入原材料100公斤,价款为57000元(不含增值税额)。验收入库时发现短缺5%,经查属于运输途中合理损耗。该批原材料入库前的挑选整理费用为380元。该批原材料的实际单位成本为每公斤( )
制约人的行为和动机的根本条件是()。
以下哪些是宪法规范不同于刑事、民事、行政等领域的法律规范的特点?()
求函数y=(x∈(0,+∞))的单调区间与极值点,凹凸区间与拐点及渐近线.
为了避免流程图在描述程序逻辑时的灵活性,提出了用方框图来代替传统的程序流程图,通常也把这种图称为()。
结构化程序设计的主要特征是()。
最新回复
(
0
)