模块(二)
(总分：110.00，做题时间：90分钟)
一、选择题(总题数：47，分数：47.00)
1.单击窗体上Command1命令按钮时，执行如下事件过程
Private Sub Command1_Click( )
a$="software and hardware"
b$=Right(a$，8)
c$=Mid(a$，1，8)
MsgBox a$，b$，c$，1
End Sub
则在弹出的信息框的标题栏中显示的信息是
（分数：1.00）
 A.software and hardware
 B.software
 C.hardware √
 D.1
解析：
2.给定13期DD，可以计算该日当前月最大天数的正确表达式是
（分数：1.00）
 A.Day(DＤ)
 B.Day(DateSerial(Year(DＤ)，Month(DＤ)，Day(DＤ)))
 C.Day(DateSerial(Year(DO)，Month(DＤ)，0))
 D.Day(DateSerial(Year(DＤ)，Month(DＤ)+1，0)) √
解析：
3.表达式("周"＜"刘")返回的值是
（分数：1.00）
 A.False √
 B.True
 C.-1
 D.1
解析：
4.以下内容中不属于VBA提供的数据验证函数是
（分数：1.00）
 A.IsText √
 B.IsDate
 C.IsNumeric
 D.IsNull
解析：
5.连接式"2+3"&"="&(2+3)的运算结果为
（分数：1.00）
 A."2+3=2+3"
 B."2+3=5" √
 C."5=5"
 D."5=2+3"
解析：
6.VBA中用实际参数a和b调用有参函数过程Area(m，n)的正确形式是
（分数：1.00）
 A.Area m，n
 B.Area a，b √
 C.Call Area(m，n)
 D.Call Area a，b
解析：
7.VBA表达式DateSerial(2004-1，8-2，0)返回的值是
（分数：1.00）
 A.2004-5-31
 B.2004.5.31
 C.2003.5.31 √
 D.2003-6-1
解析：
8.以下关于过程和过程参数的描述中，错误的是
（分数：1.00）
 A.过程的参数可以是控件名称
 B.用数组作为过程的参数时，使用的是“传址”方式
 C.只有函数过程能够将过程中处理的信息传回到调用的程序中 √
vba 字符串转数组 D.窗体可以作为过程的参数
解析：
9.在日期/时间数据类型中，每个字段需要几个字节的存储空间
（分数：1.00）
 A.4
 B.8 √
 C.12
 D.16
解析：
10.如图8-2所示的为VBE界面的“代码”窗口，其中圈出的部分为
（分数：1.00）
 A.
 B. √
 C.
 D.
解析：
11.VBA中定义符号常量可以用关键字
（分数：1.00）
 A.Const √
 B.Dim
 C.Public
 D.Static
解析：
12.下面程序段执行的结果是
Dim i As Integer，S As Integer
S=0
For i=1 to 10 step 1
S=S+i
Next i
（分数：1.00）
 A.S=0
 B.S=10
 C.死循环
 D.S=55 √
解析：
13.VBA的逻辑值进行算术运算时，True值被当做
（分数：1.00）
 A.0
 B.-1
 C.1 √
 D.任意值
解析：
14.VBA中定义局部变量可以用关键字
（分数：1.00）
 A.Const
 B.Dim √
 C.Public
 D.Staffc
解析：
15.下面表达式为假的是
（分数：1.00）
 A.(4＞3)
 B.((4 Or(3＞2))=1)
 C.((4 And(3＜2))=1) √
 D.(Not(3＞=4))
解析：
16.设有如下的记录类型
Type student
Number As String
Name As String
Age As Integer
End Type
则正确引用该记录类型变量的代码是
（分数：1.00）
 A.Student.name="张红"
 B.Dim s As Student s.name="张红" √
 C.Dim S As Type Student s.name="张红"
 D.Dim s As Type s.name="张红"
解析：
17.已定义好有参函数f(m)，其中形参m是整型变量。下面调用该函数，传递实参为5，将返回的函数值赋值给变量t。
以下正确的是
（分数：1.00）
 A.t=f(m)
 B.t=Call f(m)
 C.t=f(5) √
 D.t=Call f(5)
解析：
18.ADO对象模型中可以打开RecordSet对象的是
（分数：1.00）
 A.只能是Connection对象
 B.只能是Command对象
 C.可以是Connection对象和Command对象 √
 D.不存在
解析：
19.能够实现从指定记录集里检索特定字段值的函数是
（分数：1.00）
 A.Nz
 B.DSum
 C.DLookup √
 D.Rnd
解析：
20.VBA中不能进行错误处理的语句结构是
（分数：1.00）
 A.On Error Then标号 √
 B.On Error GoTo标号
 C.On Error Resume Next
 D.On Error GoTo
解析：
21.函数Right(Left(Mid("Access DataBase"，10，3)，2)，1)返回的值是
（分数：1.00）
 A.t
 B.空格
 C.a √
 D.B
解析：
22.VBA表达式If(0，20，30)的值为
（分数：1.00）
 A.20
 B.30 √
 C.25
 D.10
解析：
23.属于Access系统内部常量的是
（分数：1.00）
 A.0
 B.1
 C.Not
 D.On √
解析：
24.下面过程运行之后，则变量J的值为
Private Sub Fun( )
Dim J As Integer
J=2
Do
J=J*3
Loop While J＜15
End Sub
（分数：1.00）
 A.2

版权声明：本站内容均来自互联网，仅供演示用，请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198，我们将在24小时内删除。