计算机等级考试二级VB试题及答案
一 、选择题
(1)假设线性表的长度为n，则在最坏情况下，冒泡排序需要的比较次数为
A)log2n
B)n2
C)O(n1..5)
D)n(n-1)/2
正确答案: D
(2)算法分析的目的是
A)找出数据结构的合理性
B)找出算法中输入和输出之间的关系
C)分析算法的易懂性和可靠性
D)分析算法的效率以求改进
正确答案: D
(3)线性表L=(a1,a2,a3,…ai，…an)，下列说法正确的是
A)每个元素都有一个直接前件和直接后件
B)线性表中至少要有一个元素
C)表中诸元素的排列顺序必须是由小到大或由大到小
D)除第一个元素和最后一个元素外，其余每个元素都有一个且只有一个直接前件和直接后件
正确答案: D
(4)在单链表中，增加头结点的目的是
A)方便运算的实现
B)使单链表至少有一个结点
C)标识表结点中首结点的位置
D)说明单链表是线性表的链式存储实现
正确答案: A
(5)软件工程的出现是由于
A)程序设计方法学的影响
B)软件产业化的需要
C)软件危机的出现
D)计算机的发展
正确答案: C
(6)软件开发离不开系统环境资源的支持，其中必要的测试数据属于
A)硬件资源
B)通信资源
C)支持软件
D)辅助资源
正确答案: D
(7)在数据流图(DF
D)中，带有名字的箭头表示
A)模块之间的调用关系
B)程序的组成成分
C)控制程序的执行顺序
D)数据的流向
正确答案: D
(8)分布式数据库系统不具有的特点是
A)数据分布性和逻辑整体性
B)位置透明性和复制透明性
C)分布性
D)数据冗余
正确答案: D
(9)关系表中的每一横行称为一个
A)元组B)字段
C)属性D)码
正确答案: A
(10)下列数据模型中，具有坚实理论基础的是
A)层次模型
B)网状模型
C)关系模型
D)以上3个都是
(11)下列说法正确的是
A)对象的可见性可设为True或False
B)标题的属性值不可设为任何文本
C)属性窗口中属性只能按字母顺序排列
D)某些属性的值可以跳过不设置，自动设为空值
正确答案: A
(12)下列关于退出Visual Basic系统的方法的描述错误的是
A)打开Visual Basic主窗体的"文件"菜单，执行其中的"退出"命令
B)按快捷键Alt+Q退出
C)单击Visual Basic主窗体右上角的"关闭"按钮
D)按快捷键Alt+E退出
正确答案: D
(13)单击窗体上的关闭按钮时，触发的事件是
A)Form_Initialize( )
B)Form_Load( )
C)Form_Unload( )
D)Form_Click( )
正确答案: C
(14)在代码编辑器中，续行符是用来换行书写同一个语句的符号，用以表示续行符的是
A)一个空格加一个下划线"_"
B)一个下划线"_"
C)一个造字符"-"
D)一个空格加一个连字符"-"
正确答案: A
(15)为了暂时关闭计时器，应把该计时器控件的哪个属性设置为False?
A)Visible
B)Timer
C)Enabled
D)Interval
正确答案: C
(16)以下关于Visual Basic数据类型的说法，不恰当的是
A)Visual Basic 6.0提供的数据类型主要有字符串型和数值型，此外还有字节、货币、对象、日期、布尔和变体数据类型等
B)目前Decimal数据类型只能在变体类型中使用
C)用户不能定义自己的数据类型
D)布尔型数据只能取两种值，用两个字节存储
正确答案: C
(17)以下各项，可以作为Visual Basic变量名的是
A)Book
B)2_Seek
C)123.58
D)Book-1
正确答案: A
(18)表达式(3 / 2 + 1)* (5 / 2 + 2)的值是
A)11.25
B)3
C)6.125
D)4
正确答案: A
(19)关于自定义对话框概念的说明，错误的是
A)建立自定义对话框时必须执行添加窗体的操作
B)自定义对话框实际上是VB的窗体
C)在窗体上还要使用其他控件才能组成自定义对话框
D)自定义对话框不一定要有与之对应的事件过程
正确答案: D
(20)下面Change事件过程中，文本框控件Text1用来接收数字字符的输入，该事件过程的作用是
Private Sub Text1_Change()
Text2.Text=Str(6.28 * Val(Text1.Text))
End Sub
A)将在文本框Text1输入的数字变为数值
B)将在文本框Text1输入的数字作为半径，求圆的周长并转换为字符串
C)只要Text1中的内容一改变，Text2中显示的圆周长也随之改变
D)事件过程中的.Val函数和Str函数使用错误，事件过程不能执行
正确答案: C
21)用什么语句可以选择指定的表项或取消已选择的表项?
A)列表框.Selected(索引值)
B)列表框名.Selected(索引值)=True|False
C)列表框.Selected
D)列表框名.Selected=True|False
正确答案: B
(22)用于将屏幕上的对象分组的控件是
A)列表框
B)组合框
C)标签
D)框架
正确答案: D
(23)以下说法不正确的是
A)使用ReDim语句可以改变数组的维数
B)使用ReDim语句可以改变数组的类型
C)使用ReDim语句可以改变数组的每一维的大小
D)使用ReDim语句可以改变对数组中的所有元素进行初始化
正确答案: B
(24)有如下事件过程：
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
If (Button And 3)=3 Then
Print "OK"
End If
End Sub
程序运行后，为了在窗体上输出"OK"，应当按下的鼠标键是
A)左键
B)右键
C)同时按下左键和右键
D)按什么都不显示
正确答案: D
(25)在窗体上画一个名称为CommonDialog1的通用对话框，一个名称为Command1的命令按钮，要求单击命令按钮时，打开一个保存文件的对话框，该窗口的标题为"Save"，缺省文件名称为"SaveFile"，在"文件类型"栏中显示*txt，则能够满足上述要求的程序是
A)Private Sub Command1_Click()
CommonDialog1.FileName="SaveFile"
CommonDialog1.Filter="AllFiles|*.*|(*.txt)|*.txt|(*.doC)|*.doc"
CommonDialog1.FilterIndex=2
CommonDialog1.DialogTitle="Save"
CommonDialog1.Action=2
End Sub
B)Private Sub Command1_Click()
CommonDialog1.FileName="SaveFile"
CommonDialog1.Filter="AllFiles|*.*|(*.txt)|*.txt|(*.doC)|*.doc"
CommonDialog1.FilterIndex=1
CommonDialog1.DialogTitle="Save"
CommonDialog1.Action=2
End Sub
C)Private Sub Command1_Click()
CommonDialog1.FileName="Save"
CommonDialog1.Filter="AllFiles|*.*|(*.txt)|*.txt|(*.doC)|*.doc"
CommonDialog1.FilterIndex=2
CommonDialog1.DialogTitle="SaveFile"
CommonDialog1.Action=2
End Sub
D)Private Sub Command1_Click()
CommonDialog1.FileName="SaveFile"
CommonDialog1.Filter="AllFiles|*.*|(*.txt)|*.txt|(*.doC)|*.doc"
CommonDialog1.FilterIndex=1
CommonDialog1.DialogTitle="Save"
CommonDialog1.Action=1
End Sub
正确答案: A (26)阅读下面的程序段：
For a=1 To 2
For b=1 To a
For c=b To 2
I=I + 1
Next
Next
Next
Print I
执行上面的三重循环后，I的值为
A)4
B)5
C)6
D)9
正确答案: B
(27)设有下面的循环：
i=0
While i <=1
i=i + 3
Print i
Wend
则运行后的输出结果是
A)1
B)2
C)3
D)4
正确答案: C
(28)设有下面的循环：
i=1
Do
i=i + 3
Print i
Loop Until I>程序运行后要执行3次循环体，则条件中I的最小值为
A)6
B)7
C)8
D)9
正确答案: B
(29)执行以下语句过程，在窗体上显示的内容是
Option Base 0
Private Sub Command3_Click()
Dim d
d=Array("a", "b", "c", "d")
Print d(1); d(3)
End Sub
A)ab
B)bd
C)ac
D)出错
正确答案: B
(30)下列程序段，在运行时最早输出的内容是
a=2
c=1
AAA:
c=c + a
If c < 10 Then
Print c
GoTo AAA
Else
Print "10以内的奇数显示完毕。"
End If
A)3
B)7
C)9
D)6
正确答案: A (31)有如下程序段：
Private Sub Command1_Click()
Dim a As Integer
a=2
For i=1 To 3
Print G(A)
Next i
End Sub
Function G(a As Integer)
b=0
Static c
b=b + 1
c=c + 1
G=a + b + c
End Function
运行上面的程序后，单击命令按钮，输出结果为
A)1 2 3
B)2 3 4
C)4 5 6