一 、选择题
(1) 根据数据结构中各数据元素之间前后件关系的复杂程度，一般将数据结构分成
A) 动态结构和静态结构
B) 紧凑结构和非紧凑结构
C) 线性结构和非线性结构
D) 内部结构和外部结构
正确答案: C
(2) 设一棵二叉树中有3个叶子结点，有8个度为1的结点，则该二叉树中总的结点数为
A) 12
B) 13
C) 14
D) 15
正确答案: B
(3) 在下列几种排序方法中，要求内存量最大的是
A) 插入排序
B) 选择排序
C) 快速排序
D) 归并排序
正确答案: D
(4) 下列叙述中，不属于结构化程序设计方法的主要原则的是
A) 自顶向下
B) 由底向上
C) 模块化
D) 限制使用goto语句
正确答案: B
(5) 下列不属于软件调试技术的是
A) 强行排错法
B) 集成测试法
C) 回溯法
D) 原因排除法
正确答案: B
(6) 为了避免流程图在描述程序逻辑时的灵活性，提出了用方框图来代替传统的程序流程图，通常也把这种图称为
A) PAD图
B) N-S图
C) 结构图
D) 数据流图
正确答案: B
(7) 软件复杂性度量的参数包括
A) 效率
B) 规模
C) 完整性
D) 容错性
正确答案: B
(8) 下列叙述中，不属于数据库系统的是
A) 数据库
B) 数据库管理系统
C) 数据库管理员
D) 数据库应用系统
正确答案: B
(9) 数据库系统的核心是
A) 数据库
B) 数据库管理系统
C) 数据模型
D) 软件工具
正确答案: B
(10) 视图设计一般有3种设计次序，下列不属于视图设计的是
A) 自顶向下
B) 由外向内
C) 由内向外
D) 自底向上
正确答案: B
(11) 下列说法错误的是
A) 标准模块的扩展名是.bas
B) 标准模块由程序代码组成
C) 标准模块只用来定义一些通用的过程
D) 标准模块不附属于任何一个窗体
正确答案: C
(12) 如果要将窗体中的某个命令按钮设置成无效状态，应该动命令按钮的何种属性
A) Value
B) Visible
C) Default
D) Enabled
正确答案: D
(13) 在窗体上有多个控件，要实现程序运行后焦点默认在某一控件上，应该设置的属性是
A) 设置Enabled的值为True
B) 设置TabIndex的值为1
C) 设置TabIndex的值为0
D) 设置Index的值为0
正确答案: C
(14) 下列几项中，属于合法的日期型常量的是
A) "10/10/02"
B) 10/10/02
C) {10/10/02}
D) #10/10/02#
正确答案: D
(15) 下列程序段的执行结果为
A=2
B=5
If A * B < 1 Then B=B - 1 Else B=-1
Print B - A > 0
A) True
B) False
C) -1
D) 1
正确答案: B
(16) 以下语句的输出结果是
a=Sqr(26)
Print Format$ (a, "$####.###")
A) $5.099
B) 5.099
C) 5099
D) $0005.099
正确答案: A
(17) 标签控件能够显示文本信息，决定其文本内容的属性是
A) Alignment
B) Caption
C) Visible
D) BorderStyle
正确答案: B
(18) 在属性窗口中，加载指定的图形放入当前对象中的属性是
A) CurrentY
B) Picture
C) CurrentX
D) Caption
正确答案: B
(19) 在使用应用程序时，常常用作在单击时执行指定的操作的控件是
A) 命令按钮
B) 图片框
C) 复选框
D) 单选按钮
正确答案: A
(20) 当直线或形状的BorderStyle属性设置为1时，控件是
A) 虚线
B) 点线
C) 不可见
D) 实线
正确答案: D
(21) 通过设置何属性可以改变所画图形的形状?
A) Shape
B) Index
C) Enabled
D) Height
正确答案: A
(22) 在窗体上画一个命令按钮，然后编写如下事件过程：
Private Sub Command1_Click()
s=1
Do
s=(s + 1) * (s + 2)
Number=Number + 1
Loop Until s >=30
Print Number, s
End Sub
程序运行后，输出的结果是
A) 2 3
B) 2 56
C) 5 12
D) 10 20
正确答案: B
(23) 下列程和序段的执行结果为
x=Int(Rnd() + 9)
Select Case x
Case 10
Print "excellent"
Case 9
Print "good"
Case 8
Print "pass"
Case Else
Print "fail"
End Select
A) excellent
B) good
C) pass
D) fail
正确答案: B
(24) 下列程序段的执行结果为
a=75
If a > 60 Then Score=1
If a > 70 Then Score=2
If a > 80 Then Score=3
If a > 90 Then Score=4
Print " Score="; Score
A) Score=1
B) Score=2
C) Score=3
D) Score=4
正确答案: B
(25) 下列程序段的执行结果为
I=1
x=5
Do
I=I + 1
x=x + 2
Loop Until I >=7
Print "I="; I
Print "x="; x
A) I=4
x=5
B) I=7
x=15
C) I=6
x=8
D) I=7
x=17
正确答案: D
(26) 下面的程序的运行结果是
a=1
b=1
Do
a=a^2
b=b + 1
Loop Until b > 5
Print "k="; a; Spc(4) ; "b="; b + a
A) k=7
b=14
B) k=6
b=6
C) k=4
b=8
D) k=1
b=7
正确答案: D
(27) 单击命令按钮，下列程序的执行结果为
Private Sub Command1_Click()
Dim x As Integer, y As Integer
x=32: y=42
Call PCS(x, y)
Print x; y
End Sub
Public Sub PCS(Byval n As Integer, ByVal m As Integer)
n=n Mod 10+1
m=m Mod 10+1
End Sub
A) 32 42
B) 2 32
C) 2 3
D) 12 3
正确答案: A
(28) 下列程序的执行结果为
Private Sub Command1_Click()
Dim s1 As String, s2 As String
s1="abcd"
Call Transfer(s1, s2)
Print s2
End Sub
Private Sub Transfer (ByVal xstr As String, ystr As String)
Dim tempstr As String
i=Len(xstr)
Do While i >=1
tempstr=tempstr + Mid(xstr, i, 1)
i=i - 1
Loop
ystr=te mpstr
End Sub
A) dcba
B) abdc
C) abcd
D) dabc
正确答案: A
(29) 单击命令按钮，下列程序的执行结果是
Private Sub Blck(x As Integer)
x=x * 2 + 1
If x < 6 Then
Call Blck(x)
End If
x=x * 2 + 1
Print x;
End Sub
Private Sub Command1_Click()
Blck 2
End Sub
A) 23 47
B) 10 36
C) 22 44
D) 24 50
正确答案: A
(30) 有如下程序：
Private Sub Command1_Click()
Dim a As Integer
a=2
For i=1 To 3
Print Gad (A)
Next i
End Sub
Function Gad (a As Integer)
b=0
Static c
b=b + 1
c=c + 1
Gad=a + b + c
End Function
运行上面的程序后，单击命令按钮，输出结果为
A)1
2
3
B) 2
3
4
C) 4
5
6
D) 1
4
6
正确答案: C
(31) 下列过程定义语句中，参数不是对象的定义语句是A) Sub Pro4(x As Form)
B) Sub Pro4(y As Control)
C) Sub Pro4(Form1 As Form,Labell As Control)
D) Sub Pro4(x As Currency)
正确答案: D
(32) 下列说法正确的是
A) 任何时候都可以使用标准工具栏的"菜单编辑器"按钮打开菜单编辑器
B) 只有当代码窗口为当前活动窗口时，才能打开菜单编辑器
C) 任何时候都可以使用"工具"菜单下的"菜单编辑器"命令，打开菜单编辑器
D) 只有当某个窗体为当前活动窗体时，才能打开菜单编辑器
正确答案: D
(33) 下列各选项说法错误的一项是
A) 文件对话框可分为两种即打开(Open) 文件对话框和保存(Save As) 文件对话框
B) DefaultEXT属性和DialogTitle属性都是打开对话框的属性，但非保存对话框的属性
C) 打开文件对话框可以让用户指定一个文件，由程序使用;而用保存文件对话框可以指定一个文件，并以这个文件名保存当前文件
D) 通用对话框的名称属性的默认值为CommonDialogX(X=1，2……) ，此外，每种对话框都有自己的默认标题
正确答案: B
(34) 下列数组定义语句错误的是
A)k%=10
Dim Arr(k)
B)Const k%=10
Dim Arr(k)
C)Dim Arr1(10) As Integer
Dim Arr2 (10)
D)Dim Arr1(1 To 10)
Dim Arr2(1 To 10, 2 To 11)
正确答案: A
(35) 在Visual Basic中按文件的数据性质不同，可将文件分为
A) 数据文件和程序文件
B) 文本文件和数据文件
C) 顺序文件和随机文件
D) ASCII文件和二进制文件
正确答案: A
(10) 在窗体上有几个对象，运行程序时，当对象得到焦点时，会触发 【11】 事件，当对象失去焦点时将触发 【12】 事件。
正确答案: 1.(GotFocus) 2.(LostFocus)
(11) 下面是用冒泡法将5个整数按升序排列，请将程序补充完整。
Sub GASR()
Dim m
m=Array(10, 1, 5, 6, 7)
For i=0 To 3
For j= 【13】
If m(i) >=m(j) Then
【14】
m(i) =m(j)
m(j) =t
End If
Next j
【15】
For i=0 To 4
Print m(i)
Next i
End Sub
正确答案: 1.(i +1 To 4) 2.(t = m(i)) 3.( Next i)