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

admin2012-07-13  9

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

选项

答案(1)步骤1:打开“samp3.mdb”数据库窗口,选中“表”对象,右键单击“tEmp”,选择“设计视图”命令。 步骤2:单击“年龄”字段,在“字段属性”的“有效性规则”行输入:>20 and<50,在“有效性文本”行输入:请输入有效年龄。 步骤3:单击工具栏中的“保存”按钮,关闭设计视图。 (2)步骤1:选中“报表”对象,右键单击“rEmp”,选择“设计视图”命令。 步骤2:执行【视图】→【排序与分组】菜单命令,在对话框的“字段/表达式”列中选中“性别”字段,在“排序次序”列中选中“降序”,关闭对话框。 步骤3:右键单击“tPage”,选择“属性”命令,在“属性”对话框“全部”选项卡下“控件来源”行输入;=[Page]“&”/&[Pagesj’,关闭“属性”对话框。 步骤4:单击工具栏中的“保存”按钮,关闭设计视图。 (3)步骤1:选中“窗体”对象,右键单击“fEmp”,选择“设计视图”命令。 步骤2:右键单击命令按钮“btnP",选择“属性”命令,在“数据”选项卡下的“可用”行右侧下拉列表中选中“是”,关闭“属性”对话框。 步骤3:在窗体设计视图的空白处右键单击,在弹出的快捷菜单中选择“属性”命令,在“属性”对话框的左上角的下拉列表中选择窗体。在“标题”行输入:职工信息输出。关闭“属性”对话框。 (4)步骤1:右键单击命令按钮“输出”,选择“事件生成器”命令,空行内输入代码: ******Add1****** k=InputBox(“请输入大于0的整数”) ******Add1****** *********Add******** DoCmd.OpenReport”rEmp",acViewPreview **********Add2******** 步骤2:单击工具栏中的“保存”按钮,关闭设计视图。

解析 本题考点:表中字段属性有效性规则和有效性文本的设置;窗体中命令按钮和报表中文本框控件属性的设置:VBA编程。
转载请注明原文地址:https://kaotiyun.com/show/PTBD777K
0

最新回复(0)