下载文档原格式
1、在Access2010中的VBA过程里，要运行宏可以使用DoCmd对象的
A. Open
B. RunMacro
C. CloseD . Query
答案:B
2、在宏中，OpenReport操作可用来打开指定的
A.查询B状态栏C.窗体D.报表
答案:D
3、关于宏的执行，以下说法不正确的是
A.在“导航窗格”，选择“宏”对象列表中的某个宏名并双击，
可以直接运行该宏中的第一个子宏的所有宏操作
B.在“导航窗格”，选择“宏”对象列表中的某个宏名并双击，
可以直接运行该宏中的第二个子宏的所有宏操作
C.可以在一个宏中运行另一个宏 D .在一个宏中可以含有
答案:B
4、在宏中，用于显示所有记录的宏命令是
A . MsgboxAIIRecords
B . ShowAIIRecords
C . Set Prop erty
D . SaveRecords
答案:B
5、在VBA中，表达式(5A2Mod8)>=4的值是
A . True
B . False
C . AndD.Or
答案:B
6、表达式llf(23\5.5v=3Or5>=6,68,176) 的结果是
A . 5B. 6C. 68D . 176
注意：执行整除之前，要先把除数四舍五入。
请另外试试表达式llf(23\5.4v=3Or5>=6,68,176) 的结果。方法。
IF逻辑块
7、执行下列程序段后，变量P的值是
DimWAsSingle
DimP AsSingle
W=68.5 lfWv=50Then
P=W*4
Else
P=W*2
EndIf
A.68.5
B.137
C.205.5
D.275
&设x=9，执行下列程序段后，变量t的值是y=x\4+2^4
Ifyv>30Thenx=x+y
t=xMod12
A.1
B.2
C.3
D.4
B. Docmd.OpenView"产品数量统计”
Docmd.OpenTable"产品数量统计”
Docmd.OpenReport"产品数量统计”
答案:D
14、表达式 llf(7Mod5>3,60,llf(2A3>28,80,100))
的运算结果是
A . 60
B . 80C. 100D . 160 答案:C
15、在 VBA 中，变量声明语句“ Dima!,bASinteger ”a 中的的变量 类型是
9、在VBA 中，声明函数过程的关键字是
A . DimB. ConstC . FunctionD . Sub
答案:C
10、对VBA 中的逻辑值进行算术运算时， True 值被当做-1 , False 当做 A . 1B. 2C. OD. 3
答案:C
11、在VBA 中，类型说明符#表示的数据类型是
A .整型B.长整型C.单精度型 D .双精度 答案:D
12、下列语句中，定义窗体的加载事件过程的头语句是
P nvateSubForm_Chang()
PrivateSubForm__LostFocus()
P nvateSubForm_Load()
P rivateSubForm_O pen()
答案:C
13、现有一个已经建好的窗体，窗体中有一个命令按钮，单击此按钮，将 打开“产品数量统计”报表，如果采用 VBA 代码完成，下面语句正确的
Docmd.OpenForm'产品数量统计”
B.
18、以下VBA程序段运行后，变量j的值是
k=10 j=0
Do
k=k+1O j=j+1
Loo pUntilk>20
A. IB 2C. 4D. 10
答案:B
19、以下VBA程序段运行后，变量j的值是
y=89 j="不及格"
DoWhiley>60
j=llf(yv70," 及格",IIf(y<90," 良好","优秀"))
y=y-50
Loop
A."不及格"
B."及格"
C."良好"D ."优秀"
答案:C
20、以下VBA代码程序运行结束后，变量a的值是
a=0 b=101
Do
b=b-20 a=a+b
Loo pWhileb>80
A. 60
B. 140
C. 142
D. 160
答案:C
21、以下VBA代码程序运行结束后，数组元素a(12)的值是
Dima(12)AsLong,iAsLong i=0
DoUntili>12
a(i)=i^2-i i=i+1
Loop
A. 1
B. 128
C. 132
D. 144
22、假定有如下的Function过程:
Functio nppfu n(xAsSingle,yAsSingle) pp fun=x^3-y^2 EndFunction
在窗体上添加一个命令按钮（名为
cmd10）,然后编写如下事件过程:
PrivateSubcmd1O_Click()
DimaAsSingle,bAsSingle a=5 b=4
MsgBox ppfu n(a,b)mod50
EndSub
A . 50B. 25C. 9D . 109
答案:C
PrivateSubcmd2_Click()
Dimp iAsSingle,nAslnteger
pi=3.14 n=Len(Str( pi)&Sp ace (2)&"
MsgBoxn
EndSub
A . 11B. 12C. 13D . 14
答案:D
PrivateSubcmd13_Click()
DimxAsString,yAsString
x="龙洞华美路中山大学新华学院法学院 y="2006级法学专业学生" MsgBoxMid(x,6,4)&Right(x,3)&Left(y,9)
EndSub
打开窗体运行后，单击命令按钮，消息框中的输出内容是
A .龙洞华美路中山大学新华学院法学院
2006级法学专业学生 答案:D
25、下列程序段，建立如图所示的数组 d （下标从1开始），填写所缺部分:
123456 212345 321234 432123 543212 654321
打开窗体运行后，单击命令按钮， 消息框中的输出内容是
23、在窗体上添加一个命令按钮
（名为 cmd2）,然后编写如下事件过程:
是本字符串长度"）
打开窗体运行后，单击命令按钮， 消息框中的输出内容是
24、在窗体上添加一个命令按钮
（名为 cmd13）,然后编写如下事件过程:
B.
中山大学新华学院法学院 2006级法学专业学生 C .
中山大学法学院2006级法学专业学生 D. 中山大学法学院2006级法学专业
