计算机二级Access上机试题及答案2016
一、简单应用：
考生文件夹下存在一个数据库文件""，里面已经设计好两个表对象"tA"和"tB"。试按以下要求完成设计：
(1)创建一个查询，查找并显示所有客人的"姓名"、"房间号"、"电话"和"入住日期"四个字段内容，所建查询命名为"qT1"。
(2)创建一个查询，能够在客人结账时根据客人的姓名统计这个客人已住天数和应交金额，并显示"姓名"、"房间号"、"已住天数"和"应交金额"，所建查询命名为"qT2"。
注：输入姓名时应提示"请输入姓名："
应交金额=已住天数*价格。
(3)创建一个查询，查找"身份证"字段第4位至第6位值为"102"的纪录，并显示"姓名"、"入住日期"和"价格"三个字段内容，所建查询命名为"qT3"。
(4)以表对象"tB"为数据源创建一个交叉表查询，使用房间号统计并显示每栋楼的各类房间个数。行标题为"楼号"，列标题为"房间类别"，所建查询命名为"qT4"。
注：房间号的前两位为楼号。
二、综合应用：
考生文件夹下存在一个数据库文件""，里面已经设计了表对象"tEmp"、窗体对象"fEmp"、报表对象"rEmp" 和宏对象"mEmp"。试在此基础上按照以下要求补充设计：
(1)设置表对象"tEmp"中"聘用时间"字段的有效性规则为：2006年9月30日(含)以前的时间、相应有效性文本设置为"输入二零零六年九月以前的日期";
(2)设置报表"rEmp"按照"年龄"字段降序排列输出;将报表页面页脚区域内名为"tPage"的文本框控件设置为"页码-总页数"形式的页码显示(如1-15、2-15、...);
(3)将"fEmp"窗体上名为"bTitle"的标签宽度设置为5厘米、高度设置为1厘米，设置其标题为"数据信息输出"并居中显示;
(4)"fEmp"窗体上单击"输出"命令按钮(名为"btnP")，实现以下功能：计算Fibonacci数列第19项的值，将结果显示在窗体上名为"tData"的文本框内并输出到外部文件保存;单击"打开表"命令按钮(名为"btnQ")，调用宏对象"mEmp"以打开数据表"tEmp"。
Fibonacci数列：
调试完毕，必须点击"输出"命令按钮生成外部文件，才能得分。
试根据上述功能要求，对已给的命令按钮事件过程进行补充和完善。
注意：不允许修改数据库中的宏对象"mEmp";不允许修改窗体对象"fEmp"和报表对象"rEmp"中未涉及的控件和属性;不允许修改表对象"tEmp"中未涉及的`字段和属性;已给事件过程，只允许在"*****Add*****"与"****Add******"之间的空行内补充语句、完成设计，不允许增删和修改其它位置已存在的语句。
【参考答案及解析】
简单应用：
本题主要考的是数据库的查询。
本题解题思路：
(1)点击"查询"，选择"新建(N)"，在弹出的"新建查询"窗体上选择"设计视图"，然后在弹出的"显示表"窗体上选择"tA"和"tB"表，然后选择题目中所说的四个字段，以"qT1"保存查询。
(2)选择"新建(N)"，在弹出的"新建查询"窗体上选择"设计视图"，然后在弹出的"显示表"窗体上选择"tA"和"tB"表，选择"姓名"和"房间号"两个字段，在第三个字段中输入"已住天数:Date()-[入住日期]"，在第四个字段中输入"应交金额:[价格]*[已住天数]"，在"姓名"字段的"条件"中输入"[请输入姓名：]"，最后以"qT2"保存查询。
(3)与第2小题类似，选择题目上所说的三个字段。然后在第四个字段中输入"Mid([身份证],4,3)"，在此字段的"条件"中输入"102"，并把"显示"中的钩去掉，最后以"qT3"保存查询。
(4)选择"新建(N)"，在弹出的"新建查询"窗体上选择"设计视图"，然后在弹出的"显示表"窗体上选择"tB"表，然后点击"查询"菜单中的"交叉表查询"菜单。在字段中输入"楼号: Left([房间号],2)"，"交叉表"中选择"行标题";选择"房间类别"字段，在"交叉表"中选择"列标题";选择"房间类别"字段，"交叉表"中选择"值"，并在"总计"中选择"计数"，最后以"qT4"保存查询。
综合应用：
本题主要考的是数据表有效性规则的设置、窗体的设计、报表的设计、VBA的数据库编程。
本题解题思路如下：
(1)打开考生文件夹下的""数据库。
(2)选中表对象"tEmp"，点击"设计(D)"按钮，选中"聘用时间"字段，再选中下面的"有效性规则"，在"有效性规则"右边的框中输入"<=#2006-9-30#"，然后在"有效性文本"右边的框中直接输入"输入二零零六年九月以前的日期"，然后保存该表。
(3)选中报表对象"rEmp"，选择"设计(D)"，再选择"视图"菜单中的"排序与分组"，在弹出的对话框中选择"年龄"字段，排序次序选择"降序"。选中页面页脚区的"tPage"文本框控件，在文本框中输入"= & "-" & [Pages]"，然后保存该报表。
(4)打开窗体对象"fEmp"的设计视图，选中"bTitle"标签，右击鼠标选择属性，设置其"宽度"为"5厘米"，"高度"为"1厘米"，"标题"为"数据信息输出"，文本对齐为"居中"。"输出"命令按钮单击事件的第1处需要定义19个变量的数组，语句为 Dim f(19) As Integer，第2处是For循环体，循环体是计算Fibonacci数列第19项的值，语句为f(i)=f(i- 1)+f(i-2)，第3处是将计算结果显示在窗体上名为"tData"的文本框内，语句为tData=f(19)。
(5)选中"打开表"命令按钮(名为"btnQ")，点击工具栏上的"属性"按钮，设置这个命令按钮的单击属性为"mEmp"，然后保存该窗体。
