二级ACCESS-选择题(七)
(总分100,考试时间90分钟)
一、选择题
1. 在Access中，如果变量定义在模块的过程内部，当过程代码执行时才可见，则这种变量的作用域为______
A．程序范围 B．全局范围 C．模块范围 D．局部范围
2. 将一个数转换成相应字符串的函数是______。
A．Str B．String C．Asc D．Chr
3. 将逻辑型数据转换成整型数据，转换规则是______。
A．将True转换为-1，将False转换为0 B．将True转换为1，将False转换为-1
C．将True转换为0，将False转换为-1 D．将True转换为1，将False转换为0
4. 命令按钮控件test的单击事件过程如下：
Private Sub test_click()
Dim I，R
R=0
For I=1 T0 5 Step 1
R=R+I
Next I
bResult.Caption=Str(R)
End Sub
当运行窗体，单击命令按钮时，在名为bResuh的窗体标签内将显示的是______。
A．字符串15 B．字符串5 C．整数15 D．整数5
5. 在模块的声明部分使用“Option Base 1”语句，然后定义二维数组A(2 to 5，5)，则该数组的元素个数为______。
A．20 B．24 C．25 D．36
6. VBA语句“Dim NewArray(10)as Integer”的含义是______。
A．定义10个整型数构成的数组NewArray B．定义11个整型数构成的数组NewArray
C．定义1个值为整型数的变量NewArray D．定义1个值为10的变量NewArray
7. 如有数组声明语句Dim a(2，-3 to 2，4)，则数组a包含元素的个数是______。
A．40 B．75 C．12 D．90
8. 语句Dim NewArray(10)As Integer的含义是______。
A．定义了一个整型变量且初值为10 B．定义了10个整数构成的数组
C．定义了11个整数构成的数组 D．将数组的第10元素设置为整型
9. 下列数组声明语句中，正确的是______。
A．Dim a[3，4]As Integer B．Dim a(3，4)As Integer
C．Dim a(n，n)As Integer D．Dim a[3，n]As Integer
10. 下列VBA变量名中，正确的是______。
A．3S B．Print C．Select My Name D．Select_1
11. 下列VBA变量名中，正确的是______。
A．3a B．Print-2 C．Select My Name D．Select_12
12. VBA中定义符号常量使用的关键字是______。
A．Const B．Dim C．Public D．Static
13. 如果A为“Boolean”型数据，则下列赋值语句正确的是______。
A．A="true" B．A=.true C．A=#TURE# D．A=3＜4
14. a和b中有且只有一个为0，其正确的表达式是______。
A．a=0 or b=0 B．a=0 Xor b=0
C．a=0 And b=0 D．a*b=0 And a+b＜＞0
15. 当条件为5＜x＜10时，x=x+1，以下语句正确的是______。
A．if 5＜x＜10 then x=x+1 B．if 5＜x or x＜10 then x=x+1
C．if 5＜x and x＜10 then x=x+1 D．if 5＜x xor x＜10 then x=x+1
16. 下列运算结果中，值最大的是______。
A．3\4 B．3/4 C．4 mod 3 D．3 mod 4
17. 表达式4+5\6*7/8 Mod 9的值是______。
A．4 B．5 C．6 D．7
18. 对不同类型的运算符，优先级的规定是______。
A．字符运算符＞算术运算符＞关系运算符＞逻辑运算符
B．算术运算符＞字符运算符＞关系运算符＞逻辑运算符
C．算术运算符＞字符运算符＞逻辑运算符＞关系运算符
D．字符运算符＞关系运算符＞逻辑运算符＞算术运算符
19. 表达式X+1＞X是______。
A．算术表达式 B．非法表达式
C．关系表达式 D．字符串表达式
20. 下列逻辑运算结果为“true”的是______。
A．false or not true B．true or not true
C．false and not true D．true and not true
21. 表达式“B=INT(A+0.5)”的功能是______。
A．将变量A保留小数点后1位 B．将变量A四舍五入取整
C．将变量A保留小数点后5位D．舍去变量A的小数部分
22. 在窗体上有一个命令按钮Command1，编写事件代码如下：
Private Sub Command1_Click()
Dim d1 As Date
Dim d2 As Date
d1=#12/25/2009#
d2=#1/5/2010#
MsgBox DateDiff("ww"，d1，d2)
End Sub
打开窗体运行后，单击命令按钮，消息框中输出的结果是______。
A．1 B．2 C．10 D．11
23. 能够实现从指定记录集里检索特定字段值的函数是______。
A．Nz B．Find C．Lookup D．DLookup
24. 下列表达式计算结果为日期类型的是______。
A．#2012-1-23#-#2011-2-3# B．year(#2011-2-3#)
C．DateValue("2011-2-3") D．Len("2011-2-3")
25. 如果X是一个正的实数，保留两位小数、将千分位四舍五入的表达式是______。
A．0.01*Int(X+0.05) B．0.01*Int(100*(X+0.005))
C．0.01*Int(X+0.005) D．0.01*Int(100*(X+0.05))
26. 能够实现从指定记录集里检索特定字段值的函数是______。
A．DCount B．DLookup C．DMax D．DSum
27. 要将一个数字字符串转换成对应的数值，应使用的函数是______。
A．Val B．Single C．Asc D．Space
28. 窗体中有命令按钮run34，对应的事件代码如下：
Private Sub run34_Enter()
Dim num As Integer，a As Integer，b As Integer，i As Integer
For i=1 To 10
num=InputBox("请输入数据:"，"输入")
If Int(num/2)=num/2 Then
a=a+1
Else
b=b+1
End If
Next i
MsgBox("运行结果:a="&Str(a)&"，b="&Str(b))
End Sub
运行以上事件过程，所完成的功能是______。
A．对输入的10个数据求累加和
B．对输入的10个数据求各自的余数，然后再进行累加
C．对输入的10个数据分别统计奇数和偶数的个数
datediff是字符型函数 D．对输入的10个数据分别统计整数和非整数的个数
29. 要将“选课成绩”表中学生的“成绩”取整，可以使用的函数是______。
A．Abs([成绩]) B．Int([成绩])
C．Sqr([成绩]) D．Sgn([成绩])
30. Rnd函数不可能产生的值是______。
A．0 B．1 C．0.1234 D．0.00005
31. 运行下列程序，显示的结果是______。
a=instr(5，"Hello!Beijing."，"e")
b=sgn(3＞2)
c=a+b
MsgBox c
A．1 B．3 C．7 D．9
32. 表达式123+Mid$("123456"，3，2)的结果是______。
A．"12334" B．12334 C．123 D．157
33. 删除字符串前导和尾随空格的函数是______。
A．Ltrim() B．Rtrim() C．Trim() D．Lease()
34. 随机产生[10，50]之间整数的正确表达式是______。
A．Round(Rnd*51) B．Int(Rnd*40+10)
C．Round(Rnd*50) D．10+Int(Rnd*41)
35. 函数InStr(1，"eFCdEfGh"，"EF"，1)执行的结果是______。
A．0 B．1 C．5 D．6
36. 下列程序段运行结束后，消息框中的输出结果是______。
Dim c As Boolean
版权声明：本站内容均来自互联网，仅供演示用，请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198，我们将在24小时内删除。
发表评论