全国计算机等级考试二级VB全真上机试题解析Word格式文档下载.docx
《全国计算机等级考试二级VB全真上机试题解析Word格式文档下载.docx》由会员分享，可在线阅读，更多相关《全国计算机等级考试二级VB全真上机试题解析Word格式文档下载.docx（15页珍藏版）》请在冰豆网上搜索。
不得修改已经给出的程序和已有控件的属性。
在结束程序运行之前，必须选中一个单选按钮和至少一个复选框，并单击"
按钮。
必须使用窗体右上角的关闭按钮结束程序，否则无成绩。
分析：
单选按钮OptionButton和选择框CheckBox的简单应用OptionButton控件和CheckBox控件功能相似，但是二者间也存在着重要差别。
在选择一个OptionButton时，同组中的其它OptionButton控件自动无效。
相反，可以选择任意数量的CheckBox控件。
只要注意了这一点本题可以在C1_Click事件中判断他们的选中情况OptionButton的Value为True表示选中,CheckBox的Value=1时表示选中。
第3题：
在名称为Form1的窗体上画一个标签，名称为L1，标签上显示"
请输入密码"
，在标签的右边画一个文本框，名称为Text1，其宽、高分别为2000和300，设置适当的属性使得在输入密码时，文本框中显示"
*"
字符，此外再把窗体的标题设置为"
密码窗口"
，以上这些设置都只能在属性窗口中进行设置，运行时的窗体如图所示。
*注意：
存盘时必须存放在考生文件夹下，工程文件名为sjt1.vbp，窗体文件名为sjt1.frm。
创建的对象设置属性。
属性窗口（选中对按[F4]调出）给出了设置所有的窗体对象属性的简便方法。
在"
视图"
菜单中选择"
属性窗口"
命令、单击工具栏上的"
按钮或使用控件的上下文菜单，都可以打开属性窗口。
在本题中要求对于密码框的设定,只要为Text1的PasswordChar属性设置为*即可完成
第4题：
在考生文件夹下有一个工程文件sjt3.vbp，窗体上已经有一个标签L1，请画一个单选按钮数组，名称为Op1，含三个单选按钮，它们的Index属性分别为0、1、2，标题依次为"
飞机"
火车"
汽车"
，再画一个名称为Text1的文本框。
窗体文件中已经给出了Op1的Click事件过程，但不完整，要求去掉程序中的注释符，把程序中的？
改为正确的内容，使得在运行时单击"
单选按钮时，在Text1中显示"
我坐飞机去"
我坐火车去"
，单击"
我开汽车去"
注意：
不能修改程序中的其他部分。
最后把修改后的文件按原文件名存盘。
本题考查对于OptionButton控件的了解,OptionButton控件显示一个可以打开或者关闭的选项,判断它是否被选中使用的是value属性,选中为True,反之为False。
一般在使用OptionButton控件使大多数人喜欢使用控件数组,在第一题中SelectCas语句是根据表达式的值，来决定执行几组语句中的其中之一。
根据后续的语句我们可以知道,这里需要根据用户的选择进行分流,分流的依据是用户选择了那一个OptionButton,这个可以由Index得到,这里填入Index,第二个空白,我们只要知道OptionButton数组从零开始,不难判断Op1
（1）.Caption是"
我们只能"
坐"
填入a即可。
第5题
在考生文件夹下有一个工程文件sjt5.vbp，窗体上有两个图片框，名称为
P1、P2，分别用来表示信号灯和汽车，其中在P1中轮流装入"
黄灯.ico"
红灯.ico"
绿灯.ico"
文件来实现信号灯的切换；
还有两个计时器Timer1和Timer2，Timer1用于变换信号灯，黄灯1秒，红灯2秒，绿灯3秒；
Timer2用于控制汽车向左移动。
运行时，信号灯不断变换，单击"
开车"
按钮后。
汽车开始移动，如果移动到信号灯前或信号灯下，遇到红灯或黄灯，则停止移动，当变为绿灯后再继续移动。
在窗体中已经给出了全部控件和程序，但程序不完整，
要求阅读程序并去掉程序中的注释符，把程序中的？
改为正确的内容，使其实现上述功能，但不能修改程序中的其他部分，也不能修改控件的属性。
最后把修改后的文件以原文件名存盘。
本题中涉及三个事件
点击开车按钮C1_Click,汽车开始启动,由题面知道汽车的开动由Timer2控制,那么这里必须启动Timer2,所以填入Timer2.Enable=True
红绿灯由Timer1控制,在Timer1的事件Timer1_Timer中根据时间a来更换P1.Picture的图像,达到红绿灯转换的效果,如果看到其他灯已经有了,这里填入"
绿灯.ioc"
是简单的选择,仔细分析要在绿灯有三秒,也必须这样填写
最后是汽车的移动,已知是由Timer2操作的,在它的事件Timer2_Timer中要移动汽车,使用了picture的Move方法,平行向右移动,改变Left值,这里填入picture1.Left即可实现。
其他关于Timer控件以及picture控件的属性方法事件请自己参阅有关资料。
第6题：
在考生文件夹下有一个工程文件sjt5.vbp，请在窗体上画两个框架，其名称分别为F1和F2，标题分别为"
交通工具"
和"
到达目标"
在F1中画两个单选按钮，名称分别为Op1和Op2，标题分别为"
在F2中画两个单选按钮，名称分别为Op3和Op4，标题分别为"
广州"
昆明"
画一个文本框，其名称为Text1。
编写适当事件过程。
程序运行后，选择不同单选按钮时产生的显示结果见下表
程序的运行情况如图所示。
存盘时，工程文件名为sjt5.vbp，窗体文件名为sjt5.frm。
单选按钮的Value属性：
Value属性用来表示单选按钮的状态，可以取True和False两种值，取值为True时，单选按钮是"
打开"
的，按钮中心有一个圆点；
取值为False时，单选按钮是"
关闭"
的，按钮是一个圆圈。
设置单选按钮Value属性的语法是：
单选按钮名.Value=True（-1）或False（0）
由于Value属性是单选按钮的缺省属性，因此在设置该属性的值的时候，可以省略属性名。
解题方法：
打开工程文件sjt5.vbp，点击工具箱中的Frame控件图标，然后在窗体上拖拉出两个框架，通过属性窗口分别设置其Name属性为"
F1"
F2"
，Caption属性为"
点击工具箱中的OptionButton控件图标，然后在F1中拖拉出两个单选按钮，通过属性窗口分别设置其Name属性为"
Op1"
Op2"
点击工具箱中的OptionButton控件图标，然后在F2中拖拉出两个单选按钮，通过属性窗口分别设置其Name属性为"
Op3"
Op4"
昆明"
点击工具箱中的TextBox控件图标，然后在窗体上拖拉出一个文本框。
打开代码窗口，输入如下的代码：
PrivateSubForm_Click（）
IfOp1.Value=TrueThen
IfOp3.Value=TrueThen
Text1.Text="
坐飞机去广州"
ElseIfOp4.Value=TrueThen
坐飞机去昆明"
EndIf
ElseIfOp2.Value=TrueThen
坐火车去广州"
坐火车去昆明"
EndSub
第7题：
在考生文件夹下有一个工程文件sjt6.vbp，请在窗体上画三个文本框，其名称分别为Text1、Text2和Text3，文本框内容分别设置为"
等级考试"
计算机"
和空白。
然后画两个单选按钮，其名称分别为Op1和Op2，标题分别为"
交换"
连接"
（如图所示），编写适当的事件程序。
程序运行后，如果选中"
单选按钮并单击Text3文本框，则Text1文本框中内容与Text2文本框中内容进行交换，并在Text3文本框中显示"
交换成功"
如果选中"
单选按钮并单击Text3文本框，则把Text1和Text2的内容按Text1、Text2的顺序连接起来，并在Text3文本框中显示连接后的内容。
存盘时，工程文件名为sjt6.vbp，窗体文件名为sjt6.frm。
打开工程文件sjt6.vbp，点击工具箱中的TextBox控件图标，然后在窗体上拖拉出三个文本框，通过属性窗口分别设置其Text属性为"
"
点击工具箱中的OptionButton控件图标，然后在窗体中拖拉出两个单选按钮，通过属性窗口分别设置其Name属性为"
PrivateSubText3_Click（）
IfOp1.ValueThen
Text2.Text="
Text3.Text="
交换成功"
Else
Text3.Text=Text1.Text+Text2.Text
第8题：
在Form1的窗体上画一个文本框，其名称为Text1；
再画两个命令按钮，
其名称分别为C1和C2，标题分别为"
显示"
退出"
，编写适当的事件过程。
程序运行后，在窗体加载时使"
按钮不可用，如果单击"
显示"
按钮，则在文本框中显示"
，并使"
按钮可用，此时如果单击"
按钮，则结束程序，程序运行情况如图所示。
新建一个名为Form1的窗体，点击工具箱中的CommandButton控件图标，然后在窗体上拖拉出两个命令按钮，通过属性窗口分别设置其Name属性为"
C1"
C2"
Caption属性为"
PrivateSubC1_Click（）
C2.Enabled=True
Text1.Text="
PrivateSubC2_Click（）
End
第9题：
在Form1的窗体上画一个命令按钮，其名称为C1，标题为"
再画
一个文本框，其名称为Text1，编写适当的事件过程。
程序运行后，在窗体加载时使文本框不可见，如果双击窗体，则文本框出现；
此时如果单击命令按钮，则在文本框中显示"
程序运行情况如图所示。
新建一个名为Form1的窗体，点击工具箱中的CommandButton控件图标，然后在窗体上拖拉出一个命令按钮，通过属性窗口设置其Name属性为"
PrivateSubForm_DblClick（）
Text1.Visible=True
PrivateSubForm_Load（）
Text1.Visible=False
第10题：
在窗体上画一个文本框，其名称为Text1，Text属性为空白。
再画一个命令按钮，其名称为C1，Visible属性为False。
编写适当的事件过程。
程序运行后，如果在文本框中输入字符，则命令按钮出现。
程序运行情况如图所示。
新建一个窗体，点击工具箱中的TextBox控件图标，然后在窗体上拖拉出一个文本框，通过属性窗口设置其Text属性为"
点击工具箱中的CommandButton控件图标，然后在窗体上拖拉出一个命令按钮，通过属性窗口设置其Name属性为"
Visible属性为False。
PrivateSubText1_Change（）
C1.Visible=True
按要求保存文件即完成本题。
一。
选择题
（1）设窗体上有一个文本框，Text1,要求只能显示信息，不能体Form1的标题栏中显示“VisualBasic窗体"
的语句是
A）Form1.Name="
VisualBasic窗体"
B）Form1.Title="
C）Form1.Caption="
D）Form1.Text="
VisualBasic窗体“
答案:
C
（3）在窗体上画一个名称为Text1的文本框，然后画一个名称为HScroll1的滚动条，其Min和Max属性分别为0和100。
程序运行后，如果移动滚动框，则在文本框中显示滚动条的当前值，如图所示：
（图片暂缺，）以下能实现上述操作的程序段是
A）PrivateSubHScroll_Change（）
Text1.Text=HScroll1.Value
B）PrivateSubHScroll_Click（）
C）PrivateSubHScroll_Change（）
Text1.Text=HScroll.Caption
D）PrivateSubHScroll_Click（）
Text1.Text=HScroll.Caption
EndSub答案：
A（4）设菜单中有一个菜单项为"
Open"
若要为该菜单命令设计访问键，即按下Alt及字母O时，能够执行"
命令，则在菜单编辑器中设置“Open"
命令的方式是
A）把Caption属性设置为&
Open
B）把Caption属性设置为O&
pen
C）把Name属性设置为&
D）把Name属性设置为O&
pen答案：
A
（5）在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：
PrivateSubCommand1_Click（）
x=InputBox（"
Input"
）
SelectCasex
Case1,3
Print"
分支1"
CaseIs>
4
分支2"
CaseElse
Else分支"
EndSelect
EndSub
程序运行后，如果在输入对话框中输入2，则窗体上显示的是
A）分支1
B）分支2）程序出错
答案：
C
（6）以下关于MsgBox的叙述中，错误的是
A）MsgBox函数返回一个整数
B）通过MsgBox函数可以设置信息框中图标和按钮的类型
C）MsgBox语句没有返回值
D）MsgBox函数的第一个参数是一个整数，该参数只能确定对话框中显示的按钮数量答案：
D
（7）在窗体上画一个名称为Timer1的计时器控件，要求每隔0.5秒发生一次计时器事件，则以下正确的属性设置语句是
A）Timer1.InterVal=0.5
B）Timer1.Interval=5
C）Timer.Interval=50
D）Timer1.Interval=500答案：
（8）在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：
StaticxAsInteger
Cls
Fori=1To2
y=y+x
x=x+2
Next
Printx,y
程序运行后，连续三次单击Command1按钮后，窗体上显示的是
A）4
2
B）1218
C）1230
D）4
6答案：
B
9）以下关于多重窗体程序的叙述中，错误的是
A）用Hide方法不但可以隐藏窗体，而且能清除内存中的窗体
B）在多重窗体程序中，各窗体的菜单是彼此独立的
C）在多重窗体程序中，可以根据需要指定启动窗体
D）对于多重窗体程序中，而且单独保存每个窗体答案：
（10）以下关于文件的叙述中，错误的是
A）顺序文件中的记录一个接一个地顺序存放
B）随机文件中记录的长度是随机的
C）执行打开文件的命令后，自动生成一个文件指针
D）LOF函数返回给文件分配的字节数
（11）以下叙述中错误的是
A）事件过程是响应特定事件的一段程序
B）不同的对象可以具有相同名称的方法
C）对象的方法是执行指定操作的过程
D）对象事件的名称可以由编程者指定
（12）以下合法的VisualBasic标识符是
A）ForLoopB）ConstC）9abcD）a#x答案：
（13）当一个复选框被选中时，它的Value属性的值是
A）3
B）2C）1D）0
（14）表达式5Mod3+3\5*2的值是
A）0
B）2
C）4D）6
（15）设x=4,y=8,z=7，以下表达式的值是
x<
yAnd（Noty>
z）Orz<
x
A）1
B）-1C）TrueD）False
（16）在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：
a$="
VisualBasic"
PrintString（3,a$）
程序运行后，单击命令按钮，在窗体上显示的内容是
A）VVVB）VisC）sicD）11
答案A
（17）设有如下程序段：
x=2
Fori=1To10Step2
x=x+i
Next运行以上程序后，x的值是
A）26B）27C）38D）57答案：
（18）以下叙述中错误的是
A）在KeyPress事件过程中不能识别键盘的按下与释放
B）在KeyPress事件过程中不能识别回车键
C）在KeyDown和KeyUp事件过程中，将键盘输入的"
A"
a"
视作相同的字母
D）在KeyDown和KeyUp事件过程中，从大键盘上输入的"
1"
和从右侧小键盘上输入的"
被视作不同的字符
（19）执行如下两条语句，窗体上显示的是
a=9.8596
PrintFormat（a,"
$00,00.00"
A）0,009.86B）$9.86C）9.86D）$0,009.86
（20）在窗体上画一个名称为CommandDialog1的通用对话框，一个名称为Command1的命令按钮。
然后编写如下事件过程：
CommonDialog1.FileName="
CommonDialog1.Filter="
Allfile|*.*|（*.Doc）|*.Doc|（*.Txt）|*.Txt"
CommonDialog1.FilterIndex=2
CommonDialog1.DialogTitle="
VBTest"
CommonDialog1.Action=1
对于这个程序，以下叙述中错误的是
A）该对话框被设置为“打开”对话框
B）在该对话框中指定的默认文件名为空
C）该对话框的标题为VBTest
D）在该对话框中指定的默认文件类型为文本文件（*.Txt）
（21）设一个工程由两个窗体组成，其名称分别为Form1和Form2，在Form1上有一个名称为Command1的命令按钮。
窗体Form1的程序代码如下：
DimaAsInteger
a=10
Callg（Form2,a）
PrivateSubg（fAsForm,xAsInteger）
y=IIf（x>
10,100,-100）
f,Show
f.Caption=y
运行以上程序，正确的结果是
A）Form1的Caption属性值为100
B）Form2的Caption属性值为-100
C）Form1的Caption属性值为-100D）Form2的Caption属性值为100
B
（22）在窗体上画一个名称为Command1的命令按钮，并编写如下程序：
DimxAsInteger
StaticyAsInteger
x=10
y=5
Callf1（x,y）
PrivateSubf1（ByRefx1AsInteger,y1AsInteger）
x1=x1+2
y1=y1+2
程序运行后
升级会员 