(31)定义了二维数组A(3 to 8,3)，该数组的元素个数为______。
A)20 B)24
C)25 D)36
(32)阅读下面的程序段：
K=0
for I=1 to 3
for J=1 to I
K=K+J
Next J
Next I
执行上面的语句后，K的值为______。
A)8 B)10
C)14 D)21
(33)VBA数据类型符号“%”表示的数据类型是______。
A)整型 B)长整型
C)单精度型 D)双精度型
(34)函数Mid("123456789",3,4)返回的值是______。
A)123 B)1234
C)3456 D)456
(35)运行下面程序代码后，变量J的值为______。
Private Sub Fun()
Dim J as Integer
J=10
DO
J=J+3
Loop While J<19
End Sub
A)10 B)13
C)19 D)21
二、填空题(每空2分，共30分)
请将每一个空的正确答案写在答题卡【1】～【15】序号的横线上，答在试卷上不得分。
(1)实现算法所需的存储单元多少和算法的工作量大小分别称为算法的 【1】 。
(2)数据结构包括数据的逻辑结构、数据的 【2】 以及对数据的操作运算。
(3)一个类可以从直接或间接的祖先中继承所有属性和方法。采用这个方法提高了软件的【3】 。
(4)面向对象的模型中，最基本的概念是对象和 【4】 。
(5)软件维护活动包括以下几类：改正性维护、适应性维护、 【5】 维护和预防性维护。
(7)文本型字段大小的取值最大为 【8】 个字符。
(8)使用查询向导创建交叉表查询的数据源必须来自 【9】 个表或查询。
(9)计算型控件用 【10】 作为数据源。
(10) 【11】 报表也称为窗体报表。
(11) 【12】 函数返回当前系统日期和时间。
(12)运行下面程序，其输出结果(str2的值)为 【13】 。
Dim str1, str2 As String
Dim i As Integer
str1 = "abcdef"
For i = 1 To Len(str1) Step 2
str2 = UCase(Mid(str1, i, 1)) + str2
Next
MsgBox str2
(13)运行下面程序，其运行结果k的值为 【14】 ，其最里层循环体执行次数为
【15】 。
Dim i, j, k As Integer
i = 1
Do
For j = 1 To i Step 2
k = k + j
Next
i = i + 2
Loop Until i > 8
上一页 [1] [2] [3] [4] [5] [6] [7] [8] [9] [10] 下一页
责任编辑：虫虫
