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

答案
























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

1.顺序存储结构____。
A、仅适合于静态查找表的存储
B、仅适合于动态查找表的存储
C、既适合静态又适合动态查找表的存储
D、既不适合静态又不适合动态查找表的存储
A       B       C       D      
2.设计一个判断表达式中左右括号是否配对的算法，采用____数据结构最佳。
A、队列
B、堆栈
C、二叉树
D、链表
A       B       C       D      
3.在一棵二叉树的先序遍历、中序遍历，后序遍历所产生的序列中，所有叶结点的先后顺序____。
A、都不相同
B、完全相同
C、先序和中序相同，而与后序不同
D、中序和后序相同，而与先序不同
A       B       C       D      
4.对以下序列{22，86，49，12，30，65，35，18}进行排序，排序过程如下：
①{22，86，49，12，30，65，35，18}
②{18，12，22，49，30，65，35，86}
③{12，18，22，35，30，49，65，86}
④{12，18，22，30，35，49，65，86}
则可以认为使用了____排序方法。
A、选择排序
B、冒泡排序
C、快速排序
D、插入排序
A       B       C       D      
5.对建立良好的程序设计风格，下面描述正确的是
A、程序应简单、清晰、可读性好
B、符号名的命名只要符合语法
C、充分考虑程序的执行效率
D、程序的注释可有可无
A       B       C       D      

答案





















6.软件工程方法的提出起源于软件危机，而其目的应该是最终解决软件的什么问题？
A、产生危机
B、质量保证
C、开发效率
D、生产工程化
A       B       C       D      
7.数据字典是对数据定义信息的集合，它所定义的对象都包含于
A、数据流图
B、程序框图
C、软件结构
D、方框图
A       B       C       D      
8.数据库系统一般由哪些成分构成？
Ⅰ.数据库 Ⅱ. 数据库管理员 Ⅲ. 数据库管理系统及其工具
Ⅳ. 用户 Ⅴ.操作系统 Ⅵ. 应用系统
A、Ⅰ、Ⅱ和Ⅲ
B、Ⅰ、Ⅱ、Ⅲ和Ⅳ
C、Ⅰ、Ⅱ、Ⅲ、Ⅳ和Ⅴ
D、全部
A       B       C       D      
9.在数据库三级模式结构中，描述数据库中全体逻辑结构和特性的是____。
A、外模式
B、内模式
C、存储模式
D、概念模式
A       B       C       D      
10.设关系R、S和T分别为下图所示，则有
( R ) ( S )
A B C B E
a1 b1 5 b1 3
a1 b2 6 b2 7
a2 b3 8 b3 10
a2 b4 12 b3 2
b5 2
( T )
A R.B C S.B E
a1 b1 5 b2 7
a1 b1 5 b3 10
a1 b2 6 b2 7
a1 b2 6 b3 10
a2 b3 8 b3 10
A、T = R 连接 S (CB、T = R 连接 S (R.B = S.B)
C、T = R 连接 S
D、T = R × S
A       B       C       D      

答案





















11.执行以下Command1的Click事件过程在窗体上显示____。
Option Base 0
Private Sub Command1_Click( )
Dim a
a=Array("a","b","c","d","e","f","g")
Print a(1);a(3);a(5)
End Sub
A、abc
B、ace
C、bdf
D、出错
A       B       C       D      
12.已知使用Show方法的格式为：[窗体名称.]Show [模式]，如要使窗体是“模态型”窗体，则“模式”值应为_____。
A、0
B、1
C、False
D、True
A       B       C       D      
13.使用Public Const语句声明一个全局的符号常量时，该语句应放在____。
A、过程中
B、窗体模块的通用声明段
C、标准模块的通用声明段
D、窗体模块或标准模块的通用声明段
A       B       C       D      
14.下列选项中叙述正确的是___。
A、在一窗体的菜单项中，不允许出现标题相同的菜单项
B、在菜单的标题栏中，"&"所引导的字母指明了访问该菜单项的访问键
C、程序运行过程中，可以重新设置菜单的Visible属性
D、弹出式菜单在菜单编辑器中定义
A       B       C       D      
15.能够改变窗体边框线类型的属性是____。
A、FontStyle
B、BorderStyle
C、BackStyle
D、Border
A       B       C       D      

答案





















16.在代码编辑器中，如果一条语句过长，不能在一行内写下，则需要折行输写，这是通过在行末使用续行符来实现的，该续行符表示为_____。
A、一个下划字符（_）
B、一个空格加一个下划字符（_）
C、一个空格加一个连字符
D、回车
A       B       C       D      
17.如果A为整数，且|A|>=100，则打印“OK”，否则打印“Error”，表示这个条件语句的单行语句是____。
A、If Int(A)=A And Sqr(A)>=100 Then Print "Ok" Else Print "Error"
B、If Int(A)=A And (A>=100,A<=-100) Then Print "Ok" Else Print "Error"
C、If Fix(A)=A And ABS(A)>=100 Then Print "Ok" Else Print "Error"
D、If Fix(A)=A And A>=100 And A<=-100 Then Print "Ok" Else Print "Error"
A       B       C       D      
18.为了把一个记录型变量的内容写入文件中指定的位置，所使用的语句的格式为____。
A、Get文件号，记录号，变量名
B、Get文件号，变量名，记录号
C、Put文件号，记录号，变量名
D、Put文件号，变量名，记录名
A       B       C       D      
19.表达式Y+1>=X是一个_____。
A、字符串表达式
B、关系表达式
C、算术表达式
D、不合法的表达式
A       B       C       D      
20.不可以通过下列____操作将焦点赋给对象。
A、运行时使用Tab键
B、在代码中用Call语句调用
C、在代码中用SetFocus方法
D、用访问键或用鼠标单击选择对象
A       B       C       D      

答案





















21.如果设计时在属性窗口将命令按钮的_____属性设置为False，则运行时按钮从窗体上消失。
A、Enabled
B、Default
C、Value
D、Visible
A       B       C       D      
22.设已经在窗体上添加了一个通用对话框控件CommonDialog1，以下正确的语句是____。
A、CommonDialog1.Fileter=ALL Files|*.*|pictures(*.Bmp)|*.Bmp
B、CommonDialog1.Fileter="ALL Files"|*.*|"pictures(*.Bmp)"|*.Bmp
C、CommonDialog1.Fileter={ALL Files|*.*|pictures(*.Bmp)|*.Bmp}
D、CommonDialog1.Fileter="ALL Files|*.*|pictures(*.Bmp)|*.Bmp"
A       B       C       D      
23.下面叙述中不正确的是____。
A、若使用Write #语句将数据输出到文件，则各数据项之间自动插入逗号，并且将字符串加上双引号
B、若使用Print #语句将数据输出到文件，则各数据项之间没有逗号分隔，且字符串不加双引号
C、Write #语句和Print #语句建立的顺序文件格式完全一样
D、Write #语句和Print #语句均实现向文件中写入数据
A       B       C       D      
24.以下叙述中错误的是____。
A、在程序运行时，通用对话框控件是不可见的
B、在同一个程序中，用不同的方法（如ShowOpen或ShowSave等）打开的通用对话框具有不同的作用
C、调用通用对话框控件的ShowOpen方法，可以直接打开在该通用对话框中指定的文件
D、调用通用对话框控件的ShowColor方法，可以打开颜色对话框
A       B       C       D      
25.如果X是一个正实数，将百分位四舍五入，保留一位小数的表达方式是____。
A、0.1*Int(X+0.05)
B、0.1*Int(10*(X+0.05))
C、0.1*Int(10*X)
D、Int(X+0.05)
A       B       C       D      

答案





















26.以下叙述中错误的是____。
A、在keyUp和KeyDown事件过程中，从键盘上输入A或a被视作相同的字母（即具有相同的KeyCode）
B、在keyUp和KeyDown事件过程中，将键盘上的"1"和右侧小键盘上的"1"视作不同的数字（具有不同的KeyCode)
C、KeyPress事件中不能识别键盘上某个键的按下与释放
D、KeyPress事件中可以识别键盘上某个键的按下与释放
A       B       C       D      
27.执行语句Open"Tel.dat"For Random As #1 Len=50后，对文件Tel.dat中的数据能够执行的操作是
A、只能写，不能读
B、只能读，不能写
C、既可以读，也可以写
D、不能读，有能写
A       B       C       D      
28.设有如下通用过程：
Public Sub Fun(a(),ByVal x As Integer)
For i=1 To 5
x=x+a(i)
Next
End Sub
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下的事件过程：
Private Sub Command1_Click()
Dim arr(5) As Variant
For i=1 To 5
arr(i)=i
Next
n=10
Call Fun(arr(),n)
Text1.Text=n
End Sub
程序运行后，单击命令按钮，则在文本框中显示的内容是
A、10
B、15
C、25
D、24
A       B       C       D      
29.在窗体上画一个名称为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      
30.单击窗体时，下列程序代码的执行结果为_____。
Private Sub Form_Click()
Test 2
End Sub
Private Sub Test(x As Integer)
x=x*2+1
If x<6 Then
Call Test(x)
End If
x=x*2+1
Print x;
End Sub
A、5 11
B、23 47
C、10 22
D、23 23
A       B       C       D      

答案





















31.窗体中代码如下：

Private Sub Form_Click( )
Dim x As Integer,y As Integer,z As Integer
x=1:y=2:z=3
Call Procl(x,x,z)
Call Procl(x,y,y)
End Sub

Private Sub Procl(x As Integer,y As Integer,z As Integer)
x=3*z
y=2*z
z=x+y
Print x;y;z
End Sub

窗体运行后，单击窗体，输出结果为
A、6 6 12
6 10 10
B、9 6 15
6 5 10
C、9 6 15
6 10 10
D、9 10 10
9 10 15
A       B       C       D      
32.在运行阶段,要在文本框Textl获得焦点时选中文本框中所有内容,对应的事件过程是____。
A、Private Sub Textl_GotFocus()
Textl.SelStart=0
Textl.SelLength=Len(Text1.text)
End Sub
B、A.Private Sub Textl_LostFocus()
Textl.SelStart=0
Textl.SelLength=Len(Tex1.text)
End Sub
C、Private Sub Textl_Change()
Textl.SelStart=0
Textl.SelLength=Len(Text1.text)
End Sub
D、Private Sub Textl_SetFocus()
Textl.SelStart=0
Textl.SelLength=Len(Text1.text)
End Sub
A       B       C       D      
33.在窗体上画一个命令按钮，然后编写如下事件过程：
Option Base 1
Private Sub Command1_Click()
Dim a
a=Array(1,2,3,4)
j=1
For i=4 To j Step-1
s=s+a(i)*j
Next i
print s
End Sub
运行上面的程序，单击命令按钮，其输出结果是____。
A、4321
B、10
C、34
D、1234
A       B       C       D      
34.在窗体上有一个命令按钮，并有如下代码，程序执行后，单击命令按钮输出结果为____。

Private Sub Command1_Click()
K=0
For J=1 To 2
For I=1 To 3
K=I+1
Next I
For I=1 To 7
K=K+1
Next I
Next J
Print K
End Sub
A、10
B、6
C、11
D、16
A       B       C       D      
35.在窗体上画一个名称为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      

答案
























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

1.在树中，一个结点的直接子结点的个数称为该结点的____。
输入答案，中间不含空格:
2.在长度为n的有序线性表中进行二分查找，需要的比较次数为____。
输入答案，中间不含空格:
3.软件开发环境是全面支持软件开发全过程的____集合。
输入答案，中间不含空格:
4.数据独立是指____独立于存储在外存上的数据库中的数据。
输入答案，中间不含空格:
5.概念模型的抽象级别____，它独立于软件与硬件。
输入答案，中间不含空格:

答案





















6.属性窗口主要是针对窗体和控件设置的。在Visual Basic中，窗体和控件被称为____。
输入答案，中间不含空格:
7.在使用手动拖放功能时，要启动一个拖放过程，则使用实参值____去调用对象
的Drag方法，而要停止一个拖放过程，则应使用实参值2去调用对象的Drag方法。
输入答案，中间不含空格:
8.设在窗体上有一个文本框Text1，一个标签数组Label1，共有10个标签，以下程序代码实现在单击任一个标签时将标签的内容添加到文本框现有内容之后。
Private Sub Labell_Click(Index As Integer)
Text1.Text=____
End Sub
输入答案，中间不含空格:
9.Visual Basic中，有许多快捷键，其中____快捷键作为激活菜单栏之用。
输入答案，中间不含空格:
10.执行下列程序段后，达到____的目的。
A=100
B=50
A=A+B
B=A-B
A=A-B
输入答案，中间不含空格:

答案





















11.在C盘当前文件夹下建立一个名为Data.txt的顺序文件。要求用文本框输入若干英文单词，每次按下回车键时写入一条记录，并清除文本框中的内容，直至文本框中输入“END”时为止。试填充空白。
Private Sub Form_Load()
Open "C:\Data.txt" For Output As 3
Text1.Text = ""
End Sub
Private Sub Text1_KeyPress(KeyAscii As Integer)
If ____= "END" Then
Close #3
End
ElseIf KeyAscii = 13 Then
Write #3, ____
Text1.Text = ""
End If
End Sub
输入答案，中间不含空格:
12.上一题 第 2 空
输入答案，中间不含空格:
13.假定已将文本框的MultiLine属性设置为True，则按____组合键可以插入一个空行。
输入答案，中间不含空格:
14.执行下面的程序段得到x值为____，y值为____。
Private Sub Command1_Click()
For i=1 To 8
a=a+i
Next i
x=Val(i)
y=Val(a)
MsgBox x
MsgBox y
End Sub
输入答案，中间不含空格:
15.上一题 第 2 空
输入答案，中间不含空格:
就业数据资源平台