就业数据资源平台
当前位置：首页 > Visual Basic
全国计算机等级考试二级VB模拟试题6

答案
























一、选择题（每题2分，共计70分）

1.顺序存储结构____。
A、仅适合于静态查找表的存储
B、仅适合于动态查找表的存储
C、既适合静态又适合动态查找表的存储
D、既不适合静态又不适合动态查找表的存储
A       B       C       D      
2.若进栈序列为3，5，7，9，进栈过程中可以出栈，则____不可能是一个出栈序列。
A、7，5，3，9
B、9，5，7，3
C、9，7，5，3
D、7，5，9，3
A       B       C       D      
3.设二叉树根结点的层次为0，在深度为5的满二叉树中，叶子结点的个数为
A、32
B、31
C、16
D、15
A       B       C       D      
4.二分查找法适用于存储结构为____且按关键字排好序的线性表。
A、顺序存储
B、链接存储
C、顺序存储或链接存储
D、索引存储
A       B       C       D      
5.下面对对象概念描述错误的是
A、任何对象都必须有继承性
B、对象是属性和方法的封装体
C、对象间的通讯靠消息传递
D、操作是对象的动态属性
A       B       C       D      

答案





















6.下列工具中为需求分析常用工具的是
A、PAD
B、PED
C、N-S
D、DFD
A       B       C       D      
7.信息隐蔽的概念与下述哪一种概念直接相关
A、软件结构定义
B、模块独立性
C、模块类型划分
D、模块耦合度
A       B       C       D      
8.在数据库中存储的是____。
A、数据
B、数据模型
C、数据以及数据之间的联系
D、信息
A       B       C       D      
9.20世纪70年代数据库系统语言研究会（CODASYL）下属的数据库任务组（DBTG）提出的DBTG系统方案，它是哪种数据模型的典型代表？
A、层次模型
B、网状模型
C、关系模型
D、对象模型
A       B       C       D      
10.数据库管理系统的数据操纵语言（DML）所实现的操作一般包括
A、建立、授权、修改
B、建立、授权、删除
C、建立、插入、修改、排序
D、查询、插入、修改、删除
A       B       C       D  

答案





















11.图像框有一个属性，可以自动调整图形的大小，以适应图像框的尺寸，这个属性是
A、Autosize
B、Stretch
C、AutoRedraw
D、Appearance
A       B       C       D      
12.在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：
Private Sub Command1_Click()
Dim i As Integer,n As Integer
For i=0 To 50
i=i+3
n=n+1
If i>10 Then Exit For
Next
Text1.Text=Str(n)
End Sub
程序运行后，单击命令按钮，在两个文本框中显示的值分别是
A、2
B、3
C、4
D、5
A       B       C       D      
13.在窗体上画一个名称为Command1命令按钮，然后编写如下程序：
Private Sub Command1_Click()
Dim i As Integer,j As Integer
Dim a(10,10)As Integer
For i=1 To 3
For j=1 To 3
a(i,j)=(i-1)*3+j
Print a(i,j)
Next
Print
Next i
End Sub
程序运行后，单击命令按钮，窗体上显示的是
A、1 2 3
2 4 6
3 6 9
B、2 3 4
3 4 5
4 5 6
C、1 4 7
2 5 8
3 6 9
D、1 2 3
4 5 6
7 8 9
A       B       C       D      
14.下列叙述中正确的是
A、在窗体的Form_Load事件过程中定义的变量是全局变量
B、局部变量的作用域可以超出所义的过程
C、在某个Sub过程中定义的局部变量可耻下场与其它事件过程中定义的局部变量同名，但其作用域只限于该过程
D、在调用过程时，所有局部变量被系统初始化为0或空字符串
A       B       C       D      
15.在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框，然后编写如下程序：
Private Sub Command1_Click()
Dim x,y,z As Integer
x = 5
y = 7
z = 0
Text1.Text = ""
Call P1(x,y,z)
Text1.Text = Str(z)
End Sub
Sub P1(ByVal a As Integer,ByVal b As Integer,c As Integer)
c = a + b
End Sub
程序运行后，如果单击命令按钮，则在文本框中显示的内容是____。
A、0
B、12
C、Str(z)
D、没有显示
A       B       C       D      

答案





















16.以下叙述中错误的是____。
A、在keyUp和KeyDown事件过程中，从键盘上输入A或a被视作相同的字母（即具有相同的KeyCode）
B、在keyUp和KeyDown事件过程中，将键盘上的"1"和右侧小键盘上的"1"视作不同的数字（具有不同的KeyCode)
C、KeyPress事件中不能识别键盘上某个键的按下与释放
D、KeyPress事件中可以识别键盘上某个键的按下与释放
A       B       C       D      
17.设在菜单编辑器里定义了一个菜单项，名为menu1。为了在运行时隐藏该菜单项，应使用的语句是____。
A、menu1.Enabled = True
B、menu1.Enabled = False
C、menu1.Visible = True
D、menu1.Visible = False
A       B       C       D      
18.在用通用对话框控件建立"打开"或"保存"文件对话框时，如果需要指定文件列表框所列出的文件类型是文本文件（即.txt文件），则正确的描述格式是____。
A、"text (.txt)"|(*.txt)
B、"文本文件(.txt)|(.txt)"
C、"text(.txt)||(*.txt)"
D、"text(.txt)(*.txt)"
A       B       C       D      
19.以下叙述中错误的是____。
A、一个工程中可以包含多个窗体文件
B、在一个窗体文件中用Private定义的通用过程能被其他窗体调用
C、在设计VB程序时，窗体、标准模块、类模块等需要分别保存为不同类型的磁盘文件
D、全局变量必须在标准模块中定义
A       B       C       D      
20.以下叙述中正确的是____。
A、一个记录中所包含的各个元素的数据类型必须相同
B、随机文件中每个记录的长度是固定的
C、Open命令的作用是打开一个已经存在的文件
D、使用Input #语句可以从随机文件中读取数据
A       B       C       D      

答案





















21.Visual Basic程序设计语言属于_____。
A、面向过程的语言
B、机器语言
C、面向对象的语言
D、汇编语言
A       B       C       D      
22.新建一个工程将其窗体的Name属性设置为Myfrm，则默认的窗体文件名为_____。
A、Form1.frm
B、Myfrm.frm
C、Form1.vbp
D、工程1.frm
A       B       C       D      
23.如果要使窗体的最大化按钮变成灰色，应设置窗体的_____属性。
A、Icon
B、ControlBox
C、MaxButton
D、MinButton
A       B       C       D      
24.将窗体的_____属性设置为False后，运行时窗体上的按钮、文本框就不会对用户的操作做出响应。
A、ControlBox
B、Visible
C、Enabled
D、BorderStyle
A       B       C       D      
25.在设计阶段，双击窗体Form1的空白处，打开代码窗口，显示_____事件过程。
A、Form_Click
B、Form1_Load
C、Form_Load
D、Form1_Click
A       B       C       D      

答案







































































































26.如果设计时在属性窗口将命令按钮的_____属性设置为False，则运行时按钮从窗体上消失。
A、Enabled
B、Default
C、Value
D、Visible
A       B       C       D      
27.\、Mod、*、/四个算术符中，优先级最低的是_____。
A、\
B、Mod
C、*
D、/
A       B       C       D      
28.Abs(-8)+Len("ABCD")的值是_____。
A、12
B、14
C、8ABCD
D、-8ABCD
A       B       C       D      
29.表达式X+1>X是_____。
A、算术表达式
B、字符串表达式
C、关系表达式
D、非法表达式
A       B       C       D      
30.在代码编辑器中，如果一条语句过长，不能在一行内写下，则需要折行输写，这是通过在行末使用续行符来实现的，该续行符表示为_____。
A、一个下划字符（_）
B、一个空格加一个下划字符（_）
C、一个空格加一个连字符
D、回车
A       B       C       D      
31.有一个分段函数，当X<0时，Y=-1；当X=0时，Y=0；当X>0时，Y=1。该分段函数在程序段中可表达为：
A、If X<0 Then Y=-1
If X=0 Then Y=0
Else Y=1
B、If X>0 Then Y=1
If X=0 Then Y=0
Else Y=-1
C、If X<0 Then Y=-1
ElseIf X=0 Then Y=0
Else Y=1
D、If X<0 Then
Y=-1
ElseIf X=0 Then
Y=0
Else
Y=1
A       B       C       D      
32.在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：

Private Sub Command1_Click()
a = "ABBACKDIEKEI"
For I = 9 To 2 Step -3
x = Mid(a, I, I)
y = Left(a, I)
z = Right(a, I)
z = x & y & z
Next I
Print z
End Sub

程序运行后，如果单击命令按钮，则输出结果是
A、BACABBKEI
B、EKEIABBACKDIEAACKEIEKEI
C、DEIEKEIABBACKDIEKEI
D、ACKABBKEI
A       B       C       D      
33.在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：
Private Sub Command1_Click()
M1=1
M2=2
Do While M2<>5
M1=M1*M2
M2=M2+1
Loop
Print "M1=";M1,"M2=";M2
End Sub
程序运行后，如果单击命令按钮，输出结果是
A、M1= 24 M2= 5
B、M1= 1 M2= 2
C、M1= 24
M2= 5
D、M1= 1
M2= 2
A       B       C       D      
34.新建立窗体中画一个命令按钮，其中事件代码如下：

For x=4 To 1 Step -1
For y=1 To 5-x
Print Tab(y+5);"*";
Next y
Print
Next x

窗体运行后，单击命令按钮，输出结果是
A、****
***
**
*
B、*
**
***
****
C、*****
****
***
**
D、*
***
*****
A       B       C       D      
35.运行时，要向图片框Pic中加载"C:\windows\beer.bmp"图像文件，应使用语句_____。
A、Picture1.Picture="C:\windows\beer.bmp"
B、Picture1.Picture=LoadPicture("C:\windows\beer.bmp")
C、Pic.Picture=LoadPicture(C:\windows\beer.bmp)
D、Pic.Picture=LoadPicture("C:\windows\beer.bmp")
A       B       C       D      
1.从循环队列中删除一个元素时，其操作是____。
输入答案，中间不含空格:
2.在一棵二叉树中，只有度为0的结点和度为2的结点。度为0的结点的个数为n，度为2
的结点的个数为m，则有n=_____（用m表示）。
输入答案，中间不含空格:
3.软件模块独立性的两个定性度量标准是____。
输入答案，中间不含空格:
4.DBMS的DML实现对数据库中的数据操作，其基本的数据操作可分为两类：____和更新（包括插入、删除、修改）。
输入答案，中间不含空格:
5.____模式不涉及数据的物理存储模式,对应于总体概念级数据库，故称为DBA视图。
输入答案，中间不含空格:
6.在窗体上画两个标签，其名称分别为Label1和Label2，Caption属性分别为"数值"及空白；然后画一个名称为Hscroll1的水平滚动条，其Min的值为0，Max的值为100。程序运行后，如果单击滚动条两端的箭头，则在标签Label2中显示滚动条的值。请在____处填入适当的内容，将程序补充完整。
Private Sub HScroll1._____
Label2.Caption = HScroll1.____
End Sub
输入答案，中间不含空格:
7.上一题
输入答案，中间不含空格:
8.在窗体上画一个名称为Command1、标题为"计算"的命令按钮；画两个文本框，名称分别为Text1和Text2；然后画4个标签，名称分别为Label1、Label2、Label3和Label4，标题分别为"操作数1"、"操作数2"、"运算结果"和空白；再建立一个含有4个单选按钮的控件数组，名称为Option1，标题分别为"+"、"-"、"*"和"/"。程序运行后，在Text1、Text2中输入两个数值，选中一个单选按钮后单击命令按钮，相应的计算结果显示在Label4中。请在____处填入适当的内容，将程序补充完整。
Private Sub Command1_Click()
For i = 0 To 3
If ____ = True Then
opt = Option1(i).Caption
End If
Next
Select Case ____
Case "+"
Result = Val(Text1.Text) + Val(Text2.Text)
Case "-"
Result = Val(Text1.Text) - Val(Text2.Text)
Case "*"
Result = Val(Text1.Text) * Val(Text2.Text)
Case "/"
Result = Val(Text1.Text) / Val(Text2.Text)
End Select
____ = Result
End Sub
输入答案，中间不含空格:
9.上一题
输入答案，中间不含空格:
10.上一题
输入答案，中间不含空格:
11.在菜单编辑器中建立一个菜单，名为pmenu，用下面的语句可以把它作为弹出式菜单弹出，请填空。
Form1.____ .pmenu
输入答案，中间不含空格:
12.以下程序的功能是：从键盘上输入若干个学生的考试分数，当输入负数时结束输入，然后输出其中的最高分数和最低分数。请在____处填入适当的内容，将程序补充完整。
Private Sub Form_Click()
Dim x AS Single,amax As Single,amin As Single
x = InputBox("Enter a score")
amax = x
amin = x
Do While ______
If x > amax Then
amax = x
End If
If ______ Then
amin = x
End If
x = InputBox("Enter a score")
Loop
Print "Max=";amax,"Min=";amin
End Sub
输入答案，中间不含空格:
13.上一题
输入答案，中间不含空格:
14.在窗体上画一个名称为Lable1的标签和一个名称为List1的列表框。程序运行后，在列表框中添加若干列表项。当双击列表框中的某个项目时，在标签Label1中显示所选中的项目，如图所示。请在____处填入适当的内容，将程序补充完整。
Private Sub Form_load()
List1.AddItem"北京"
List1.AddItem"上海"
List1.AddItem"河北"
End Sub
Private Sub ____()
Label1.Caption = ____
End Sub
输入答案，中间不含空格:
15.上一题
输入答案，中间不含空格:







答案





















31.有一个分段函数，当X<0时，Y=-1；当X=0时，Y=0；当X>0时，Y=1。该分段函数在程序段中可表达为：
A、If X<0 Then Y=-1
If X=0 Then Y=0
Else Y=1
B、If X>0 Then Y=1
If X=0 Then Y=0
Else Y=-1
C、If X<0 Then Y=-1
ElseIf X=0 Then Y=0
Else Y=1
D、If X<0 Then
Y=-1
ElseIf X=0 Then
Y=0
Else
Y=1
A       B       C       D      
32.在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：

Private Sub Command1_Click()
a = "ABBACKDIEKEI"
For I = 9 To 2 Step -3
x = Mid(a, I, I)
y = Left(a, I)
z = Right(a, I)
z = x & y & z
Next I
Print z
End Sub

程序运行后，如果单击命令按钮，则输出结果是
A、BACABBKEI
B、EKEIABBACKDIEAACKEIEKEI
C、DEIEKEIABBACKDIEKEI
D、ACKABBKEI
A       B       C       D      
33.在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：
Private Sub Command1_Click()
M1=1
M2=2
Do While M2<>5
M1=M1*M2
M2=M2+1
Loop
Print "M1=";M1,"M2=";M2
End Sub
程序运行后，如果单击命令按钮，输出结果是
A、M1= 24 M2= 5
B、M1= 1 M2= 2
C、M1= 24
M2= 5
D、M1= 1
M2= 2
A       B       C       D      
34.新建立窗体中画一个命令按钮，其中事件代码如下：

For x=4 To 1 Step -1
For y=1 To 5-x
Print Tab(y+5);"*";
Next y
Print
Next x

窗体运行后，单击命令按钮，输出结果是
A、****
***
**
*
B、*
**
***
****
C、*****
****
***
**
D、*
***
*****
A       B       C       D      
35.运行时，要向图片框Pic中加载"C:\windows\beer.bmp"图像文件，应使用语句_____。
A、Picture1.Picture="C:\windows\beer.bmp"
B、Picture1.Picture=LoadPicture("C:\windows\beer.bmp")
C、Pic.Picture=LoadPicture(C:\windows\beer.bmp)
D、Pic.Picture=LoadPicture("C:\windows\beer.bmp")
A       B       C       D      

答案
























二、填空题（每空2分，共计30分）

1.从循环队列中删除一个元素时，其操作是____。
输入答案，中间不含空格:
2.在一棵二叉树中，只有度为0的结点和度为2的结点。度为0的结点的个数为n，度为2
的结点的个数为m，则有n=_____（用m表示）。
输入答案，中间不含空格:
3.软件模块独立性的两个定性度量标准是____。
输入答案，中间不含空格:
4.DBMS的DML实现对数据库中的数据操作，其基本的数据操作可分为两类：____和更新（包括插入、删除、修改）。
输入答案，中间不含空格:
5.____模式不涉及数据的物理存储模式,对应于总体概念级数据库，故称为DBA视图。
输入答案，中间不含空格:

答案





















6.在窗体上画两个标签，其名称分别为Label1和Label2，Caption属性分别为"数值"及空白；然后画一个名称为Hscroll1的水平滚动条，其Min的值为0，Max的值为100。程序运行后，如果单击滚动条两端的箭头，则在标签Label2中显示滚动条的值。请在____处填入适当的内容，将程序补充完整。
Private Sub HScroll1._____
Label2.Caption = HScroll1.____
End Sub
输入答案，中间不含空格:
7.上一题
输入答案，中间不含空格:
8.在窗体上画一个名称为Command1、标题为"计算"的命令按钮；画两个文本框，名称分别为Text1和Text2；然后画4个标签，名称分别为Label1、Label2、Label3和Label4，标题分别为"操作数1"、"操作数2"、"运算结果"和空白；再建立一个含有4个单选按钮的控件数组，名称为Option1，标题分别为"+"、"-"、"*"和"/"。程序运行后，在Text1、Text2中输入两个数值，选中一个单选按钮后单击命令按钮，相应的计算结果显示在Label4中。请在____处填入适当的内容，将程序补充完整。
Private Sub Command1_Click()
For i = 0 To 3
If ____ = True Then
opt = Option1(i).Caption
End If
Next
Select Case ____
Case "+"
Result = Val(Text1.Text) + Val(Text2.Text)
Case "-"
Result = Val(Text1.Text) - Val(Text2.Text)
Case "*"
Result = Val(Text1.Text) * Val(Text2.Text)
Case "/"
Result = Val(Text1.Text) / Val(Text2.Text)
End Select
____ = Result
End Sub
输入答案，中间不含空格:
9.上一题
输入答案，中间不含空格:
10.上一题
输入答案，中间不含空格:

答案





















11.在菜单编辑器中建立一个菜单，名为pmenu，用下面的语句可以把它作为弹出式菜单弹出，请填空。
Form1.____ .pmenu
输入答案，中间不含空格:
12.以下程序的功能是：从键盘上输入若干个学生的考试分数，当输入负数时结束输入，然后输出其中的最高分数和最低分数。请在____处填入适当的内容，将程序补充完整。
Private Sub Form_Click()
Dim x AS Single,amax As Single,amin As Single
x = InputBox("Enter a score")
amax = x
amin = x
Do While ______
If x > amax Then
amax = x
End If
If ______ Then
amin = x
End If
x = InputBox("Enter a score")
Loop
Print "Max=";amax,"Min=";amin
End Sub
输入答案，中间不含空格:
13.上一题
输入答案，中间不含空格:
14.在窗体上画一个名称为Lable1的标签和一个名称为List1的列表框。程序运行后，在列表框中添加若干列表项。当双击列表框中的某个项目时，在标签Label1中显示所选中的项目，如图所示。请在____处填入适当的内容，将程序补充完整。
Private Sub Form_load()
List1.AddItem"北京"
List1.AddItem"上海"
List1.AddItem"河北"
End Sub
Private Sub ____()
Label1.Caption = ____
End Sub
输入答案，中间不含空格:
15.上一题
输入答案，中间不含空格:
就业数据资源平台