2009 年12 月(二级 Access 数据库程序设计)

2017-03-27

33431

2009 年12 月（二级 Access 数据库程序设计）一、单项选择题(每题1 分，共40 分)1. 冯. 诺依曼型计算机的工作原理是 1 。A ）计算精度高 B）量子理论C ）运行速度快 D ）存

2009 年12 月（二级 Access 数据库程序设计）

一、单项选择题(每题1 分，共40 分)

1. 冯. 诺依曼型计算机的工作原理是 1 。

A ）计算精度高 B）量子理论

C ）运行速度快 D ）存储并自动执行程序

2. 在计算机硬件系统中，CPU 的组成主要包括 2 。

A ）运算器和控制器 B）控制器和存储器

C ）运算器和存储器 D）运算器和I/O 设备

3. 计算机系统中的1 个字节由 3 位二进制数组成。

A ）2 B）4 C ）8 D）16

4. 在计算机系统中，管理软、硬件资源的是 4 。

A ）监控系统 B ）操作系统

C ）管理软件 D）应用软件

5. 在Windows 中，回收站里的文件占用 5 空间。

A ）内存 B）光盘 C）软盘 D ）硬盘

6. 电子邮件地址的格式是 6 。

A ）用户名. 主机域名 B）主机域名. 用户名

C ）用户名@主机域名 D）主机域名@用户名

7. 下列选项中， 7 通常作为音频文件扩展名。

A ）mp3 B）doc C）exe D）txt

8. 在计算机网络分类中，LAN 表示 8 。

A ）广域网 B）蜂窝网 C）城域网 D ）局域网

9. 下列选项中， 9 不是计算机病毒的特征。

A ）传染性 B）破坏性 C ）免疫性 D）隐蔽性

10. 用 10 编写的程序不需要编译，可以在计算机上直接运行。

A ）人工智能语言 B ）机器语言 C）汇编语言 D）高级语言

11．以下关于数据库的描述中，错误的是。

A ）数据库中的数据独立于应用程序且可以被不同的应用程序共享

B ）数据库是存储在磁盘等存储介质上，按一定结构组织起来的数据集合

C ）目前使用的数据库一般都属于层次型数据库

D ）在一个数据库中，可能包含一个或者多个表

12．以下关于关系的描述中，错误的是。

A ）从直观上看，一个关系就是一个二维表

B ）关系中的元组就是二维表中的行，在一个关系中可以有两个相同的元组

C ）关系中的属性就是二维表中的列，同一列的数据类型必须相同

D ）在关系数据库中，一个关系就是数据库中的一个表

13．以下关于Access 的描述中，错误的是。

A ）Access 是一个典型的关系数据库管理系统

B ）Access 可以与Excel 交换数据

C ）通过Access 的向导，可以创建大多数Access 数据库对象

D ）一个Access 数据库包含多个独立的文件，分别用于存储表、窗体及报表等

14．在进行Access 数据库设计时，首先要做的工作是。

A ）进行需求分析，以综合并明确描述用户的应用需求

B ）进行窗体设计，以确定系统主要的输入与显示界面是否满足用户需求

C ）进行报表设计，以确定用户需要从数据库中获取什么样的信息

D ）进行菜单设计，以确定系统包含哪些功能

15．保存一个“日期/时间”型数据需要个字节的存储空间。

A ）4 B ）8 C）64 D）256

16．在Access 数据表中，通常用字段保存逻辑型数据。

A ）文本型 B）数字型 C）备注型 D ）是/否型

17．在Access 数据表中，如果定义了自动编号型字段，系统将自动为每一个分配一个编号。

A ）字段 B ）记录 C）表 D）域

18．在Access 数据表中，用于存放照片之类的数据时，其字段类型通常应该是。

A ）数字 B）备注 C）文本 D ）OLE 对象

19．以下关于主关键字的描述中，错误的是。

A ）主关键字段设置好后不能更改 B）主关键字能够唯一标识表中的每条记录

C ）主关键字可以由一个或多个字段组成 D）主关键字不允许有重复值和空值

20．以下关于索引的描述中，错误的是。

A ）创建索引可以提高数据检索速度 B）索引数量过多可能会影响表的更新速度

C ）同一个表中的索引字段的值不能重复 D）如果设置了主键，系统将自动创建索引

21．以下关于查询的描述中，错误的是。

A ）查询可以显示或者修改表中的数据 B ）查询只能以表作为数据源

C ）查询的结果随表中记录的变化而变化 D）查询可以作为窗体等数据库对象的数据源

22．创建一个查询，查找数据表中“出生日期”在1990-1-1 至1990-12-31 之间的记录，在设计视图的相应字段对应的条件行中，可设置为______ 。

A ）Between 1990-1-1 And 1990-12-31 B ）Between #1990-1-1# And #1990-12-31#

C ）Between 1990-1-1 Or 1990-12-31 D）Between #1990-1-1# Or #1990-12-31#

23．将查询结果保存到一个新表中的查询称为。

A ）生成表查询 B）追加查询 C）删除查询 D）SQL 查询

24．在创建参数查询的设计视图中，需要将指定的参数名用括起来。

A ）( ) B）< > C）{ } D ）[ ]

25．在创建交叉表查询时，在设计视图的交叉表行中必需确定的选项有。

A ）值 B）列标题 C）行标题 D ）以上三个都是

26．查询“学生”表中所有“籍贯”为“合肥”的记录信息，对应的SQL 语句为。

A ）Select * From 学生 Where 籍贯=合肥

B ）Select * From 学生 Where 籍贯="合肥"

C ）Select * From 学生 While 籍贯=合肥

D ）Select * From 学生 While 籍贯="合肥"

27．在Access 数据库中，窗体对象的Caption 属性的作用是确定窗体的。

A ) 标题 B)名称 C)边界类型 D)字体

28．在显示具有一对多关系的表或查询中的数据时，一般使用_______窗体。

A) 纵栏式 B) 表格式 C ) 主/子 D) 图表式

29．以下关于Access 窗体和报表的描述中，错误的是________。

A ）窗体和报表均可以修改数据表中的数据

B ）窗体和报表均可以显示数据表中的数据

C ）窗体和报表的数据来源均可以是查询

D ）窗体和报表的数据来源均可以是SQL 语句

30．窗体的设计视图由多个部分组成，每部分称为节，其中节是每个窗体都必须有的。

A) 窗体页眉 B) 页面页眉 C ) 主体 D) 页面页脚

31．在窗体中，可以用来输入或编辑文本、数字、日期/时间型字段数据的交互控件是_______。

A ) 文本框控件 B) 标签控件 C) 命令按钮控件 D) 选项组控件

32．图书订单表中包含书名、单价和订购数量等三个字段，以该表为数据源创建的窗体中有一个用于显示某种图书订购金额的文本框，其“控件来源”属性可设置为________。

A) [单价]*[订购数量] B) [单价]*[图书订单]![订购数量]

C ) =[单价]*[订购数量] D) =[图书订单]![单价]*[订购数量]

33．报表是以打印格式显示数据的一种有效方式，它不能完成的任务是_______。

A) 分组数据 B) 汇总数据 C ) 输入数据 D)输出数据

34．以下关于创建报表的描述中，不正确的是_______。

A) 可以利用向导和设计视图创建报表 B) 可以利用向导创建图表式和标签式报表

C) 可以自动创建纵栏式和表格式报表 D ) 自动创建报表时可以根据需要选择字段

35．要在报表中按字段分组统计，可以在____________节中设置用于显示分组统计信息的文本框控件。

A ）报表页脚 B ）组页脚 C）主体 D）页面页脚

36．以下关于数据访问页的描述中，错误的是。

A ）数据访问页是Access 数据库对象之一，以独立的HTML 文件保存

B ）用户可以通过数据访问页查看或者编辑表中的记录

C ）可以通过设计视图创建数据访问页，且可以在其中添加多种控件

D ）用户只有在浏览器中才能打开数据访问页文件

37．以下关于宏的描述中，错误的是。

A ）一个宏中可以包含一个或多个操作

B ）可以将几个相关的宏组织在一起构成一个宏组

C ）已经创建的宏可以通过事件触发

D ）运行宏时，将按顺序执行其中所有的操作

38. 目前使用比较普遍的用于开发应用系统的程序设计语言一般都是____________的语言。

A) 面向机器 B) 面向过程 C ) 面向对象 D) 面向服务

39. 在VBA 程序中，如果需要创建一个存储整数的变量x ，可以用_________语句定义。

A ) Dim x as Integer B) Static x as Char

C) Dim x as Date D) Static x as String

40. 在VBA 程序中，用于表示

a b

6 2

的表达式为_______________。

A) 6a b^2/3*c B) 6*a b^2/(3*c) C) (6*a b*b)/3*c D ) (6*a b*b)/(3*c)

二、填空题（每空2 分，共30 分）

1．在关系数据库中，为了实现各种查询，需要进行专门的关系运算。常用的关系运算包括 ___选择_____、投影和联接等3 种类型。

2．在同一个Access 数据库中，相关的数据表之间的联系主要有____一对一________、一对多及多对多等3 种类型。

3．在使用Access 的过程中，如果遇到操作困难可以按“F1”键打开__帮助_______，以获取与当前操作主题相关的信息。

4．在Access 数据库中包括表、___查询_________、窗体、报表、宏、页和模块等基本对象。

5．在Access 中，字段的数据类型主要包括自动编号、____文本____、备注、数字、日期/ 时间、货币、是/否、OLE 对象、超链接和查阅向导等数据类型。

6．用于返回系统当前日期的函数为___date()_____。

7．在创建分组查询时，在查询设计视图中用于分组字段的总计项应设置为___分组_____。

8．在Access 数据库中，SQL 查询主要包括____数据定义__、联合查询、传递查询和子查询等几种类型。

9．在Access 数据库中，有4 种操作查询，其中的____更新____查询将会修改数据表中记录的字段值。

10. 在Access 数据库对象中，窗体的主要作用是__显示、输入、输出、修改或删除___数据。

11. 在Access 数据库中，窗体和报表的数据来源主要包括___表_____、查询和SQL 语句。

12. 窗体有多种视图，如果创建的窗体不理想，可以切换到__设计______视图中进行修改。

13. 在各种类型的数据报表中，___图表报表_____以图表的形式表示信息，可以直观地表示数据之间的关系。

14. 在以成绩表（学号，课程，成绩）为数据源建立的分组统计报表中，要显示每位学生的平均成绩，则在学号页脚节中添加一个计算型控件，该控件的“控件来源”属性应该设置为___=avg([成绩])。

15. 在VBA 程序中，主要有3 种基本控制结构。如果某些语句需要反复执行多次，可以使用其中的____循环____结构。

三、阅读理解题（每题3 分，共15 分）

1. 请阅读下列程序，并回答：① 该过程在什么情况下被触发？② 其中的输出语句是什么？ ③ 过程执行后显示的具体值是什么？单击按钮Cmd1; msgbox; 12

Private Sub Cmd1_Click( )

Dim x(1 to 10) as Integer

x(1)=1

x(3)=2

x(5)=x(1) x(3)

x(7)=x(1) x(3) x(5)

x(9)=x(1) x(3) x(5) x(7)

MsgBox (x(9))

End Sub

2. 请阅读下列程序，并回答：① Fun 函数的功能是什么？② 在程序中第一次调用Fun 函数后返回的值是什么？③ 程序执行后，消息框显示的内容是什么？

Function Fun(x as Integer, y as Integer) as Integer

Dim a as Integer

If x > y Then

a = x

Else

a = y

End If

Fun= a

End Function 返回传递进来的较大数；2；3

3. 请阅读下列程序，并回答：① 循环结束后，变量c 的值是什么？② 循环共执行了多少次？③ 程序执行后消息框中显示的内容是什么？ 9；4；32

Private Sub Form_Click( )

Dim a as Integer, b as Integer, c as Integer

a = 8

b = 2

For c=1 To a Step 2

b = b * 2

Next c

MsgBox b

End Sub

4．请阅读下列程序，并回答：①输入是通过什么语句实现的？②共定义了几种类型的变量？ ③ 如果输入的数字分别是20 和30，输出的值是多少？ Inputbox ；3；运算结果是：10 Private Sub Form4_Load( )

Dim x as Double, y as Single

Dim a as Integer, b as Integer

Dim r as Integer

x=val(InputBox ("x="))

y=val(InputBox ("y="))

a=Int(x)

b= Int(y)

Do while b<>0

Private Sub Cmd2_Click( )

Dim z as Integer

z=Fun(1,2)

MsgBox Fun(z, 3)

End Sub

r=a Mod b '将a 除以b 的余数赋值给r 变量

a=b

b=r

Loop

MsgBox "运算结果是：" & a

End Sub

5. 本题涉及到的表如图1 所示，请阅读下列程序，并回答：① 打开数据表的语句是什么？ ② 为了保证从第一条记录开始访问工资表，使用的语句是什么？③ Do While 循环执行后，数据表中哪一个字段的值将发生改变？ Rs.open „；rs.movefirst ；实发工资图1 工资表

Sub Pro5()

Dim cn as New ADODB.Connection '连接对象

Dim rs as New ADODB.Recordset '记录集对象

Rem 将以下4 个变量定义为Field （字段）对象类型

Dim jbgz as ADODB.Field

Dim jbf as ADODB.Field

Dim jj as ADODB.Field

Dim sfgz as ADODB.Field

Set cn = CurrentProject.Connection

rs.Open "工资表", cn, adOpenDynamic, adLockOptimistic, adCmdTable Rem 以下4 条语句建立对象类型变量与数据表中字段的绑定

Set jbgz = rs.Fields("基本工资")

Set jbf = rs.Fields("加班费")

Set jj = rs.Fields("奖金")

Set sfgz = rs.Fields("实发工资") '将变量sfgz 绑定到实发工资字段 Rem 依次访问工资表中的每条记录并处理数据

rs.MoveFirst

Do While Not rs.EOF '遍历工资表

sfgz = jbgz jbf jj

rs.MoveNext

Loop

rs.Close

cn.Close

Set rs = Nothing

Priavate Sub Cmd2_Click()

If me.text2>10 then

Me.text3=me.text1*me.text2*0.95

Else

Me.text3=me.text1*me.text2

End if

End sub

Set cn = Nothing

End Sub

四、编程题（共15 分）

1. 窗体中有两个文本框（名称依次为Text1 和Text2），分别表示球的半径和体积；一个命令

按钮（标题为“计算”，名称为Cmd1），如图2 所示。请编写程序，在窗体中输入半径，单击“计算”按钮，计算球的体积，并将结果显示在Text2 文本框中。（4 分）说明：已知半径R ，球的体积V= 3

p R (p =3.14)。

图2 计算球的体积图

图3 计算应付款

2. 振兴商场举行促销活动，一次性购买10 件以上（含10 件）商品可享受5的优惠。窗体中已设计有三个文本框（名称依次为Text1、Text2 和Text3），分别表示商品的单价、数量和应付款；一个命令按钮（标题为“计算”，名称为Cmd2），如图3 所示。请编写程序，在窗体中输入单价与数量，单击“计算”按钮，计算应付款并显示在Text3 文本框中。（5 分）

3. 如图4、图5 所示的是已经设计好的学生成绩表和成绩录入窗体。窗体中有6 个文本框（名称依次是TXH 、TXM 、TPS 、TSY 、TQM 和TZP ），分别表示学生的学号、姓名、平时

成绩、实验成绩、期末成绩和总评成绩；还有2 个命令按钮（标题分别是“保存数据” 和“关闭窗体”，名称分别是Cmd1 和Cmd2）。程序的功能如下：（6 分）

① 运行窗体时，首先输入学号等前5 个字段的数据，单击“保存数据”按钮，计算总评成绩，并将数据保存到学生成绩表中。

② 单击“关闭窗体”按钮，关闭窗体。

图4 学生成绩表

图5 成绩录入窗体

说明：

① 已经给出部分代码，请将代码补充完整。

② 总评成绩=平时成绩×0.2 实验成绩×0.3 期末成绩×0.5

图4 学生成绩表图5 成绩录入窗体

Private Sub Cmd1_Click( )

Dim cn as New ADODB.Connection '连接对象

Dim rs as New ADODB.Recordset '记录集对象

Private sub Cmd1_Click

Dim r as double

R=me.text1

Me.text2=4*3.1415*r*r*r/3

End sub

Rem 将以下6 个变量定义为Field （字段）对象类型

Dim xh ① as ADODB.Field

Dim xm as ADODB.Field

Dim pscj as ADODB.Field

Dim sycj as ADODB.Field

Dim qmcj as ADODB.Field

Dim zpcj as ADODB.Field

Set cn = CurrentProject.Connection

rs.Open "学生成绩表", cn, adOpenDynamic, adLockOptimistic, adCmdTable Rem 以下6 条语句建立对象类型变量与数据表中字段的绑定

② set xh=rs.fields(“学号”)

Set xm = rs.Fields("姓名")

Set pscj = rs.Fields("平时成绩")

Set sycj = rs.Fields("实验成绩")

Set qmcj = rs.Fields("期末成绩")

Set zpcj = rs.Fields("总评成绩")

③ rs.addnew ' 增加一条新纪录

Rem 以下5 条语句将文本框的值赋给相应变量

④ xh=TXH.value

xm=TXM. value

pscj=TPSCJ. value

sycj=TSYCJ. value

qmcj=TQMCJ.value

⑤ Zpcj=pscj*0.2 sycj*0.3 qmcj*0.5 ' 计算总评成绩 ⑥ rs.save ' 保存数据

⑦ rs.close ' 关闭记录集

cn.Close

Set rs = Nothing

Set cn = Nothing

End Sub

Rem 程序的功能是单击" 关闭窗体" 按钮, 关闭窗体 ⑧

⑨

⑩

Private Sub Cmd2_Click()

DoCmd.Close

End Sub__

相关推荐