在考生文件夹下“samp3.accdb”数据库中已经设计好表对象“tBand”和“tLine”,同时还设计出以“tBand”和“tLine”为数据源的报表对象“rBand”。 (1)在报表的报表页眉节区位置添加一个标签控件,其名称为“bTitle”,标题显

admin2017-10-21  27

问题 在考生文件夹下“samp3.accdb”数据库中已经设计好表对象“tBand”和“tLine”,同时还设计出以“tBand”和“tLine”为数据源的报表对象“rBand”。
(1)在报表的报表页眉节区位置添加一个标签控件,其名称为“bTitle”,标题显示为“旅游线路信息表”,字体名称为“宋体”,字体大小为22,字体粗细为“加粗”,倾斜字体为“是”。
(2)预览报表时,报表标题显示为:“**月#####”,请按照VBA代码中的指示将代码补充完整。
注意:①显示标题中的月为本年度当月,“######”为标签控件“bTitle”的内容;②如果月份小于10,按实际位数显示。
要求:本年度当月的时间必须使用函数获取。
(3)在“导游姓名”字段标题对应的报表主体区位置添加一个控件,显示出“导游姓名”字段值,并命名为“tName”。
(4)在报表适当位置添加一个文本框控件,计算并显示每个导游带团的平均费用,文本框控件名称为tAvg。
注意:报表适当位置是指报表页脚、页面页脚或组页脚。不允许改动数据库文件中的表对象“tBand”和“tLine”,同时也不允许修改报表对象“rBand”中已有的控件和属性。
程序代码只允许在“****Add***”与“***Add***”之间的空行内补充一行语句完成设计,不允许增删和修改其它位置已存在的语句。

选项

答案【操作步骤】 (1)步骤1:双击“samp3.accdb”数据库,在对象导航窗格中右键单击“rBand”报表,选择右键菜单“设计视图”,进入报表的设计视图。 步骤2:适当拖动报表页眉节为合适高度,在<窗体设计工具>选项卡的<控件>命令组中单击“标签”控件,在窗体页眉区内单击鼠标绘制,在光标闪动处输入“旅游线路信息表”;右击标签,在弹出的快捷菜单上选择“属性”命令,在<属性表>对话框内设置“名称”为“bTitle”,“字体名称”为“宋体”,“字体大小”为22,“字体粗细”为“加粗”,“倾斜字体”为“是”。 步骤3:单击快速访问工具栏中的“保存”按钮,保存本步骤设计。 (2)步骤1:在<属性表>对话框上方的对象选择器中选中“报表”,单击“事件”选项卡,在“加载”行内选择“事件过程”,单击“代码生成器”按钮,进入到VBA代码编辑界面。在“***Add****”之间输入:Me.Caption=Mortm(Date)&”月”&bTitle.Caption 步骤2:单击快速访问工具栏中的“保存”按钮,关闭代码窗口。单击<报表设计工具>选项卡中<视图>命令组的“打印预览"命令查看报表打印预览时左上角标题。 (3)步骤1:在报表设计视图中,直接复制主体节中任一现有文本框并粘贴,选中粘贴后的文本框拖动到“导游姓名”字段标题下方对应位置,并在其<属性表>对话框中设置“名称”为“tName”,“控件来源”为“导游姓名”。 步骤2:单击快速访问工具栏中的“保存”按钮。 (4)步骤1:在对象导航窗格中右键单击“rBand”报表,选择右键菜单“设计视图”,进入报表的设计视图。 步骤2:单击<报表设计工具>选项卡中<分组和汇总>命令组的“分组和排序”命令,在报表下方出现<分组、排序和汇总>设计窗格。 步骤3:添加报表分组字段。由于需要计算每个导游带团的平均费用,需要对报表主体中的记录进行分组并做统计,因此需要为报表添加组,这里添加到组页脚。点击“添加组”按钮,设置“分组形式”为“团队ID”字段,“分组方式”为“整个值”;设置“汇总”选项中“汇总方式”为“费用”,类型为“平均值值”,勾选“在组页脚中显示小计”项;设置“无页眉节”和“有页脚节”。完成设置后的<分组、排序和汇总>设计窗格如图7-12所示。 [*] 步骤4:通过步骤3的设计,在报表中添加了“团队ID页脚”的组页脚,其中包含了一个统计每个导游带团的平均费用的文本框,点击该文本框,在其在<属性表>对话框中修改“名称”为“tAvg”。适当调整“团队ID页脚”节的高度。单击<报表设计工具>选项卡中<视图>命令组的“打印预览”命令查看报表打印情况。 步骤5:单击快速访问工具栏中的“保存"按钮。 步骤6:关闭“rBand”报表。关闭“samp3.accdb”窗口。

解析
转载请注明原文地址:https://kaotiyun.com/show/dnMp777K
0

最新回复(0)