- 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
- 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
2023年河南省周口市全国计算机等级考试
Access数据库程序设计测试卷(含答案)
学校:________班级:________姓名:________考号:________
一、操作题(10题)
1.阅读下面的程序段:
sum=0
fori=1to3
forj=ito4
fork=jto5
sum=sum+1
nextk
nextj
nexti
执行上面的三重循环后,sam的值为______。
2.在窗体中添加一个命令按钮(名为Command1)和一个文本框(名为
Text1),然后编写如下事件过程:
PrivateSubCommand1_Click()
DimxAsInteger,yAsInteger,zAsInteger
Callp1(a,b,c)
EndSub
Subp1(xAsInteger,yAsInteger,zAsInteger)
z=x+y
EndSub
打开窗体运行后,单击命令按钮,文本框中显示的内容是()。
3.使用表向导创建表:在D:\Access目录下有一ACCESS数据库
“教学管理.mdb”。利用表的“表向导”创建如右图的“学生-表向导”表。
4.从外部导入数据创建表:有一个电子表格文件“学生电子表格.xls”,
一个文本文件“学生.txt”,一个“教学管理_原始.mdb”access数据库,以及
一个空数据库文件“教学管理.mdb”。操作要求如下:
1、将电子表格“学生电子表格.xls”导入到“教学管理.mdb”中,表命名为
“学生_从电子表格”。
2、将文本文件“学生.txt”导入到“教学管理.mdb”中,表命名为“学生_从
文本文件”。
3、将“教学管理_原始.mdb”中的“学生”表导入到“教学管理.mdb”,表命
名为“学生”。
5.使用数据视图创建表:在D:\Access目录下有一ACCESS数据库
“教学管理.mdb”。利用表的“数据视图”创建如下图所示的“学生-数据视
图”表。
6.Access数据库的扩展名是【】。
7.在窗体上添加一个名为Command1的命令按钮,然后编写如下程序:
Functionm(xAsInteger,yAsInteger)AsInteger
m=IIf(xy,x,y)
EndFunction
PrivateSubCommand1_Click()
DimaAsInteger,bAsInteger
a=1
b=2
MsgBoxm(a,b)
EndSub
打开窗体运行后,单击命令按钮,消息框中输出结果为【】。
8.
在考生文件夹下有“Acc3.mdb”数据库。(1)以“课程成绩”表为数据
源,创建分组统计查询“最高分”,结果显示“课程编号”和“最高分”。
(2)以“课程”表为数据源,自动创建纵栏式窗体“课程”。(3)在“课
程”窗体中添加以最高分为数据源的子窗体“最高分”,子窗体显示“最
高分”字段。(4)在窗体页眉(高度1cm)中加入标签“Label_1”,标
题为“各科成绩最高分”,特殊效果为“凸起”,字体为“宋体”、“加粗”、
“14号”。(5)去除子窗体的记录导航栏。“课程”窗体显示效果如图
3所示。
9.编辑数据表:在ACCESS数据库“教学管理.mdb”,跟下面要求进行
相应的操作:表的复制和重命名、隐藏列、冻结列、移动列、行高与
列宽、更改表数据的字体、设置数据表格式、数据的查找与替换。
10.在窗体上画一个名称为Text1的文本框和一个名称为Command1的
命令按钮,然后编写如下事件过程:
PrivateSubCommand1Click()
DimiAsInteger,nAsInteger
n=0
Fori=0To50
i=i+3
n=n+1
Ifi>10ThenExitFor
Nexti
Text1.Text=Str(n)
EndSub
程序运行后,单击命令按钮,在文本框中显示的值是______。
二、基本操作题(10题)
11.
12.
您可能关注的文档
最近下载
- 中华人民共和国人民陪审员法全文最新解读课件.pptx VIP
- 新能源行业光储能微电网能量管理系统解决方案【50页PPT】.pptx VIP
- 电力系统分析理(第二版 刘天琪 邱晓燕)课后思考题答案(不包括计算).doc VIP
- 突发事件之车站大客流组织讲解.pptx VIP
- 护理三基考试题库7000题.pdf VIP
- 4 古代诗歌四首《次北固山下》 王湾 教学课件 初中语文统编版(2024)七年级上册 第一单元.pptx
- 电力系统分析理论-课后答案(刘天琪-邱晓燕-著)-科学出版社.pdf VIP
- 隧道工程-盾构施工技术(课件).ppt VIP
- 高速铁路隧道工程施工质量验收标准培训课件参考.ppt VIP
- 老虎岩生活垃圾填埋场沼气发电建设项目环境影响报告表.doc VIP
文档评论(0)