考生文件夹下存在一个数据库文件“samp3.accdb”,里面已经设计了表对象“tEmp”、窗体对象“fEmp”、报表对象“rEmp”和宏对象“mEmp”。同时,给出窗体对象“fEmp”的若干事件代码,试按以下功能要求补充设计。功能: (1)调整窗

admin2017-03-21  35

问题 考生文件夹下存在一个数据库文件“samp3.accdb”,里面已经设计了表对象“tEmp”、窗体对象“fEmp”、报表对象“rEmp”和宏对象“mEmp”。同时,给出窗体对象“fEmp”的若干事件代码,试按以下功能要求补充设计。功能:
    (1)调整窗体对象“fEmp”上“报表输出”按钮(名为“bt1”)的位置,要求其左边对齐“退出”按钮,下边距离“退出”按钮1厘米(即“bt1”按钮的下边距离“bt2”按钮的上边1厘米);调整上述两个命令按钮的Tab键移动顺序为:先“报表输出”按钮,再“退出”按钮。
    (2)调整报表对象“rEmp”,将报表记录数据先按年龄升序、再按姓名降序排列,并打开相关组页眉区域,添加一个文本框控件(命名为“ta”),设置属性,使其显示年龄段信息,如“18”“19”等。
    (3)窗体加载事件实现的功能是显示窗体标题,显示内容为“****年度报表输出”,其中四位****为系统当前年份,请补充加载事件代码,要求使用相关函数获取当前年份。
    (4)窗体中“报表输出”和“退出”按钮的功能是单击“报表输出”按钮(名为“bt1”)后,首先将“退出”按钮标题变为红色(255),然后以预览方式打开报表“rEmp”;单击“退出”按钮(名为“bt2”)调用宏“mEmp”。
    按照以上功能描述补充相关事件代码,要求考虑错误处理。注意:不允许修改数据库中的表对象“tEmp”和宏对象“mEmp”;不允许修改窗体对象“fEmp”和报表对象“rErno”中未涉及的控件和属性;已给事件过程,只允许在“***Add***”与“***Add***”之间的空行内补充语句完成设计,不允许增删和修改其他位置己存在的语句。

选项

答案【操作步骤】 (1)步骤1:在“samp3.accdb”数据库窗口中,在<开始>功能区的“窗体”面板中右击“tEmp”窗体,选择“设计视图”快捷菜单命令,打开fEmp的设计视图。选中“报表输出”和“退出”两个按钮,单击<排列>功能区,然后单击<调整大小和排序>分组中“对齐”按钮,在弹出的下拉菜单中选择“靠左”命令。 步骤2:在“输出按钮”上右键单击,在弹出的快捷菜单中选择“属性”命令。在<属性表>对话框的左上角的下拉列表中选择“bt2”,查看到“bt2”的“上边距”为:3cm。“高”为:1cm。要想使btl和bt2的距离为:1cm,必须把“tt1”的上边距设为:lcm。 步骤3:再次在<属性表>对话框左上角的下拉列表中选择“bt1”,在其“上边距”所在行内单击鼠标修值改为:1cm。 步骤4:选中两个按钮,右键单击鼠标,选择快捷菜单中的“Tab键次序”命令,在对话框中拖动bt1到bt2上方即可。如27.6所示。 [*] 步骤5:单击“确定”按钮。 步骤6:单击快速访问工具栏中的“保存”按钮保存设置。 (2)步骤1:在<开始>功能区的“报表”面板中右击“rEmp”报表,选择“设计视图”快捷菜单命令,打开“rEmp”的设计视图。单击<分组和汇总>分组中的“分组和排序”命令,在下方打开<分组、排序和汇总>窗口。 步骤2:在窗口中单击“添加组”按钮,在弹出的字段选择器中选择“年龄”字段,然后依次设置“排序次序”选择“升序”,单击“更多”按钮,设置“有页眉节”。再单击“添加排序”按钮,在字段选择器中选择“姓名”字段,“排序次序”选择“降序”,如图27.7所示。 [*] 步骤3:单击<控件>分组中的“文本框”命令,在“年龄组页眉”区域内拖动,产生一个文本框(删除文本框前新增的标签)。 步骤4:在文本框上右键单击弹出快捷菜单,在快捷菜单上选择“属性”命令。然后在<属性表>对话框中的“控件来源”所在行选择:年龄,在“名称”所在行修改名称为:ta。 步骤5:关闭对话框。单击快速访问工具栏中的“保存”按钮保存设置。 (3)步骤1:在<开始>功能区的“窗体”面板中右击“fEmp”窗体,选择“设计视图”快捷菜单命令,打开“fEmp”的设计视图。 步骤2:单击<窗体设计工具.设计>功能区的<工具>分组中的“查看代码”命令按钮,弹出代码生成器窗口。然后在代码窗口的“****Addl****"之间的空行内补充语句: Me.Caption=Year(Date)&”年度报表输出” (4)步骤1:继续在代码窗口的“****Add2****”之间的空行内补充语句:bt2.ForeColor=255 在“****Add3****”之间的空行内补充语句: DoCmd.OpenReport”remp",acViewPreview 在“****Add4****"行之间添加代码:errhanle: 结果如图27.8所示。 [*] 步骤2:单击快速访问工具栏中的“保存”按钮,关闭代码窗口。 步骤3:右键单击“退出”按钮,在弹出的菜单中选择“属性”命令,在<属性表>对话框中选择“单击”事件,从下拉列表框中选择宏对象“mEmp”。 步骤4:单击快速访问工具栏中的“保存”按钮。

解析
转载请注明原文地址:https://jikaoti.com/ti/fo20FFFM
0

最新回复(0)