发布时间 : 星期二 文章Access2010《数据库基础与应用》期末综合练习题更新完毕开始阅读1bc33c3af6ec4afe04a1b0717fd5360cba1a8d2f
Access2010《数据库基础与应用》期末综合练习题
13 / 23
第21 题: (单选题, 1 分)
以下 VBA 代码程序运行结束后,数组元素 a(12) 的值是______。 Dim a(12) As Long, i As Long i=0
Do Until i>12 a(i)=i^2 - i i=i+1 Loop
A.1 B.128 C.132 [A]选A
[B]选B [C]选C [D]选D 答案: C
第22 题: (单选题, 1 分) 假定有如下的 Function 过程:
Function ppfun(x As Single, y As Single) ppfun=x^3-y^2 End Function
.144 D在窗体上添加一个命令按钮(名为 cmd10),然后编写如下事件过程: Private Sub cmd10_Click() Dim a As Single, b As Single a = 5 b = 4
MsgBox ppfun(a,b) mod 50 End Sub
打开窗体运行后,单击命令按钮,消息框中的输出内容是______。 A.50 B.25 C.9 D.109
[A]选A [B]选B
[C]选C
[D]选D 答案: C
第23 题: (单选题, 1 分)
在窗体上添加一个命令按钮(名为 cmd2),然后编写如下事件过程: Private Sub cmd2_Click() Dim pi As Single, n As Integer pi = 3.14
n = Len(Str(pi) & Space(2) & \是本字符串长度\ MsgBox n
Access2010《数据库基础与应用》期末综合练习题
15 / 23
End Sub
打开窗体运行后,单击命令按钮,消息框中的输出内容是______。 A.11 B.12 C.13 D.14
[A]选A [B]选B
[C]选C [D]选D
答案: D
第24 题: (单选题, 1 分)
在窗体上添加一个命令按钮(名为 cmd13),然后编写如下事件过程: Private Sub cmd13_Click() Dim x As String, y As String
x = \龙洞华美路中山大学新华学院法学院\ y = \级法学专业学生\
MsgBox Mid(x,6,4) & Right(x,3) & Left(y,9) End Sub
打开窗体运行后,单击命令按钮,消息框中的输出内容是______。 A.龙洞华美路中山大学新华学院法学院2006级法学专业学生 B.中山大学新华学院法学院2006级法学专业学生
C.中山大学法学院2006级法学专业学生 D.中山大学法学院2006级法学专业
[A]选A [B]选B
[C]选C
[D]选D 答案: D
第25 题: (单选题, 1 分)
下列程序段,建立如图所示的数组d(下标从1开始),填写所缺部分: 1 2 3 4 5 6 2 1 2 3 4 5 3 2 1 2 3 4 4 3 2 1 2 3 5 4 3 2 1 2 6 5 4 3 2 1
Dim d(1 To 6, 1 To 6) For j = 1 To 6 For k = 1 To 6
d(j,k) = Abs( _____ ) + 1 '选答案 Next k