应用题
考生文件夹
考生文件夹下存在一个数据库文件“samp3.accdbb”，里面已经设计了表对象“tEmp”、查询对象“qEmp”、窗体对象“fEmp”、报表对象“rEmp”和宏对象“mEmp”。试在此基础上按照以下要求补充设计：
注意：不允许修改数据库中的宏对象“mEmp”；不允许修改窗体对象“fEmp”和报表对象“rEmp”中未涉及的控件和属性；不允许修改表对象“tEmp”和查询对象“qEmp”中未涉及的字段和属性。程序代码只允许在“*******Add******”与“*******Add******”之间的空行内补充一行语句、完成设计，不允许增删和修改其它位置已存在的语句。
考生文件夹下存在一个数据库文件“samp3.accdbb”，里面已经设计了表对象“tEmp”、查询对象“qEmp”、窗体对象“fEmp”、报表对象“rEmp”和宏对象“mEmp”。试在此基础上按照以下要求补充设计：
注意：不允许修改数据库中的宏对象“mEmp”；不允许修改窗体对象“fEmp”和报表对象“rEmp”中未涉及的控件和属性；不允许修改表对象“tEmp”和查询对象“qEmp”中未涉及的字段和属性。程序代码只允许在“*******Add******”与“*******Add******”之间的空行内补充一行语句、完成设计，不允许增删和修改其它位置已存在的语句。
问答题
消除报表的“性别”排序，重新按照职工姓氏进行排列，并在合适页脚区域添加一个文本框控件(命名为tmAge)，输出不同姓氏职工的最小年龄值。
说明：这里不考虑复姓情况。
说明：这里不考虑复姓情况。
【正确答案】[操作步骤] 步骤1：打开考生文件夹下的数据库文件samp3.accdb，右键单击“rEmp”报表，在弹出的快捷菜单中选择“设计视图”命令。 步骤2：单击“设计”选项卡“分组和汇总”组中的“分组和排序”按钮，打开“分组、排序和汇总”窗口。 步骤3：单击“添加组”按钮，弹出字段选择器，选择“表达式”，弹出的“表达式生成器”对话框，输入表达式“=left([姓名]，1)”，最后单击“确定”按钮，关闭对话框窗口，如图1所示。 图1 步骤4：单击“更多”按钮，设置“无页眉节”，“有页脚节”。 步骤5：单击“控件”分组中的“文本框”命令，在页脚区域内拖动，产生一个文本框(删除文本框前新增的标签控件)。 步骤6：右键单击“未绑定”文本框，在弹出的快捷菜单中选择“属性”命令，在“属性表”对话框中“名称”所在行输入“tmAvg”；在“控件来源”所在行输入“=Min([年龄])”，设置完成后，关闭“属性表”对话框，如图2所示。 图2 答案考生文件夹
【答案解析】[考点] 本题考点：报表控件以及页码设置，窗体命令按钮的单击事件，VBA代码编程等 第1、2小题单击报表的设计视图按照题目要求设置；第3小题单击窗体的设计视图设置窗体相关属性；第4小题单击设计工具功能组中的“查看代码”按钮，进入VBA代码编辑界面。
问答题
将报表页面页脚区域内名为“tPage”的文本框控件设置为“页码/总页数”形式的页码显示(如1/35、2/35、…)。
【正确答案】[操作步骤] 步骤1：在“rEmp”报表设计视图中选中“tPage”文本框，右键单击弹出的快捷菜单中选择“属性”命令，在“属性表”对话框的“控件来源”所在行输入表达式“=[Page]&'/'&[Pages]”，如下图所示。 步骤2：按Ctrl+S保存修按钮，关闭“rEmp”报表设计视图。
【答案解析】
问答题
将“fEmp”窗体上名为“bTitle”的标签上移到距“btnP”命令按钮0.5厘米的位置(即标签的下边界距命令按钮的上边界0.5厘米)。同时，将窗体按钮“btnP”的单击事件属性设置为宏“mEmp”。
【正确答案】[操作步骤] 步骤1：右键单击“fEmp”窗体，在弹出的快捷菜单中选择“设计视图”命令。 步骤2：右键单击窗体中的“bTitle”控件，在弹出的快捷菜单中选择“属性”，弹出“属性表”对话框，将“上边距”属性值设置为“1.5cm”，如图1所示。 图1 步骤3：单击窗体中的“btnP”按钮，在右侧的属性表窗口中，单击“事件”选项卡，单击“单击”事件所对应下拉箭头，在弹出的列表框中选择“mEmp”，如图2所示。 图2
【答案解析】
问答题
在“fEmp”窗体的左侧有一个名称为“COMBO1”的组合框和两个名称分别为“btitle1”、“btitle2”的标签。“btitle1”标签用于显示组合框左侧的标题内，“btitle2”标签用于显示计算的平均年龄。“COMBO1”组合框中列出性别值“男”和“女”，当在组合框中选择某一性别值后，计算该性别的平均年龄，并将计算的结果显示在“btitle2”标签中，显示内容及格式如下图所示。请按照VBA代码中的指示将代码补充完整。
【正确答案】[操作步骤] 步骤1：在窗体“fEmp”设计视图中，单击“设计”选项卡“工具”中的“查看代码”按钮进入VBA代码编辑界面。 步骤2：在“****Add1****”行之间添加代码： Me.btitle2.Caption='性别查询结果:'&Me.COMBO1.Value&'的平均年龄为'&DLookup('平均年龄'，'qEmp'，'性别='&Me.COMBO1.Value&'') 步骤3：在“****Add2****”行之间添加代码： Me.COMBO1.RowSource='男;女' 步骤4：在“****Add3****”行之间添加代码： Me.btitle2.Caption='性别查询结果:' 设置完成结果如下图所示： 步骤5：关闭VBA代码编码窗口，按Ctrl+S保存修按钮，关闭“fEmp”窗体设计视图。
【答案解析】