2. 计算机
  3. 考生文件夹下存在一个数据库文件"samp3.mdb"，里面已经设计了表对象"tEmp"、窗体对象"fEmp"、报表对象"rEmp"和宏对象"mEmp"。试在此基础上按照以下要求补充设计： (1)设置报表"rEmp"按照"年龄"字段升序排列输出；将报表页面页

考生文件夹下存在一个数据库文件"samp3.mdb"，里面已经设计了表对象"tEmp"、窗体对象"fEmp"、报表对象"rEmp"和宏对象"mEmp"。试在此基础上按照以下要求补充设计： (1)设置报表"rEmp"按照"年龄"字段升序排列输出；将报表页面页

admin2013-11-29  29
问题 考生文件夹下存在一个数据库文件"samp3.mdb"，里面已经设计了表对象"tEmp"、窗体对象"fEmp"、报表对象"rEmp"和宏对象"mEmp"。试在此基础上按照以下要求补充设计：
(1)设置报表"rEmp"按照"年龄"字段升序排列输出；将报表页面页脚区域内名为"tPage"的文本框控件设置为"页码/总页数"形式的页码显示（如1/15、2/15、……）。
(2)设置窗体对象"fEmp"背景图像为考生文件夹下的图像文件"photo.bmp"。
(3)在窗体加载事件中实现代码重置窗体标题为标签"bTitle"的标题内容。
(4)在"fEmp"窗体上单击"输出"命令按钮（名为btnP），实现以下功能：计算满足表达式1+2+3+……+n<=30000的最大n值，将n的值显示在窗体上名为tData的文本框内并输出到外部文件保存。
单击"打开表"命令按钮（名为btnQ），代码调用宏对象"mEmp"以打开数据表"tEmp"。
试根据上述功能要求，对已给的命令按钮事件过程进行代码补充并调试运行。
注意：不允许修改数据库中的表对象"tEmp"和宏对象"mEmp"；不允许修改窗体对象"fEmp"和报表对象"rEmp"中未涉及的控件和属性；只允许在"*****Add*****"与"****Add*****"之间的空行内补充语句、完成设计，不允许增删和修改其他位置已存在的语句。
选项
答案(1)【操作步骤】 步骤1：选中"报表"对象，右键单击报表"rEmp"，从弹出的快捷菜单中选择"设计视图"。 步骤2：选择"视图"菜单中的"排序与分组"，弹出"排序与分组"界面，在"字段/表达式"下拉列表中选中"年龄"，在"排序次序"下拉列表中选中"升序"，关闭"排序与分组"界面。 步骤3：右键单击"tPage"未绑定文本框，从弹出的快捷菜单中选择"属性"，在"全部"选项卡的"控件来源"行输入"＝ [Page]&"/ "& [Pages]"。 步骤4：单击工具栏中"保存"按钮，关闭设计视图。 (2)【操作步骤】 步骤1：选中"窗体"对象，右键单击窗体"fEmp"，从弹出的快捷菜单中选择"设计视图"。 步骤2：右键单击窗体设计左上角的"窗体选择器"，在弹出的菜单中选择"属性"。 步骤3：在"属性"窗口中的"格式"选项卡下的"图片"属性中设置为考生文件夹下的"photo.bmp"。 步骤4：单击工具栏中"保存"按钮。 (3)【操作步骤】 单击"事件"选项卡中"加载"属性右边的"…"打开代码生成器。在Add1空行内输入：Caption = bTitle.Caption。单击工具栏中"保存"按钮。 (4)【操作步骤】 步骤1：选择窗体设计视图中的"输出"按钮，右击选择"属性"。 步骤2：单击"事件"选项卡中"单击"属性右边的"…"按钮。 在Add2空行内输入： Dim sum As Integer sum = 0 n = 0 Do While sum <= 30000 n = n + 1 sum = sum + n Loop n = n - 1 步骤3：在Add3空行内输入：DoCmd.RunMacro "mEmp"。 步骤4：最后单击工具栏中"保存"按钮，关闭设计视图，并运行该窗体。
解析
转载请注明原文地址:https://kaotiyun.com/show/mgrp777K
本试题收录于： 二级Access题库NCRE全国计算机二级分类
0

二级Access

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)