2023年安徽省芜湖市全国计算机等级考试Access数据库程序设计真题(含答案)
学校:________ 班级:________ 姓名:________ 考号:________
一、操作题(10题)
1.创建一个查询，要求将表对象“tStud”中总分成绩超过270分(含270分)的学生信息追加到空表“tTemp”中。其中，“tTemp”表的入学成绩为学生总分，所建查询命名为“qT4”。
2.空数据库的建立：在 D:\\Access 目录下建立一个 ACCESS 空数据库文件“教学管理.mdb”。
3. 假设用—个长度为50的数组(数组元素的下标从0到49)作为栈的存储空间，栈底指针bottom指向栈底元素，栈顶指针top指向栈顶元素，如果bottom=49，top=30(数组下标)，则栈中具有【 】个元素。
4.用向导建立 ACCESS 数据库：利用数据库模板向导,在 D:\\Access 目录下建立一个 ACCESS 数据库“资产追踪.mdb”。要求显示样式设置为"标准",报表打印样式为"大胆"。数据库标题为“资产追踪”。
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.使用表 向导 创建表 ：在D:\\Access目录下有一ACCESS 数据库“教学管理.mdb”。利用表的“表向导”创建如右图的“学生-表向导”表。
7. 在窗体中添加一个命令按钮，名称为Command1，然后编写如下程序：
Private Sub Command1_Click()
sum=0
For i=1 To 100 step 2
Next i
MsgBox sum
End Sub
窗体打开运行后，单击命令按钮，则消息框的输出结果为( )。
8. 在窗体中添加一个命令按钮(名为Command1)和一个文本框(名为Text1)，然后编写如下事件过程：
access和office哪个好考Private Sub Command1_Click()
Dim x As Integer,y As Integer,z As Integer
Call p1(a,b,c)
End Sub
Sub p1(x As Integer,y As Integer,z As Integer)
z=x+y
End Sub
打开窗体运行后，单击命令按钮，文本框中显示的内容是( )。
9. 假定当前日期为2002年8月25日，星期日，则执行以下语句后，a、b、c和d的值分别是25、8、2002、【 】。
a=day (now)
b=month (now)
C=year (now)
d=weekday (now)
10.从外部导入数据创建表：有一个电子表格文件“学生电子表格.xls”，一个文本文件“学生.txt”,一个“教学管理_原始.mdb”access数据库,以及一个空数据库文件“教学管理.mdb”。操作要求如下：
1、将电子表格“学生电子表格.xls”导入到“教学管理.mdb”中，表命名为“学生_从电子表格”。
2、将文本文件“学生.txt”导入到“教学管理.mdb”中，表命名为“学生_从文本文件”。
3、将“教学管理_原始.mdb”中的“学生”表导入到“教学管理.mdb”，表命名为“学生”。
二、基本操作题(10题)
11.
12.
在考生文件夹中有一个“Acc1．mdb”数据库。 （1）将“教师档案表”以文本文档格式导出到考生文件 夹下，第一行包含列字段名称，逗号为分隔符，导如文件的 名称为“教师档案表”。 （2）取消“教师档案表”的隐藏列，将“姓名”字段列移动 至“教师编号”字段列和“职称”字段列之间。 （3）设置“班级”表到“教师授课”表的关系为“一对多”， “实施参照完整性”。
13.
14.
15.
16.
17.
18.
19.
20.
三、1.选择题(10题)
21. 在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Commandl Click() Dim a() a=Array(1,3,5,7) s=0 For i=1 To 3 S=S*10+a(i) Next i Print s End Sub 程序运行后，输出结果为( )。

版权声明：本站内容均来自互联网，仅供演示用，请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198，我们将在24小时内删除。