一 、选择题
(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

(2) 数据结构包括数据的逻辑结构、数据的 【2】 以及对数据的操作运算。
正确答案:  1.(存储结构)

(3) 可以把具有相同属性的一些不同对象归类，称为 【3】 。
正确答案:  1.(对象类)

(4) 软件工程包括3个要素，分别为方法、工具和 【4】 。
正确答案:  1.(过程)

(5) 由关系数据库系统支持的完整性约束是指 【5】 和参照完整性。
正确答案:  1.(实体完整性)

(6) 表达式3 ^ 2 Mod 36 ＼ 2 ^ 5的值是 【6】
正确答案:  1.(0)

(7) 我国古代数学家张丘建在其著名的《算经》中提出了百鸡问题：每只公鸡5元，每只母鸡3元，三只雏鸡1元；如何用100元买100只鸡，即公鸡、母鸡、雏鸡各多少只。请在空白处填入适当的内容，将程序补充完整。
Private Sub Command1_Click()
   Dim Cock As Integer
   Dim Hen As Integer
   Dim Chick As Integer
   Form1.Print "公鸡数", "母鸡数", "雏鸡数"
   For Cock=0 To 20
      For Hen=0 To 33
         For Chick=0 To 100
             If 【7】 Then
                Form1.Print Cock, Hen, Chick
             End If
          Next Chick
      Next Hen
   Next Cock
End Sub
正确答案:  1.(Cock + Hen + Chick = 100 And 5 * Cock + 3 * Hen + )

(8) 每一个窗体或者控件都有一个名字，为提高程序的可读性，可以用前缀的方式来表示对象的类型，如Form的前缀为frm，则Image的前缀为 【8】 ，Picture的前缀为 【9】 。
正确答案:  1.(img) 2.(pic)

(9) 在一个工程中有两个窗体，窗体Form1上有一个命令按钮Disp，单击该按钮，Form1窗体隐藏，显示Form2窗体，程序如下，请补充完整。
Private Sub Disp_Click ()
   Me.Hide
   Form2. 【10】
End Sub
正确答案:  1.(Show)

(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)