首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)在考生目录下有一个工程文件sjt3.vbp,窗体上有一个组合框Combo1,其中已经预设了内容;还有一个文本框Text1和三个命令按钮,名称分别为Command1、Command2、Command3,标题分别为“修改”、“确定”、“添加”。程序运行时
(1)在考生目录下有一个工程文件sjt3.vbp,窗体上有一个组合框Combo1,其中已经预设了内容;还有一个文本框Text1和三个命令按钮,名称分别为Command1、Command2、Command3,标题分别为“修改”、“确定”、“添加”。程序运行时
admin
2015-06-30
28
问题
(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全国计算机二级
相关试题推荐
在结构化设计方法中,数据流图表达了问题中的数据流与加工间的关系,且每一个______实际上对应一个处理模块。
在数据库设计中,将E-R图转换为关系模式的过程属于()。
软件调试的目的是______。
在菜单编辑器中建立一个菜单,名称为mymenu,用下面的语句可以把它作为弹出式菜单弹出,请填空。Form1.【】mymenu
当数据的物理结构(存储结构、存取方式等)改变时,不影响数据库的逻辑结构,从而不致引起应用程序的变化,这是指数据的【】。
DateTime是一个Date类型的变量,以下赋值语句中正确的是()
某算法的空间花费s(n)=100nlog2n+0.5logn+1000n+2000,其空间复杂度为______。
下列语句用来设置窗体Forml的属性,其中在运行时不能正确操作的语句是
在显示字体对话框之前必须设置【】属性,否则,将发生字体不存在的错误。
用树形结构来表示实体之间联系的模型称为______。
随机试题
Excel2010工作簿的某一工作表被删除后,下列说法错误的是____________。
混凝土灌注桩质量检验批的主控项目为:()。
建设工程项目信息形态有( )形式。
买方在交付了期权费后,即取得在合约规定的到期日或到期日以前按协定价格买入或卖出一定数量相关股票的权利,称为()。
下列业务中,应当缴纳营业税的有()。
甲公司拥有对四家公司的控制权,其下属子公司的会计政策和会计估计均符合会计准则规定。不考虑其他因素,甲公司在编制20×6年合并财务报表时,对其子公司进行的下述调整中,正确的是()。
已知集合M={x|—1≤x≤3},N={x|1<x<6,x∈Z),则M∩N=_______.
医学专家宣布:他们经过临床实验发现,普通的感冒病毒可以杀死癌细胞。有多名自愿的患者在接受这项治疗后,身上的癌细胞都成萎缩状。专家们指出,要运用基因工程的办法研究出能引起感冒的病毒有机体,让含有易变基因的癌细胞染上感冒。而这项新技术,估计每年可望挽救十万名癌
若以学龄前儿童为购买对象,“喜之郎”果冻布丁可选择()媒体。
Itisobviousthatithasbeentoolatetotakeaction.
最新回复
(
0
)