选项：
A: 0 0
B:-5 0
C:-5 6
D: 0 6
我的答案： 【-5 6】
6、选择题:下面关于控件数组与一般控件的叙述中正确的是（ ）。
选项：
A:控件数组一定有1个以上同类型的控件组成，而一般控件只有一个控件
B:控件数组的索引属性值Index值为0，而一般控件的Index值为空
C:控件数组的Index值为1，而一般控件的Index值为0
D:控件数组的建立通过Dim语句声明，而一般控件不需要声明
我的答案： 【控件数组一定有1个以上同类型的控件组成，而一般控件只有一个控件】
7、选择题:如果要对已经声明的数组重新定义大小，并保留原有数据，可以使用语句（ ）。
选项：
A:Dim
B:ReDim
C:Dim Preserve
D:ReDim Preserve
我的答案： 【ReDim Preserve】
8、选择题:下列程序的输出结果为（ ）。 Private Sub Command1_Click() Dim a ReDim a(6) For j=1 To 5 a(j)=jj Next j Print a(a(2)a(3)-a(4)2)+a(5) End Sub
选项：
A: 36
B: 25
C: 16
D: 41
我的答案： 【10 10】
9、选择题: 执行下面程序段后，输出的结果为（ ）。 Dim a(10, 10) As Integer For i = 2 To 4 For j = 4 To 5 a(i, j) = i * j Next j Next i Print a(2, 5) + a(3, 4) + a(4, 5)
选项：
A: 22
B: 42
C: 32
D: 52
我的答案： 【10 和 11】
10、选择题:要分配存放如下方阵的数据，正确的且最节约存储空间的数组声明语句是（ ）。 1.1 2.2 3.3 4.4 5.5 6.6 7.7 8.8 9.9
选项：
A:Dim a(9) As Single
B:Dim a(3, 3) As Single
C:Dim a(-1 To 1, -5 To -3) As Single
D:Dim a(-3 to 1, -5 to 7) As Integer
我的答案： 【Dim a(-1 To 1, -5 To -3) As Single】
第五章 章节测试
1、选择题:假定有如下的Sub过程：Sub fun(x As Single, y As Single) t = x x = t / y y = t Mod yEnd Sub在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Command1_Click() Dim a As Single Dim b As Single a = 6 b = 4 fun a, b Print a, bEnd Sub程序运行后，单击命令按钮，输出结果为（ ）。
选项：
A:5 4
B:1 1
C:1.25 4
D:1.5 2
我的答案： 【1.5 2】
2、选择题:假定有以下函数过程：Function Fun(s As String) As String Dim s1 As String For i = 1 To Len(s) s1 = UCase(Mid(s, i, 1)) + s1 Next i Fun = s1End Function在窗体上添加一个命令按钮，然后编写如下事件过程：Private Sub Command1_Click() Dim Str1 As String Dim Str2 As String Str1 = InputBox(“请输入一个字符串”) Str2 = Fun(Str1) Print Str2End Sub程序运行后，单击命令按钮，如果在输入对话框中输入字符串“abcdefg”，则单击“确定”按钮后再窗体上输出的结果为（ ）。
选项：
A:Abcdefg
B:ABCDEFG
C:gfedcba
D:GFEDCBA
我的答案： 【第一空： 18】
