新版全国二级ACCESS上机操作第5套
新版全国二级ACCESS上机操作第5套
在考生文件夹的"samp1.accdb"数据库文件中已建立表对象"tEmployee"。试按以下操作要求，完成表的编辑：
(1) 根据"tEmployee"表的结构，判断并设置主键；删除表中的"学历"字段。
(2) 将"出生日期"字段的有效性规则设置为只能输入大于16岁的日期（要求：必须用函数计算年龄）；将"聘用时间"字段的有效性规则设置为只能输入上一年度9月1日以前（不含9月1日）的日期（要求：本年度年号必须用函数获取）；将表的有效性规则设置为输入的出生日期小于输入的聘用时间。
(3) 在表结构中的"简历"字段后增加一个新字段，字段名称为"在职否"，字段类型为"是/否"型；将其默认值设置为真。
(4) 将有"书法"好爱的记录全部删除。
(5) 将"职务"字段的输入设置为"职员"、"主管"或"经理"列表选择。
(6) 根据"所属部门"字段的值修改"编号"，"所属部门"为"01"，将"编号"的第1位改为"1"；"所属部门"为"02"，将"编号"的第1位改为"2"，依次类推。
&& 二、简单应用
考生文件夹下有一个数据库文件"samp2.accdb"，里面已经设计好三个关联表对象"tStud"、"tCourse" 、"tScore"和一个空表"tTemp"。试按以下要求完成设计：
（1）创建一个查询，统计人数在7人以上（含7）的院系人数，字段显示标题为"院系号"和"人数"，所建查询命名为"qT1" 。要求：按照学号来统计人数。
（2）创建一个查询，查找非"04" 院系还未选课的学生信息，并显示"学号"和"姓名"两个字段内容，所建查询命名为"qT2" 。
（3）创建一个查询，计算组织能力强的学生的平均分及其与所有学生平均分的差，并显示"姓名"、"平均分"和"平均分差值"等内容，所建查询命名为"qT3"。
&&& 注意："平均分"和"平均分差值"由计算得到。
&&& 要求："平均分差值"以整数形式显示（使用函数实现）。
（4）创建一个查询，查找选修了先修课程的课学生，并将成绩排在前3位的学生记录追加到表"tTemp"的对应字段中，所建查询命名为"qT4"。
&& 三、综合应用
考生文件夹下有一个数据库文件"samp3.accdb"，里面已经设计好表对象"tTeacher"、窗体对象"fTest"，报表对象"rTeacher"和宏对象"m1"。试在此基础上按照以下要求补充窗体设计和报表设计：
（1）将报表对象rTeacher的报表主体节区中名为"性别"的文本框显示内容设置为"性别"字段值，并将文本框名称更名为"tSex"。
（2）在报表对象rTeacher的报表页脚节区位置添加一个计算控件，计算并显示教师的平均年龄。计算控件放置在距上边0.3厘米、距左侧3.6厘米，命名为"tAvg"。要求：平均年龄保留整数。
（3）设置"fTest"窗体。打开窗体时，窗体标题显示内容为："**月**日####样例"，请按照VBA代码中的指示将代码补充完整。
注意：①显示标题中，月和日均为本年度当月和当日，"####"为标签控件"bTitle"的内容；②显示内容中间及前后不允许出现空格；③如果月或日小于10，按实际位数显示。
要求：本年度当月和当日的时间必须使用函数获取。
（4）设置窗体对象fTest上名为"btest"的命令按钮的单击事件属性为给定的宏对象m1。
注意：不允许修改数据库中的表对象"tTeacher"和宏对象"m1"；不允许修改窗体对象"fTest" 和报表对象"rTeacher"中未涉及的控件和属性。程序代码只允许在"*******Add******"与"*******Add******"之间的空行内补充一行语句、完成设计，不允许增删和修改其他位置已存在的语句。
一、基本操作答案
(1)【操作步骤】
步骤1：选择“表”对象，右键单击“tEmployee ”表，在弹出的快捷菜单中选择“设计视图”命令。
步骤2：右键单击“编号”行，在弹出的快捷菜单中选择“主键”命令。
步骤3：右键单击“学历”行，在弹出的快捷菜单中选择“删除行”命令，在弹出的对话框中单击“是”按钮，然后单击“保存”按钮。
(2)【操作步骤】
步骤1：单击“出生日期”字段行任一点，在“有效性规则”行输入“Year(DATE())-Year([出生日期])&16”。
步骤2：单击“聘用时间”字段行任一点，在“有效性规则”行输入“&DateSerial(Year(Date())-1,9,1)”。
步骤3：右键单击“设计视图”任一点，在弹出的快捷菜单中选择“属性”命令，在“属性表”界面中“有效性规则”行输入“[出生日期]&[聘用时间]”，然后关闭属性表。
步骤4：单击“保存”按钮，在弹出的对话框中选择“否”按钮。
(3)【操作步骤】
步骤1：在“简历”字段的下一行的“字段名称”处输入“在职否”，在“数据类型”列表中选择“是/否”，在“默认值”行输入“1”，单击“保存”按钮，然后关闭设计视图。
(4)【操作步骤】
步骤1：双击“tEmployee”表，打开数据表视图。
步骤2：在“tEmployee”表的“简历”字段列的内容中选择“书法”两字，单击“开始”选项卡下的“选择”按钮，在其下拉列表中选择“包含“书法””命令。
步骤3：选中其筛选出的记录，单击“记录”功能区中的“删除”按钮，在弹出的对话框中单击“是”按钮。
步骤4：单击“保存”按钮，关闭数据表视图。
(5)【操作步骤】
步骤1：打开设计视图，在“职务”字段的“数据类型”列表中选择“查阅向导”命令。
步骤2：在弹出的对话框中选择“自行键入所需的值”命令，，然后单击“下一步”按钮，在第一列的每行分别输入“职员”、“主管”、“经理”，最后单击“完成”按钮。
步骤3：单击“保存”按钮，关闭设计视图。
(6)【操作步骤】
步骤1：双击“tEmployee”表，打开数据表视图。
步骤2：单击“所属部门”字段右侧的下三角按钮，勾选“01”对应的复选框，，将“所属部门”为“01”的记录对应的“编号”字段第1位修改为“1”。单击“所属部门”字段右侧的下三角按钮，勾选“02”对应的复选框，将“所属部门”为“02”的记录对应的“编号”字段第1位修改为“2”。单击“所属部门”字段右侧的下三角按钮，勾选“03”对应的复选框，将“所属部门”为“03”记录对应的“编号”字段第1位修改为“3”。单击“所属部门”字段右侧的下三角按钮，勾选“04”对应的复选框，将“所属部门”为“04”记录对应的“编号”字段第1位修改为“4”。单击“所属部门”字段右侧的下三角按钮，勾选“全选”复选框，然后单击“确定”按钮。
步骤3：单击“保存”按钮，关闭数据表视图。
&二、简单应用答案
(1)【操作步骤】
步骤1：单击"创建"选项卡中"查询设计"按钮。在"显示表"对话框中双击表"tStud"，然后关闭"显示表"对话框。
步骤2：双击"所属院系"和"学号"字段，单击"设计"选项卡中的"汇总"按钮。
步骤3：在"学号"字段的"总计"行选择"计数"，在"条件"行中输入"&=7"。
步骤4：将"所属院系"字段改为"院系号:所属院系"，将"学号"字段改为"人数:学号"。
步骤5：单击"保存"按钮 ，另存为"qT1"，关闭设计视图。
(2)【操作步骤】
步骤1：单击"创建"选项卡中"查询设计"按钮，在"显示表"对话框中双击表"tStud"，然后关闭"显示表"对话框。
步骤2：双击"学号"、"姓名"和"所属院系"字段，在"学号"字段的"条件"行输入"Not In (select [tScore].[学号] from [tScore])"，在"所属院系"字段的"条件"行输入"&&"04""，取消"所属院系"字段"显示"行的勾选。
步骤3：单击"保存"按钮 ，另存为"qT2"，关闭设计视图。
（3）【操作步骤】
步骤1：单击"数据库工具"选项卡下"关系"组中的"关系"按钮，如不出现"显示表"对话框则单击"设计"选项卡下"关系"组中的"显示表"按钮，双击添加表和"tStud"、"tCourse"和"tScore"，关闭显示表对话框。
步骤2：选中表"tStud"中的"学号"字段，拖动到表"tScore"的"学号"字段，弹出"编辑关系"对话框，勾选"实施参照完整性"复选框，单击"创建"按钮；同理拖动"tCourse"中的"课程号"字段到"tScore"中的"课程号"字段，弹出"编辑关系"对话框，勾选"实施参照完整性"复选框，单击"创建"按钮。按Ctrl+S保存修改，关闭关系界面。
步骤3：单击"创建"选项卡中"查询设计"按钮，在"显示表"对话框双击表"tStud"和"tScore"表，关闭"显示表"对话框。
步骤4：双击"姓名"、"成绩"和"简历"字段，单击“查询工具”选项卡下的“显示/隐藏”组中的"汇总"按钮，在"成绩"字段前添加"平均值:"字样，在其"总计"行下拉列表中选择"平均值"；在"简历"字段的条件行输入"Like "*组织能力强*""，取消其"显示"行的勾选；在下一字段输入"平均分差值: Round([平均值]-(select Avg( [成绩]) from tScore))"，在其"总计"行下拉列表中选择"Expression"。
步骤5：单击"保存"按钮 ，另存为"qT3"，关闭设计视图。
（4）【操作步骤】
步骤1：单击"创建"选项卡中"查询设计"按钮，在"显示表"对话框双击表"tStud"、"tScore"，两次双击表 "tCourse"，关闭"显示表"对话框。拖动"tCourse"的"先修课程"字段到"tCourse_1"的"课程号"字段。
步骤2：单击"设计"选项卡"查询类型"组中的"追加"按钮，在"表名称"下拉列表中选择表"tTemp"，单击"确定"按钮。
步骤3：分别双击"tStud"表的"姓名"字段，"tCourse"表的"课程名"、"先修课程"字段，"tScore"表的"成绩"字段，"tCourse_1"表的"课程名"字段。
步骤4：在"成绩"字段下的"排序"行的下拉列表中选择"降序"，在"先修课程"字段下的"条件"行输入" is not null"，在"tCourse_1"表的"课程名"字段下的"追加到"行的下拉列表中选择"先修课程名"。
步骤5：在设计视图任一点右击，在弹出的快捷菜单中选择"SQL视图"，在SELECT后面输入"TOP 3"，如图1.33所示，然后单击"运行"按钮，在弹出的对话框中单击"是"按钮。
步骤6：单击"保存"按钮 ，另存为"qT4"，关闭设计视图。
三、综合应用答案
(1)【操作步骤】
步骤1：选择"报表"对象，右键单击报表"rTeacher"在弹出的快捷菜单中选择"设计视图"命令。
步骤2：右键单击"性别"文本框，在弹出的快捷菜单中选择"属性"命令。
步骤3：在"控件来源"行右侧下拉列表中选中"性别"字段，在"名称"行输入"tSex"，关闭属性界面。
(2)【操作步骤】
步骤1：选择控件功能区中"文本框"控件 ，单击报表页脚节区任一点，弹出"Text"标签和"未绑定"文本框。
步骤2：选中"Text"标签，然后按"Delete"键将其删除。
步骤3：右键单击"未绑定"文本框，在弹出的快捷菜单中选择"属性"，在打开的"属性表"对话框中选择"全部"选项卡，在"名称"行中输入"tAvg"，分别在"上边距"和"左"所在行中输入"0.3cm"和"3.6cm"。在"控件来源"行输入"=Avg([年龄])"，在"格式"行选择"固定"，在对应的下一行找到"小数位数"行属性并在其下拉列表中选择"0"。
步骤4：单击快速工具栏中的"保存"按钮 ，关闭设计视图。
(3)【操作步骤】
步骤1：选择"窗体"对象，右键单击 "fTest"窗体，在弹出的快捷菜单中选择"设计视图"命令。
步骤2：在窗体设计视图的任意区域"右击"，在弹出的快捷菜单中选择"属性"命令，在打开的"属性表"中单击"所选内容的类型"右侧的下三角按钮，在弹出的快捷菜单中选择"窗体"命令，即可进入窗体属性。
步骤3：选择"事件"选项卡，单击"加载"事件右侧的"选择生成器"按钮 ，进入VBA编码界面，在编码区里输入"Me.Caption = Trim(Month(Date) & "月" & Day(Date) & "日" & Me.bTitle.Caption & "样例")"。
步骤4：单击快速工具栏中"保存"按钮 ，关闭设计视图。
【易错误区】 设置正确的函数，Month(Date)表示取系统当前月份，Day(Date) 表示取系统当前天。Trim()表示去除左右空格。
(4)【操作步骤】
步骤1：选择"窗体"对象，右键单击"fTest"窗体，在弹出的快捷菜单中选择"设计视图"命令。
步骤2：右键单击"测试"按钮，在弹出的快捷菜单中选择"属性"命令。
步骤3：在打开的"属性表"对话框中，单击"事件"选项卡下"单击"行右侧的下三角按钮，在弹出的下拉列表中选择"m1"。然后关闭属性界面。
步骤4：单击快速工具栏中"保存"按钮 ，关闭设计视图。}