在考生文件夹下有一个数据库“Acc3.mdb”,其中已经设计了表对象“tEmp”、窗体对象“fEmp”、报表对象“rEmp”和宏对象“mEmp”。窗体效果如图6所示。请在此基础上按照以下要求补充设计: (1)设置表对象“tEmp”中的“聘用时间”字段的“

admin2010-04-02  53

问题 在考生文件夹下有一个数据库“Acc3.mdb”,其中已经设计了表对象“tEmp”、窗体对象“fEmp”、报表对象“rEmp”和宏对象“mEmp”。窗体效果如图6所示。请在此基础上按照以下要求补充设计:

(1)设置表对象“tEmp”中的“聘用时间”字段的“有效性规则”为“1991年1月1日(含)以后的时间”。相应“有效性文本”设置为“输入一九九一年以后的日期”。
(2)设置报表“rEmp”按照“性别”字段“升序”(先男后女)输出;将报表页面页脚区内名为“tPage”的文本框控件设置为“第N页/共M页”的页码显示格式。
(3)将“fErnp”窗体上名为“bTitle”的标签上移到距“bTnp”按钮“1cm”的位置(即标签的下边界距按钮的上边界1cm),并设置其标题为“职工信息输出”。
(4)根据以下窗体功能要求,对已给的按钮事件过程进行补充和完善。在“fEmp”窗体上单击“输比”按钮(名为“bTnp”),弹出一个输入对话框,其提示文本为“请输人大于0的整数值”。
输入1时,相关代码关闭窗体(或程序)。
输入2时,相关代码实现预览输出报表对象“rEmp”。
输入≥3时,相关代码调用宏对象“mEmp”以打开数据表“tEmp”。
注意:不要修改数据库中的宏对象“mEmp”;不要修改窗体对象“fEmp”和报表对象“rEmp”中未涉及的控件和属性;不要修改表对象“tEmp”中未涉及的字段和属性。只允许在Add注释之间的空行内补充一行语句,完成设计,不允许增删和修改其他位置已存在的语句。

选项

答案(1)在“Acc3.mdb”数据库中选中“表”对象,右键单击“tErnp”,选择“设计视图”。单击“聘用时间”字段行,在“有效性规则”和“有效性文本”行分别输入“>=#1991—1—1#”和“输入一九九一年以后的日期”。 (2)在“Acc3.mdb”数据库中选中“报表”对象,右键单击“rEmp”,选择“设计视图”。执行“视图”→“排序与分组”命令,在对话框的“字段/表达式”下拉列表中选中“性别”字段,在“排序与分组”下拉列表中选中“升序”,关闭界面。右键单击“tPage”,选择“属性”,在“全部”选项卡“控件来源”行输入“=”第”&[Page]&.”页/共”&[Pages]&”页””,关闭属性界面。单击工具栏中的“保存”按钮,关闭设计视图。 (3)在“Acc3.mdb”数据库中选中“窗体”,右键单击“fEmp”,选择“设计视图”。右键单击“btnp”按钮,选择“属性”,查看“上边距”,并记录下来,关闭属性界面。“bTitle”要放在“bTnp”上面1 cm处,所以“bTitle”的上边距应该是“bTnp”的上边距减1 cm再减bTitle的高度,右键单击“bTitle”标签,选择“属性”,在“标题”行输入“职工信息输出”,在“上边距”行输入“1 cm”,关闭属性界面。 (4)在“Acc3.mdb”数据库中选中“fErnp”窗体,右键单击“输出”按钮,选择“事件生成器”,空行内输入如下代码:“Case Is>=3和DoCmd.OpenReport”r”Em pt””,关闭界面。单击工具栏中的“保存”按钮,关闭设计视图。

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

最新回复(0)