Access《数据库基础与应用》期末综合练习题2 2Word下载.docx
- 文档编号:3558740
- 上传时间:2023-05-01
- 格式:DOCX
- 页数:18
- 大小:20.28KB
Access《数据库基础与应用》期末综合练习题2 2Word下载.docx
《Access《数据库基础与应用》期末综合练习题2 2Word下载.docx》由会员分享,可在线阅读,更多相关《Access《数据库基础与应用》期末综合练习题2 2Word下载.docx(18页珍藏版)》请在冰点文库上搜索。
【用立即窗口算】
A.TrueB.FalseC.AndD.Or
第6题:
表达式IIf(23\5.5<
=3Or5>
=6,68,176)的结果是______。
A.5B.6C.68D.176
C
第7题:
执行下列程序段后,变量P的值是_____。
DimWAsSingle
DimPAsSingle
W=68.5
IfW<
=50Then
P=W*4
Else
P=W*2
EndIf
A.68.5B.137C.205.5D.275
第8题:
【如何调试?
我的结果是4?
】
设x=9,执行下列程序段后,变量t的值是_____。
y=x\4+2^4
Ify<
>
30Thenx=x+y
t=xMod12
A.1B.2C.3D.4
第8题PrivateSubCommand0_Click()
x=9
y=x\4+2^4
Ify<
30Thenx=x+y
MsgBoxt
EndSub(增加一个条件语句:
x=9,还有msgbox)
第9题:
在VBA中,声明函数过程的关键字是_______。
A.DimB.ConstC.FunctionD.Sub
第10题:
对VBA中的逻辑值进行算术运算时,True值被当做-1,False当做
_______。
A.1B.2C.0D.3
第11题:
【课本P223页】
在VBA中,类型说明符#表示的数据类型是______。
A.整型B.长整型C.单精度型D.双精度
第12题:
【课本P216—217】
下列语句中,定义窗体的加载事件过程的头语句是______。
A.PrivateSubForm_Chang()
B.PrivateSubForm__LostFocus()
C.PrivateSubForm_Load()
D.PrivateSubForm_Open()
第13题:
现有一个已经建好的窗体,窗体中有一个命令按钮,单击此按钮,将
打开“产品数量统计”报表,如果采用VBA代码完成,下面语句正确的
是______。
A.Docmd.OpenForm"
产品数量统计"
B.Docmd.OpenView"
C.Docmd.OpenTable"
D.Docmd.OpenReport"
第14题:
表达式IIf(7Mod5>
3,60,IIf(2^3>
28,80,100))的运算结果是______。
A.60B.80C.100D.160
第15题:
在VBA中,变量声明语句“Dima!
bASinteger”中的变量a的
类型是______。
A.整型B.单精度型C.长整型D.变体型
第16题:
【课本P227概念知识】
在VBA中,“Dima(3,3)ASBoolean”语句定义了一个数组,该数
组中的全部元素都初始化为______。
A.TrueB.FalseC.-1D.1
第17题:
【数组的概念】
在VBA某个模块中,有如下声明语句
Dima(6,10)ASinteger
那么数组a(6,10)总共有______个元素。
A.16B.60C.70D.77
第18题:
以下VBA程序段运行后,变量j的值是______。
k=10
j=0
Do
k=k+10
j=j+1
LoopUntilk>
20
A.1B.2C.4D.10
第19题:
y=89
j="
不及格"
DoWhiley>
60
j=IIf(y<
70,"
及格"
IIf(y<
90,"
良好"
"
优秀"
))
y=y-50
Loop
A."
B."
C."
D."
第20题:
以下VBA代码程序运行结束后,变量a的值是______。
a=0
b=101
b=b-20
a=a+b
LoopWhileb>
80
A.60B.140C.142D.160
第21题:
以下VBA代码程序运行结束后,数组元素a(12)的值是______。
Dima(12)AsLong,iAsLong
i=0
DoUntili>
12
a(i)=i^2-i
i=i+1
A.1B.128C.132D.144
问第22题:
【对过程调试不熟】
假定有如下的Function过程:
Functionppfun(xAsSingle,yAsSingle)
ppfun=x^3-y^2
EndFunction
在窗体上添加一个命令按钮(名为cmd10),然后编写如下事件过程:
PrivateSubcmd10_Click()
DimaAsSingle,bAsSingle
a=5
b=4
MsgBoxppfun(a,b)mod50
EndSub
打开窗体运行后,单击命令按钮,消息框中的输出内容是______。
A.50B.25C.9D.109
第22题PrivateSubCommand0_Click()
MsgBoxppfun(a,b)Mod50
EndSub
ppfun=x^3-y^2
EndFunction(过程写在程序的外面)
第23题:
在窗体上添加一个命令按钮(名为cmd2),然后编写如下事件过程:
PrivateSubcmd2_Click()
DimpiAsSingle,nAsInteger
pi=3.14
n=Len(Str(pi)&
Space
(2)&
"
是本字符串长度"
)
MsgBoxn
A.11B.12C.13D.14
第23题PrivateSubCommand0_Click()
MsgBoxn
第24题:
在窗体上添加一个命令按钮(名为cmd13),然后编写如下事件过程:
PrivateSubcmd13_Click()
DimxAsString,yAsString
x="
龙洞华美路中山大学新华学院法学院"
y="
2006级法学专业学生"
MsgBoxMid(x,6,4)&
Right(x,3)&
Left(y,9)
A.龙洞华美路中山大学新华学院法学院2006级法学专业学生
B.中山大学新华学院法学院2006级法学专业学生
C.中山大学法学院2006级法学专业学生
D.中山大学法学院2006级法学专业
问第25题:
下列程序段,建立如图所示的数组d(下标从1开始),填写所缺部分:
123456
212345
321234
432123
543212
654321
Dimd(1To6,1To6)
Forj=1To6
Fork=1To6
d(j,k)=Abs(_____)+1'
选答案
Nextk
Nextj
A.jB.j-k+1C.j-kD.2*j-k
第25题PrivateSubCommand0_Click()
d(j,k)=Abs(j-k)+1
Text1=Text1&
d(j,k)
EndSub(此题需建立文本框与按钮两个控件)
第26题:
(多选题,1分)
【关于合法变量名】
下面______是合法的变量名。
A.STR-NAMEB.CaseC.FOR_99D.abc2006E.6A
[E]选E
CD
第27题:
【P258页,声明参数传递方式的关键字】
在VBA中,对于Sub(或Function)过程中的每一个形参,可用于声
明其参数传递方式的关键字包括_______。
A.ByMe
B.ByVal
C.ByRef
D.ByVBA
E.BySub
BC
问第28题:
在窗体上添加一个命令按钮(名为cmd),然后编写如下事件过程。
单击该命令按钮,便将数组p(6,8)中各个元素都赋予其对应的两个下
标值平方之和,请完善程序。
PrivateSubcmd_Click()
Dimp(6,8)Asinteger,iAsinteger,jAsinteger
Fori=0To6
Forj=0To8
p(i,j)=_________'
Nexti
A.(i+j)^2B.i^2+jC.i+j^2D.i^2+j^2
第28题
下标值平方之和,即求i的平方与j的平方相加后的值,运算
式子为:
i^2+j^2。
(下标即分别为i与j)
问第29题:
在窗体上已经建立1个文本框控件txt1和1个命令按钮控件cmd1。
请完
善程序,使之完成以下操作:
程序运行时,文本框上显示“VBA程序设计”,命令按钮的标题上显
示“隐藏”;
单击命令按钮时文本框消失;
单击窗体时显示出文本框。
PrivateSubcmd1_Clic()
txt1.Visible=False
PrivateSubForm_Click()
txt1._________=True'
PrivateSubForm_Load()
txt1.Value="
VBA程序设计"
txt1.Visible=True
cmd1.Caption="
隐藏"
A.EnableB.ValueC.VisibleD.Caption
第30题:
【caption?
第30题
将程序复制到“代码生成器”窗口,
然后在横线部分将答案一个个代进
去验算即可
在窗体上已经建立1个标签控件lab1和1个命令按钮控件cmd1。
请完善程
序,使之完成以下操作:
打开窗体后单击命令按钮,则通过输入对话框分别输入3个数值,然
后求出其中最大的数,并将最大的数显示在标签lab1中。
PrivateSubcmd1_Click()
DimaAsSingle,bAsSingle,cAsSingle
DimkAsSingle
a=Val(InputBox("
输入第一个数"
b=Val(InputBox("
输入第二个数"
c=Val(InputBox("
输入第三个数"
Ifa<
bThen
k=b
k=a
Ifk<
cThen
k=c
____________'
A.lab1.Value=a
B.lab1.Value=b
C.lab1.Caption=c
D.lab1.Caption=k
第31题:
(填空题,2分)
7^2Mod11+7\4*9/5Mod6
上述表达式的值是_______。
<
空1>
____________________
Lower(Trim(GetFill
(1)))="
6"
第32题:
通过编程求出结果。
把9786表示为两个加数之和,使其中一个加数能被91整除,而另一个
加数能被87整除。
请求出:
在这两个加数中,能被91整除的加数等于多少?
4914"
第32题
PrivateSubCommand0_Click()
Fori=91To9786Step91
Forj=87To9786Step87
Ifi+j=9786ThenMsgBoxi
Next
第33题:
求S=1/5+1/10+1/15+1/20+1/25+…+1/(5*n)+…的前n项之和,
当S第一次大于或等于1.4时终止计算,此时项数n为_____。
616"
考察While…Wend循环语句(课本P253),对于只知道控制条件而不知道预先确定多少次循环体的情况,用该语句。
该语句首先判断表达式的值是否为真,如果条件表达式的值是True,就执行循环体;
False,结束循环。
转去执行Wend下面语句
第33题
s=0
n=1
Whiles<
1.4
s=s+1/(5*n)
n=n+1
Wend
MsgBoxn-1
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 数据库基础与应用 Access数据库基础与应用期末综合练习题2 Access 数据库 基础 应用 期末 综合 练习题