2013年计算机等级考试二级VB精选题及答案14

全国等级考试资料网 2019-01-17 18:57:48 63
简单应用(2小题,每题20分,计40分)

注意:下面出现的“考生文件夹”均为%USER%

*

(1)在考生目录下有一个工程文件sjt3.vbp,窗体上有一个组合框Combo1,其 中已经预设了内容;还有一个文本框Text1和三个命令按钮,名称分别为Command1、Command2、Command3,标题分别为“修改”、“确定”、“添加”。程序运行时,“确定”按钮不可用,如图所示。

程序的功能是:在运行时,如果选中组合框中的一个列表项,单击“修改”按钮,则把该项复制到Text1中(可在Text1中修改),并使“确定”按钮可用;若单击“确定”按钮, 则把修改后的Text1中的内容替换组合框

中该列表项的原有内容,同时使“确定”按钮不可用;若单击“添加”按钮,则把在Text1中的内容添加到组合框中。所提供的窗体文件已经给出了所有控件和程序,但程序不完整,请去掉程序中的注释符,把程序中的 ? 改为正确的内容。但不能修改程序中的其他部分, 也不能修改控件的属性。最后把修改后的文件按原文件名存盘。

解题思路:

启动Visual Basic系统,打开考生文件夹下需编辑的工程文件sjt3.vbp,相应的窗体文件名为sjt3.frm。

由于所提供的窗体控件不完整,通过属性窗口将“确定”按钮的Enabled属性设为False。

由于所提供的窗体程序不完整,在“修改”按钮的Private Sub Command1_Click()事件过程中,有一处地方需要修改。

1) 将语句

’Command2. ? = True

改为

Command2.Enabled = True

在“确定”按钮的Private Sub Command2_Click()事件过程中,有一处地方需要修改。

1) 将语句

’Combo1.List( ? ) = Text1

改为

Combo1.List(Combo1.ListIndex) = Text1

在“添加”按钮的Private Sub Command3_Click()事件过程中,有一处地方需要修改。

1) 将语句

’? Text1

改为

Combo1.AddItem Text1

参考文件:c:wexam26990001hlpsys参考答案sjt3.vbp、sjt3.frm、sjt3.frx、sjt3.vbw

请把这些文件复制到c:wexam26990001中,然后打开sjt3.vbp文件并运行。

(2)在考生目录下有一个工程文件sjt4.vbp,窗体中的两个滚动条分别表示红 灯亮和绿灯亮的时间(秒),移动滚动框可以调节时间,调节范围为1-10 秒。刚运行时,红灯亮。单击“开始”按钮则开始切换:红灯到时后自动 变为黄灯,1秒后变为绿灯;绿灯到时后自动变为黄灯,1秒后变为红灯, 如此切换(如图所示)。 所提供的窗体文件已经给出了所有控件和程序,但程序不完整,请去掉程序中的注释符,把程序中的 ?改为正确的内容。

提示:

在三个图片框picture1、picture2、picture3中分别放置了红灯亮、绿 灯亮、黄灯亮的图标,并重叠在一起,当要使某个灯亮时,就使相应的 图片框可见,而其他图片框不可见,并保持规定的时间,时间到就切换为另一个图片框可见,其他图片框不可见。

注意:

考生不得修改工程中已经存在的内容和控件属性,最后把修改后的文件按原文件名存盘。

解题思路:

启动Visual Basic系统,打开考生文件夹下需编辑的工程文件sjt4.vbp,相应的窗体文件名为sjt4.frm。

由于所提供的窗体程序不完整,在命令按钮的Private Sub Command1_Click()中,有二处地方需要修改。

1) 将语句

’? = HScroll1.Value

改为

red = HScroll1.Value

2) 将语句

’Timer1.Enabled = ?

改为

Timer1.Enabled = True

由于所提供的窗体程序不完整,在计时器的Private Sub Timer1_Timer()中,有二处地方需要修改。

1) 将语句

’? .Visible = False

改为

Picture1.Visible = False

2) 将语句

’green = ?

改为

green = green - 1

参考文件:c:wexam26990001hlpsys参考答案sjt4.vbp、sjt4.frm、sjt4.frx、sjt4.vbw

请把这些文件复制到c:wexam26990001中,然后打开sjt4.vbp文件并运行。

相关资料

相关阅读