在考生文件夹下有一个数据库文件“samp3.accdb”,里面已经设计了表对象“tEmp”、窗体对象“fEmp”、报表对象“rEmp”和宏对象“mEmp”。试在此基础上按照以下要求补充设计。 (1)设置表对象“tEmp”中“年龄”字段的有效性规则为:年龄值

admin2018-09-25  19

问题 在考生文件夹下有一个数据库文件“samp3.accdb”,里面已经设计了表对象“tEmp”、窗体对象“fEmp”、报表对象“rEmp”和宏对象“mEmp”。试在此基础上按照以下要求补充设计。
(1)设置表对象“tEmp”中“年龄”字段的有效性规则为:年龄值在20到50之间(不含20和50),相应有效性文本设置为“请输入有效年龄”。
(2)设置报表“rEmp”按照“性别”字段降序(先女后男)排列输出;将报表页面页脚区域内名为“tPage”的文本框控件设置为“第N页/共M页”形式显示。
(3)将“fEmp”窗体上名为“btnP”的命令按钮由灰色无效状态改为有效状态,设置窗体标题为“职工信息输出”。
(4)根据以下窗体功能要求,对已给的命令按钮事件过程进行补充和完善。在“fEmp”窗体上单击“输出”命令按钮(名为“btnP”),弹出一个输入对话框,其提示文本为“请输入大于0的整数”。
输入1时,相关代码关闭窗体(或程序)。
输入2时,相关代码实现预览输出报表对象“rEmp”。
输入>=3时,相关代码调用宏对象“mEmp”以打开数据表“tEmp”。
注意:不要修改数据库中的宏对象“mEmp”;不要修改窗体对象“fEmp”和报表对象“rEmp”中未涉及的控件和属性;不要修改表对象“tEmp”中未涉及的字段和属性。
程序代码只允许在“*****Add*****”与“*****Add*****”之间的空行内补充一行语句、完成设计,不允许增删和修改其他位置已存在的语句。

选项

答案【操作步骤】 (1)骤1:选择“表”对象,右键单击“tEmp”表,在弹出的快捷菜单中选择“设计视图”命令。 步骤2:单击“年龄”字段行任一点,在“常规”选项卡下的“有效性规则”行输入“>20.And<50”,在“有效性文本”行输入“请输入有效年龄”,如图4—278所示。 [*] 步骤3:按Ctd+S保存修改,关闭设计视图。 (2)步骤1:选择“报表”对象,右键单击“rEmp”报表,在弹出的快捷菜单中选择“设计视图”命令。 步骤2:单击报表设计工具“设计”选项卡“分组和汇总”组中的“分组和排序”按钮,在“分组、排序和汇总”中选择“添加排序”,选择“排序依据”后面“选择字段”下拉列表中的“性别”字段,选择“降序”,如图4—279所示,关闭界面。 [*] 步骤3:右键单击“tPage”,在弹出的快捷菜单中选择“属性”命令,在“全部”选项卡“下的控件来源”行输入“="第"&[Page]&"页/共"&[Pages]&"页"”(输入双引号内的等号表达式,注意符号之间不能有空格),如图4—280所示,关闭属性表。在页面页脚节区中将该控件调整到合适的大小。 [*] 步骤4:按Ctrl+S保存修改,关闭设计视图。 (3)步骤1:选择“窗体”对象,右键单击“fEmp”窗体,在弹出的快捷菜单中选择“设计视图”命令。 步骤2:右键单击命令按钮“btnp”,在弹出的快捷菜单中选择“属性”命令,在“数据”选项卡的“可用”右侧下拉列表中选中“是”,如图4—281所示。 [*] 步骤3:在属性表最上方本框右侧的下拉列表中选择“窗体”,在“全部”选项卡下的“标题”行输入“职工信息输出”,如图4—282所示,关闭属性表。 [*] (4)步骤:右键单击“输出”命令按钮,在弹出的快捷菜单中选择“事件生成器”命令,弹出代码编辑界面,在空行内相应位置输入以下代码: ’*****Add1***** k=InputBox("请输入大于0的整数","Msg") ’*****Add1***** ’*****Add2***** DoCmd.OpenReport"rEmp",acViewPreview ’*****Add2***** 代码编辑窗口中输入代码位置如图4—283所示,关闭代码编辑窗口界面,按Ctrl+S保存修改,关闭设计视图。 [*] 补充:①双击左侧导航窗口中的窗体“fEmp”,弹出如图4—284所示的“职工信息输出”窗口界面,其中包括一个命令按钮“输出”。 [*] ②单击“输出”命令按钮,弹出“Msg”提示框,如图4—285所示,上面含有提示信息“请输入大于0的整数”。另有一个文本输入框,以及“确定”和“取消”两个命令按钮。 [*] ③在文本框中输入1,则窗体被关闭;输入2,则弹出报表对象“rEmp”预览窗口;输入3及大于3的数值,则打开数据表“tEmp”。 以上补充内容不写入操作步骤,只是为了演示前面的操作结果。

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

最新回复(0)