(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
二 、填空题
(1) 算法的工作量大小和实现算法所需的存储单元多少分别称为算法的 【1】 。
正确答案: 1.(时间复杂度和空间复杂度)
(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 + )
