Access数据库实用教程练习题

Access数据库实用教程

一、简答题(每题1分)

1. 如何在报表中添加分页符？

2. 如何在报表的背景上添加图片以增加显示效果？ 3. 怎样查找和替换表中的数据? 4. 为什么自动编号字段会不连续？ 5. 什么是宏？

6. 查询有几种类型？Select查询命令的作用是什么？ 7. 报表由哪几部分组成？每部分的作用是什么？ 8. 如何在数据访问页中添加滚动文字“欢迎访问！”？ 9. 数据访问页有什么作用？

10. “级联更新相关字段”和“级联删除相关字段”各起什么作用？ 11. 报表有哪几种视图？

12. 创建报表有几种方式？它们各有什么特点？ 13. Access的启动和退出各有几种方法？

14. 怎样设置表的外观?主要从哪几个方面设置?

15. 什么是表达式？在Access中，表达式有什么作用？ 16. 控件有什么作用？

17. 查询对象中的数据存放在哪里？ 18. 在表关系中，“参照完整性”的作用是什么？设置“参照完整性”后对主表和从表的限制是什么？

19. 比较表和查询的异同之处。

20. 简述数据管理技术的几个发展阶段。

21. 什么情况下需要修改表结构？修改表结构时需要注意什么问题？ 22. 表间关系的作用是什么？ 23. 报表和窗体的区别是什么？

24. 数据访问页和其他数据库对象有什么相同点和不同点？

25. 用SQL语句将“学生成绩表”中所有“英语”大于90分的记录的“语文”、“数学”各减去2分。

26. 如何设置窗体和报表中所有控件的默认属性？

27. 用SQL语句建立一个查询：运行时，输入一个学生的学号，就能把学生的成绩及基本情况查询出来。

28. 以下竞赛评分程序的功能是什么？

Private sub form_click（ ） Dim max as integer, min as integer

Dim I as integer, x as integer, s as integer

１

Dim j as single max=0 min =10 For i=1 to 10

x=val(inputbox(\请输入分数：\If x>max Then max=x If x

s=s-max-min j=s/8

Msgbox \最后得分\End Sub

29. 用SQL语句将“学生状况表”中所有姓名为空的记录删掉。 30. 如何在窗体中调用模块的功能？

31. 筛选的含义是什么？筛选有几种方法？各有什么特点？

32. 用SQL语句查询选修课程名称中有数据库课程的学生的学号。 33. 为什么说查询的数据是动态的数据集合？ 34. 数据访问页可以脱离创建它的数据库吗？

35. 变量类型对整个程序的运行速度是否有影响？在定义变量时应遵循哪些原则？

36. 某VBA计算程序的功能如下：该程序的用户界面由四个文本框和三个按钮组成。四个文本框的名称分别为text1、text2、text3、text4。三个命令按钮分别为：清除（名为command1）、计算（名为command2）和退出（名为command3）。窗体打开运行后，单击“清除”按钮，则清除所有文本框中显示的内容；单击“计算”按钮，则计算在text1、text2和text3三个文本框中输入的3科成绩的平均成绩并将结果存放在text4文本框中；单击“退出”按钮则退出。如何用代码实现？

37. 用代码实现程序的功能：由输入的分数确定结论，分数是百分制，0～59分的结论是“不及格”；60～79分的结论是“及格”：80～89分的结论是“良好”：90～100分的结论是“优秀”；分数小于0或大于100是“数据错误!”。 38. 编写一个求解圆面积的函数Area（ ）。

39. 下面的程序段检查所输入的文字段中的大括号是否配对，并显示相应的结果。本程序在文本框中边输入，边统计大括号的个数，以Enter键作为输入结束的标志，然后显示结果。请将程序填写完整。 Dim x%,str As String

Private Sub Text1-KeyPress(KeyAscii As Integer) Str=_______ If str\x=x+1

２

Elseif str=\Then_______

If KeyAscii=13 then If _______ Then

Print\左右大括号配对\ Else If ____ Then

Print\左大括号多\；x；\个\ Else

Print\右大括号多\；x；\个\ End If End If End Sub

40. 图书管理系统对图书、读者及借阅情况进行管理，要求记录图书的书号、书名、作者、出版日期、类型、页数、价格、出版社名称、读者姓名、借书证号、性别、住址、电话、借书日期和还书日期。请用E-R图表示出该业务的概念模型，并设计出系统的关系模型。 41. 如何在数据表窗体中选择整行记录？ 42. 程序运行结果为 1 11 12 21 22 23 31 32 33 34 编写代码实现。

43. 工厂需要管理以下信息：

厂内有多个车间，每个车间有车间号、车间主任名、电话。

一个车间内有多名工人，每个工人有职工号、姓名、年龄、性别、工种及等级。 一个车间生产多种产品，产品有产品号、产品名。

一个车间生产多种零件，一种零件也可能由多个车间制造，零件有零件号、重量、材料。

一个产品由多个零件组成，一种零件也可能装配在多种产品上。 根据以上信息，建立系统的E-R模型，并设计出系统的关系模型。 44. 如何创建带图像效果的切换按钮？

45. 如何使用未绑定对象框来显示Word文档？

46. 新建一个窗体，放置两个按钮和一个文本框，按钮的名称分别为“com显示”、“com清除”；按钮的标题分别为“显示”、“清除”，文本框的名称定义为“txt你好”。编写代码，使按钮实现相应的功能。

３

47. 如何控制组合框只显示客户名称但实际保存客户编号？

48. 用于创建主窗体和子窗体的表间需要满足什么条件？如何设置主窗体和子窗体间的联系，使子窗体的内容随主窗体中记录的改变而发生改变。 49. 表是所有数据的存储器，如何优化表的结构和性能？

50. 设计一个用户登录窗体，输入用户名和密码。如用户名或密码为空，则给出提示，重新输入；如用户名(“abc”)或密码(123)不正确，则给出错误提示信息，结束程序运行；如用户和密码正确，则显示“欢迎”。

Access数据库实用教程 0101 A卷答案

一、简答题(每题1分) 1. 具体操作步骤如下：

（1）在设计视图中打开报表。

（2）单击工具栏上的“分页符”按钮。

（3）选择报表中需要设置分页符的位置，然后单击鼠标左键，分页符以短虚线标志出现在报表的左边界上。

2. 具体操作步骤如下：

（1）在设计视图中打开报表。 （2）打开报表“属性”窗口。

（3）单击“格式”选项卡，选择其中的“图片”属性进行背景图片的设置。 （4）设置背景图片的其他属性。

3. 查找和替换表中的数据，可以通过“编辑/查找”命令来实现。

4. 每当向表中添加一条新记录时，由Access指定一个唯一的顺序号或随机数，当用户删除记录后，Access也会把原来的最大记录号加１或选随机号作为新值，所以会出现编号不

４

连续的情况。

5. 宏是一个或多个操作的集合，其功能是实现操作的自动化。

6. 查询依据其对数据源操作方式及结果的不同分为5种类型：选择查询、参数查询、交叉表查询、操作查询、SQL查询。在数据库中，数据查询是通过Select语句来完成的，Select语句可以从数据库中按用户要求检索数据，并将查询结果以表格的形式返回，在Access中有些复杂的查询必须使用Select语句才能完成。

7. 报表通常由五个节构成。它们分别是：“报表页眉”节、“页面页眉”节、“主体”节、“页面页脚”节和“报表页脚”节，其中：

（1）报表页眉：在一个报表中，报表页眉只出现一次。利用它可显示徽标、报表标题或打印日期。报表页眉打印在报表第一页页面页眉的前面。

（2）页面页眉：出现在报表每页的顶部，可利用它显示列标题。

（3）主体：包含了报表数据的主体部分，也是报表的核心部分。对报表基础记录源的每条记录而言，该节重复出现。

（4）页面页脚：出现在报表每页的底部,可利用它显示页号等项目。

（5）报表页脚：只在报表结尾处出现一次。如果利用它显示报表合计等项目，则报表页脚是报表设计中的最后一个重要环节，但它出现在打印报表最后一页的页面页脚之前。

8. 具体操作步骤如下：

（1）在设计视图中打开数据访问页，单击工具箱的“滚动文字”按钮。

（2）将鼠标指针移动到数据访问页上要添加滚动文字的位置，按住鼠标左键拖动，以便确定滚动文字框的大小。

（3）在滚动文字框中输入要滚动显示的文字：“欢迎访问！”。

（4）选中滚动文字框，单击鼠标右键，在快捷菜单中选择“属性”命令，打开滚动文字控件的属性框，设置相关属性。

（5）切换到页视图方式，查看滚动文字效果。

9. 通过数据访问页，用户可以在IE浏览器上查看和使用来自Access数据库、SQL Server数据库以及其他数据源的数据。数据访问页可以将Access数据库与Internet紧密地结合起来，用户可以随时通过Internet访问Access数据库中的数据。

10. “级联更新相关字段”的作用是：当修改主表中某条记录的值时，从表中相应记录的值自动发生相应的变化。

“级联删除相关字段”的作用是：当删除主表中的某条记录时，从表中的相应记录自动删

５

姓名 住址 电话 还书日期 页数 n 出版社名称 类型 价格 读者 1 借阅图书 出版日期 书号 借书日期 借书证号 性别 书名 作者

关系模型：

图书（书号，书名，作者，出版日期，类型，页数，价格，出版社名称） 读者（姓名，借书证号，性别，住址，电话） 借阅（书号，借书证号，借书日期，还书日期）

41. 光标在数据表窗体中逐行移动时，光标在字段中移动。若要使光标选中整行，则可以在窗体的Current事件中添加如下代码： Private Sub form_current( )

Docmd.RunCommand acCmdSelectRecord end sub

42. Private Sub Form-Click（ ） Call p1 End Sub

Private Sub p1（ ） For I=1 to 4 For j= l to I a= (I-1) *10+j

Print Tab((j-1)*5+1);a; Next j Print Next I End Sub

43. 实体有四种：车间、工人、产品和零件。

１１

关系模型：

车间（车间号，车间主任名，电话）

车间（车间号，车间主任名，电话）

车间 车间号

车间主任名电话

工人（职工号，姓名，年龄，性别，工种，等级） 等级 职工号工人

工种 姓名

年龄 性别

产品（产品号，产品名）

产品号 产品名 产品

零件（零件号，重量，材料）

零件号 重量 零件 材料 １２

工人（职工号，姓名，年龄，性别，工种，等级） 产品（产品号，产品名） 零件（零件号，重量，材料） 拥有（车间号，职工号） 生产1（车间号，零件号） 生产2（车间号，产品号） 配备（零件号，产品号）

１３

44. 在窗图像按片”属下代Private

车间 1 有n 工人 m 1 生产 1 生产 2 体上创建一个切换按钮、两个钮，分别设置好３个按钮的“图性，然后在窗体代码中添加如码： Sub Form_Load() n 零件 n m 配备n 产品 化切换按钮的图像为弹起的图像 End Sub

Private Sub tglImage_Click() If tglImage.Value=0 then

tglImage.PictureData=cmdUpImage.PictureData//设置切换按钮的图像为弹起的图像 Else

tglImage.PictureData=cmdDownImage.PictureData//设置切换按钮的图像为按下的图像 End If End Sub

45. Access中提供了未绑定对象框来显示和编辑Word、Excel 等OLE对象。将Word文档插入未绑定对象框的方法如下：

在“工具箱”上选择“未绑定对象框”控件，在窗体的空白处单击鼠标左键，在弹出的“插入对象”对话框中，选择“由文件创建”，然后单击“浏览”按钮选择一个Word文档，单击“确定”按钮返回。

插入后，未绑定对话框中的Word文档此时是不可编辑的，将“可用”属性改为“是”，“是否锁定”属性改为“否”，则可对文档进行编辑。

46. 在窗体模块中写入如下代码： Private Sub com清除_click（ ） me.txt 你好.set focus me.txt 你好.text=\

１４

tglImage.PictureData=cmdUpImage.PictureData//初始

End Sub

Private Sub Com显示_Click（ ） me.txt 你好.set focus me.txt 你好.text=\你好\End Sub

Private Sub Form_Load（ ） me.caption=\欢迎\End Sub

47. 组合框允许显示多列数据，但是所保存的数据只能绑定到其中一列，不过每列的宽度是可以自己调节的，所以只要设置绑定客户编号那列的列宽为０，就可以实现所绑定数据是客户编号，但是显示的是客户名称了。具体操作如下：

（1）在窗体上创建一个组合框，名称为cboCustomer,设置其“行来源类型”属性为“表／查询”，设置“行来源”属性为Select 客户表.客户编号，客户表.客户姓名 FROM 客户表。

（2）设置“列数”属性为2，“绑定列”属性为1，为了实现隐藏客户编号列的效果，需要设置“列宽”属性为“0cm;3cm”，同时，为了避免组合框下拉时出现水平滚动条，需要设置“列表宽度”的属性值为3cm，即两列宽度之和。

48. 用于创建主窗体和子窗体的表之间必须满足一对多的关系。若要使子窗体中的内容随主窗体中记录的改变而改变，只需要建立主窗体和子窗体之间的一对多关系就可以了。

49. 优化表结构和性能要遵循以下原则： （1） 设计没有多余数据的表。 （2） 为字段选择适当的数据类型。

（3） 为要排序、联结或设定准则的字段创建索引。 （4） 在多字段的索引中，应该只使用所需要的字段。

50. 在代码窗口中输入如下代码： Private Sub Ok_Click（ ）

If len(nz(me!user name))=0 and len(nz(me!user password))=0 Then msgbox\用户名，密码为空，请重新输入\，vbcritical，\me!user name. set focus

Else If len(nz(me!user name))=0 then

msgbox \用户名为空，请重新输入\，vbcritical，\me!user name .set focus

Else If len(nz(me!user password))=0 then

１５

msgbox\密码为空，请重新输入\，vbcritical，\me!user password.set focus Else

If me!user name=\

If me! User password=\

msgbox \欢迎\，vbinformation，\正确\Else

msgbox \密码不正确，非正常退出！\，vbcritical，\ docmd.close End If Else

msgbox \用户名不正确，非正常退出! \，vbcritical，\ docmd.close End If End If End Sub

１６

本文来源：https://www.bwwdw.com/article/j5gv.html