2023年河南省周口市全国计算机等级考试Access数据库程序设计测试卷(含答案)
学校:________ 班级:________ 姓名:________ 考号:________
一、操作题(10题)
1. 阅读下面的程序段：
sum＝0
for i＝1 to 3
for j＝i to 4
for k＝j to 5
sum＝sum+1
next k
next j
next i
执行上面的三重循环后，sam的值为______。
2. 在窗体中添加一个命令按钮(名为Command1)和一个文本框(名为Text1)，然后编写如下事件过程：
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
打开窗体运行后，单击命令按钮，文本框中显示的内容是( )。
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的命令按钮，然后编写如下程序：
Function m(x As Integer, y As Integer) As Integer
m＝IIf(x>y，x，y)
End Function
Private Sub Command1_Click()
Dim a As Integer, b As Integer
a＝1
b＝2
MsgBox m(a，b)
End Sub
打开窗体运行后，单击命令按钮，消息框中输出结果为【 】。
8.
在考生文件夹下有“Acc3．mdb”数据库。 （1）以“课程成绩”表为数据源，创建分组统计查询“最高分”，结果显示“课程编号”和“最高分”。 （2）以“课程”表为数据源，自动创建纵栏式
窗体“课程”。 （3）在“课程”窗体中添加以最高分为数据源的子窗体“最高分”，子窗体显示“最高分”字段。 （4）在窗体页眉（高度1cm）中加入标签“Label_1”，标题为“各科成绩最高分”，特殊效果为“凸起”，字体为“宋体”、“加粗”、“14号”。 （5）去除子窗体的记录导航栏。“课程”窗体显示效果如图3所示。
9.编辑数据表：在ACCESS 数据库“教学管理.mdb”，跟下面要求进行相应的操作：表的复制和重命名、隐藏列、冻结列、移动列、行高与列宽、更改表数据的字体、设置数据表格式、数据的查与替换。
access和office哪个好考10. 在窗体上画一个名称为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
程序运行后，单击命令按钮，在文本框中显示的值是______。

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