新版全国二级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:单击快速工具栏中"保存"按钮 ,关闭设计视图。