全国VB二级真题及答案Word格式文档下载.docx
《全国VB二级真题及答案Word格式文档下载.docx》由会员分享，可在线阅读，更多相关《全国VB二级真题及答案Word格式文档下载.docx（16页珍藏版）》请在冰豆网上搜索。
A）T＝R∩S
B）T＝R∪S
C）T＝R×
S
D）T＝R/S
B（10）数据库系统的核心是
A）数据模型
B）数据库管理系统 C）数据库
D）数据库管理员
B（11）假定一个VisualBasic应用程序由一个窗体模块和一个标准模块构成.为了保存该应用程序，以下正确的操作是
A）只保存窗体模块文件
B）分别保存窗体模块、标准模块和工程文件
C）只保存窗体模块和标准模块文件 D）只保存工程文件
C（12）为了清除窗体上的一个控件，下列正确的操作是
A）
按回车键
B）
按Esc键
C）选择（单击）要清除的控件，然后按Del键
D）选择（单击）要清除的控件，然后按回车键
C（13）以下叙述中错误的是
A）打开一个工程文件时，系统自动装入与该工程有关的窗体、标准模块等文件
B）当程序运行时，双击一个窗体，则触发该窗体的DblClick事件
C）VisualBasic应用程序只能以解释方式执行
D）事件可以由用户引发，也可以由系统引发
D（14）设a=2，b=3，c=4，d=5，下列表达式的值是
Nota<
=cOr4*c=b^2Andb<
>
a+c
A）-1
B）1
C）True
D）False
C（15）设a=5，b=10，则执行
c=Int（（b-a）*Rnd+a）+1
后，c值的范围为
A）5～10
B）6～9
C）6～10
D）5～9
C（16）在窗体上画一个命令按钮，名称为Command1，然后编写如下事件过程：
Private
Sub
Command1_Click（）
a$="
softwareandhardware"
b$=Right（a$，8）
c$=Mid（a$，1，8）
MsgBox
a$，，b$，c$，1
EndSub
运行程序，单击命令按钮，则在弹出的信息框的标题栏中显示的是
A）softwareandhardware
B）software
C）hardware
D）1
A（17）在窗体上画一个命令按钮和一个文本框，其名称分别为Command1和Text1，把文本框的Text属性设置为空白，然后编写如下事件过程：
Sub
Command1_Click（）
a=InputBox（"
Enteraninteger"
）
b=InputBox（"
Text1.Text=b+a
End
Sub
程序运行后，单击命令按钮，如果在输入对话框中分别输入8和10，则文本框中显示的内容是
A）108
B）18
C）810
D）出错
B（18）在窗体上画两个文本框，其名称分别为Text1和Text2，然后编写如下程序：
Form_Load（）
Show
Text1.Text="
"
Text2.Text="
Text1.SetFocus
Text1_Change（）
Text2.Text=Mid（Text1.Text，8）
程序运行后，如果在文本框Text1中输入BeijingChina，则在文本框Text2中显示的内容是
A）BeijingChina
B）China
C）Beijing
D）BeijingC
B（19）在窗体上画一个列表框和一个命令按钮，其名称分别为List1和Command1，然后编写如下事件过程：
List1.AddItem
"
Item1"
Item2"
Item3"
EndSub
List1.List（List1.ListCount）="
AAAA"
程序运行后，单击命令按钮，其结果为
A）把字符串“AAAA”添加到列表框中，但位置不能确定
B）把字符串“AAAA”添加到列表框的最后（即“Item3”的后面）
C）把列表框中原有的最后一项改为“AAAA”
D）把字符串“AAAA”插入到列表框的最前面（即“Item1”的前面）
A（20）假定有如下事件过程：
Form_Click（）
Dim
x
As
Integer，n
Integer
x=1
n=0
Do
While
x<
28
x=x*3
n=n+1
Loop
Print
x，n
程序运行后，单击窗体，输出结果是
A）814
B）563 C）281
D）2435
D（21）有如下程序：
Check，Counter
Check=True
Counter=0
Do
Counter<
20
Counter=Counter+1
If
Counter=10
Then
Check=False
Exit
EndIf
Loop
Until
Print
Counter，Check
程序运行后，单击窗体，输出结果为
A）15
0
B）20
-1 C）10
True
D）10
False
A（22）有如下程序：
I
Integer，sum
sum=0
For
i=2
To
10
Mod
2
<
And
3=0
sum=sum+i
Next
i
Print
sum
A）12
B）30
C）24
D）18
A（23）在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：
Dim
array1（10，10）
Integer，
j
i=1
3
j=2
4
array1（i，j）=i+j
j
Text1.Text=array1（2，3）+array1（3，4）
程序运行后，单击命令按钮，在文本框中显示的值是
B）13
C）14
D）15
D（24）在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程：
a1（4，4），a2（4，4）
j=1
a1（i，j）=i+j
a2（i，j）=a1（i，j）+i+j
a1（3，3）；
a2（3，3）
程序运行后，单击命令按钮，在窗体上输出的是
A）6
6
B）10
5
C）7
21
D）6
12
C（25）有如下程序：
Option
Base
1
arr，Sum
Sum=0
arr=Array（1，3，5，7，9，11，13，15，17，19）
arr（i）/3=arr（i）\3
Sum=Sum+arr（i）
Nexti
Sum
A）25
B）26
C）27
D）28
A（26）在窗体上画一个命令按钮，然后编写如下事件过程：
a（5）
String
5
a（i）=Chr（Asc（"
A"
）+（i-1））
Each
b
In
a
b；
Next
程序运行后，单击命令按钮，输出结果是
A）ABCDE
B）12345 C）abcde
D）出错信息
d（27）以下关于函数过程的叙述中，正确的是
A）如果不指明函数过程参数的类型，则该参数没有数据类型
B）函数过程的返回值可以有多个
C）当数组作为函数过程的参数时，既能以传值方式传递，也能以引用方式传递
D）函数过程形参的类型与函数返回值的类型没有关系
b（28）函数过程F1的功能是：
如果参数b为奇数，则返回值为1，否则返回值为0.以下能正确实现上述功能的代码是
A）Function
F1（
Integer）
2=0
Return
0
Else
Return
End
Function
B）Function
Integer）
bMod2=0
F1=0
F1=1
End
If
EndFunction
C）Function
F1（bAs
If
Mod2=0
EndIf
D）FunctionF1（bAsInteger）
IfbMod2<
0Then
a（29）以下关于KeyPress事件过程中参数KeyAscii的叙述中正确的是
A）KeyAscii参数是所按键的ASCII码
B）KeyAscii参数的数据类型为字符串
C）KeyAscii参数可以省略
D）KeyAscii参数是所按键上标注的字符
C（30）设窗体上有一个名为Text1的文本框，并编写如下程序：
PrivateSubForm_MouseUp（ButtonAsInteger，ShiftAsInteger，XAsSingle，YAsSingle）
程序设计"
PrivateSubText1_KeyDown（KeyCodeAsInteger，ShiftAsInteger）
VisualBasic"
；
程序运行后，如果在文本框中输入字母“a”，然后单击窗体，则在窗体上显示的内容是
A）VisualBasic
B）程序设计 C）VisualBasic程序设计
D）a程序设计
c（31）假定有下表所列的菜单结构：
━━━━━━━━━━━━━━━━━━━━
标题
名称
层次
────────────────────
显示
appear
1（主菜单）
大图标
bigicon
2（子菜单）
小图标
smallicon
要求程序运行后，如果单击菜单项“大图标”，则在该菜单项前添加一个“？
”.以下正确的事件过程是
A）Private
bigicon_Click（）
bigicon.Checked=False
EndSub
B）Private
Me.appear.bigicon.Checked=True
C）Private
bigicon.Checked=True
EndSub
D）Private
appear.bigicon.Checked=True
C（32）假定通用对话框的名称为CommonDialog1，命令按钮的名称为Command1，则单击命令按钮后，能使打开的对话框的标题为“NewTitle”的事件过程是
CommonDialog1.DialogTitle="
NewTitle"
CommonDialog1.ShowPrinter
CommonDialog1.ShowFont
CommonDialog1.ShowOpen
CommonDialog1.DialogTitle="
CommonDialog1.ShowColor
d（33）如果一个工程含有多个窗体及标准模块，则以下叙述中错误的是
A）任何时刻最多只有一个窗体是活动窗体
B）不能把标准模块设置为启动模块
C）用Hide方法只是隐藏一个窗体，不能从内存中清除该窗体
D）如果工程中含有SubMain过程，则程序一定首先执行该过程
A（34）假定在工程文件中有一个标准模块，其中定义了如下记录类型
Type
Books
Name
String*10
TelNum
String*20
EndType
要求当执行事件过程Command1_Click时，在顺序文件Person.txt中写入一条记录.下列能够完成该操作的事件过程是
A）Private
DimBAsBooks
Open"
c：
\Person.txt"
Output
#1
B.Name=InputBox（"
输入姓名"
B.TelNum=InputBox（"
输入电话号码"
Write#1，B.Name，B.TelNum
Close#1
Dim
B
Open"
ForInputAs#1
B.Name=InputBox（"
B.TelNum=InputBox（"
Print#1，B.Name，B.TelNum
Close#1
Open"
ForOutputAs#1
Name=InputBox（"
TelNum=InputBox（"
Write#1，B
Close#1
Book
Open
Input
Name=InputBox（"
Close
b（35）目录列表框的Path属性的作用是
A）显示当前驱动器或指定驱动器上的某目录下的文件名
B）显示当前驱动器或指定驱动器上的目录结构
C）显示根目录下的文件名
D）显示指定路径下的文件
二、填空题（每空2分，共30分）
请将每空的正确答案写在答题卡【1】～【15】序号的横线上，答在试卷上不得分.
（1）数据管理技术发展过程经过人工管理、文件系统和数据库系统三个阶段，其中数据独立性最高的阶段是【1】.数据库系统
（2）算法复杂度主要包括时间复杂度和【2空间】复杂度.
（3）在进行模块测试时，要为每个被测试的模块另外设计两类模块：
驱动模块和承接模块（桩模块）.其中【3驱动模块】的作用是将测试数据传送给被测试的模块，并显示被测试模块所产生的结果.
（4）一棵二叉树第六层（根结点为第一层）的结点数最多为【432】个.
（5）数据结构分为逻辑结构和存储结构，循环队列属于【5存储】结构.
（6）设有以下函数过程：
Function
fun（mAsInteger）AsInteger
DimkAsInteger，sumAsInteger
sum=0
k=m
1
Step
-2
sum=sum+k
k
fun=sum
若在程序中用语句s=fun（10）调用此函数，则s的值为【630】.
（7）在窗体上画一个命令按钮和一个文本框，然后编写命令按钮的Click事件过程.程序运行后，在文本框中输入一串英文字母（不区分大小写），单击命令按钮，程序可找出未在文本框中输入的其他所有英文字母，并以大写方式降序显示到Text1中.例如，若在Text1中输
升级会员 