2021年河南省郑州市全国计算机等级考试Access数据库程序设计测试卷(含答案).docx

2021年河南省郑州市全国计算机等级考试Access数据库程序设计测试卷(含答案).docx

  1. 1、本文档共19页,可阅读全部内容。
  2. 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
  3. 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  4. 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
2021年河南省郑州市全国计算机等级考试Access数据库程序设计测试卷(含答案) 学校:________ 班级:________ 姓名:________ 考号:________ 一、操作题(10题) 1. 2. 在窗体中添加一个名称为Commandl的命令按钮,然后编写如下程序: PrivateSubo(ByVidpAslnteger) p=p*2 EndSub PrivateSubCommandl_C1kk() DimiAsIntcger Cails(1) Ifi>4Thcni=i^2 MsgBoxi EndSub 窗体打开运行后,单击命令按钮,则消息框的输出结果为______。 3.从 ACCESS 数据库导出数据:在 D:\\ Access 目录下有一个“教学管理.mdb”access 数据库,其中有一个“学生”表。 1、将“教学管理.mdb”中“学生”表导出为电子表格文件,命名为“学生_导出.xls” 2、将“教学管理.mdb”中“学生”表导出为文本文件,命名为“学生_导出.txt” 4. 在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1 Click() Dim i As Integer,n As Integer n=0 For i=0 To 50 i=i+3 n=n+1 If i>10 Then Exit For Next i Text1.Text=Str(n) End Sub 程序运行后,单击命令按钮,在文本框中显示的值是______。 5. 下列程序的输出结果是( )。 Private Sub Command1_Click() Dim arr(1 To 10) For i=1 To 10 Next i For Each i In arr() Next i End Sub 6.从外部导入数据创建表:有一个电子表格文件“学生电子表格.xls”,一个文本文件“学生.txt”,一个“教学管理_原始.mdb”access数据库,以及一个空数据库文件“教学管理.mdb”。操作要求如下: 1、将电子表格“学生电子表格.xls”导入到“教学管理.mdb”中,表命名为“学生_从电子表格”。 2、将文本文件“学生.txt”导入到“教学管理.mdb”中,表命名为“学生_从文本文件”。 3、将“教学管理_原始.mdb”中的“学生”表导入到“教学管理.mdb”,表命名为“学生”。 7.使用数据视图创建表:在 D:\\Access 目录下有一 ACCESS 数据库“教学管理.mdb”。利用表的“数据视图”创建如下图所示的“学生-数据视图”表。 8.使用设计器创建表:在 D:\\Access 目录下有一 ACCESS 数据库“教学管理.mdb”。 1、利用表的设计视图创建如下图所示的“学生”表。要求:“性别”字段利用“查阅向导”输入,通过菜单可选择“男”或“女”;先设置“学生编号”字段为主键,再尝试设置“姓名”、“性?别”、“入校日期” 组成的多字段主键。 2、如下图输入数据。 9. 假定当前日期为2002年8月25日,星期日,则执行以下语句后,a、b、c和d的值分别是25、8、2002、【 】。 a=day (now) b=month (now) C=year (now) d=weekday (now) 10. 已知数列的递推公式如下: f(n)=1 当n=0,1时 f(n)=f(n-1)+f(n-2) 当n>1时 则按照递推公式可以得到数列:1,1,2,3,5,8,13,21,34,55,……。现要求 从键盘输入n值,输出对应项的值。例如当输入n为8时,应该输出34。程序如下, 请补充完整。 Private Sub runll_Click() f0=1 f1=1 num=Val(InputBox("请输入一个大于2的整数:")) For n=2 To 【 】 f2=【 】 f0=f1 f1=f2 Next n MsgBox f2 End Sub 二、基本操作题(10题) 11. 12. 13. 14. 15. 16. 17. 18. 19. 20. 三、1.选择题(10题) 21. 下列有关记录处理的说法,错误的是( )。 A.添加、修改记录时,光标离开当前记录后,即会自动保存? B.自动编号不允许输入数据? C.Access的记录删除后,可以恢复? D.新记录必定在数据表的最下方? 22.Access数据库中,用于输入或编辑字段数据的交互控件是______。 A.文本框 B.标签 C.复选框 D.组合框? 23.数据处理的最小单位是()。

文档评论(0)

喜报777 + 关注
实名认证
内容提供者

该用户很懒,什么也没介绍

认证主体魏**

1亿VIP精品文档

相关文档

相关课程推荐