问答题
在考生文件夹下“samp3．accdb”数据库中己设计好表对象“tEmployee”和“tGroup”及查询对象“qEmployee”，同时还设计出以“qEmployee”为数据源的报表对象“rEmployee”。试在此基础上按照以下要求补充报表设计：(1)在报表的报表页眉节区位置添加一个标签控件，其名称为“bTitle”，标题显示为“职工基本信息表”。(2)预览报表时，报表标题显示标签控件“bTitle”的内容，请按照VBA代码中的指示将代码补充完整。(3)在“性别”字段标题对应的报表主体节区距上边0．1厘米、距左侧5．2厘米位置添加一个文本框，显示出“性别”字段值，并命名为“tSex”；在报表适当位置添加一个文本框，计算并显示每类职务的平均年龄，文本框名为tAvg。注意：报表适当位置是指报表页脚、页面页脚或组页脚。(4)设置报表主体节区内文本框“tDept"的控件来源属性为计算控件。要求该控件可以根据报表数据源里的“所属部门”字段值，从非数据源表对象“tGroup”中检索出对应的部门名称并显示输出(提示：考虑使用DLookup函数)。注意：不允许修改数据库中的表对象“tEmployee”和“tGroup”及查询对象“qEmployee”；不允许修改报表对象“qEmployee”中未涉及的控件和属性。程序代码只允许在“***Add***”与“***Add***”之间的空行内补充一行语句完成设计，不允许增删和修改其它位置己存在的语句。
【正确答案】正确答案：【操作步骤】 (1)步骤1：双击“samp3．accdb”数据库，在对象导航窗格中右键单击“rEmployee”报表，选择右键菜单“设计视图”，进入报表的设计界面。 步骤2：在选项卡的命令组中单击“标签”控件，在报表页眉区内单击鼠标绘制，在光标闪动处输入“职工基本信息表”；右击标签，在弹出的快捷菜单上选择“属性”命令，在对话框内修改“名称”为：bTitle。如图1-14所示。
步骤3：单击快速访问工具栏中的“保存”按钮，保存本步骤设计。 (2)步骤1：在对话框上方的对象选择器中选中“报表”，单击“事件”选项卡，在“加载”行内选择“事件过程”，单击“代码生成器”按钮，进入到vBA代码编辑界面。 在“**Add**”之间输入：Me．Caption=bTitle．Caption 步骤2：单击快速访问工具栏中的“保存”按钮，关闭代码窗口，单击选项卡中命令组的“打印预览”命令查看报表打印情况。 (3)步骤1：在报表设计视图中，直接复制主体节中任一现有文本框并粘贴，选中粘贴后的文本框，在其在对话框中修改“名称”为“tSex”，“控件来源”为“性别”，“上边距”为“0．1cm”，“左”为“5．2cm”，如图1．15所示。
步骤2：单击快速访问工具栏中的“保存”按钮。 步骤3：添加计算每类职务的平均年龄文本框。由于需要对报表主体中的记录进行分组并做统计，因此需要为报表添加组，这里添加组页脚。单击选项卡中命令组的“分组和排序”命令，在报表下方出现设计窗格；点击“添加组”按钮，设置“分组形式”为“职务”字段，设置“汇总”选项中“汇总方式”为“年龄”、类型为“平均值”、勾选“在组页脚中显示小计”项，设置“无页眉节”和“有页脚节”，设置后的＜分组，排序和汇总＞设计格式如图1.16所示。
步骤3：单击快速访问工具栏中的“保存”按钮，保存本步骤设计。 (2)步骤1：在对话框上方的对象选择器中选中“报表”，单击“事件”选项卡，在“加载”行内选择“事件过程”，单击“代码生成器”按钮，进入到vBA代码编辑界面。 在“**Add**”之间输入：Me．Caption=bTitle．Caption 步骤2：单击快速访问工具栏中的“保存”按钮，关闭代码窗口，单击选项卡中命令组的“打印预览”命令查看报表打印情况。 (3)步骤1：在报表设计视图中，直接复制主体节中任一现有文本框并粘贴，选中粘贴后的文本框，在其在对话框中修改“名称”为“tSex”，“控件来源”为“性别”，“上边距”为“0．1cm”，“左”为“5．2cm”，如图1．15所示。步骤2：单击快速访问工具栏中的“保存”按钮。 步骤3：添加计算每类职务的平均年龄文本框。由于需要对报表主体中的记录进行分组并做统计，因此需要为报表添加组，这里添加组页脚。单击选项卡中命令组的“分组和排序”命令，在报表下方出现设计窗格；点击“添加组”按钮，设置“分组形式”为“职务”字段，设置“汇总”选项中“汇总方式”为“年龄”、类型为“平均值”、勾选“在组页脚中显示小计”项，设置“无页眉节”和“有页脚节”，设置后的＜分组，排序和汇总＞设计格式如图1.16所示。【答案解析】