2. 计算机
  3. 在考生文件夹下有一个数据库文件“samp3．mdb”，里面已经设计了表对象“tEmp”、窗体对象“fEmp”、报表对象“rEmp”和宏对象“mEmp”。请在此基础上按照以下要求补充设计。 (1)设置表对象“tEmp”中“聘用时间”字段的有效性规则为

在考生文件夹下有一个数据库文件“samp3．mdb”，里面已经设计了表对象“tEmp”、窗体对象“fEmp”、报表对象“rEmp”和宏对象“mEmp”。请在此基础上按照以下要求补充设计。 (1)设置表对象“tEmp”中“聘用时间”字段的有效性规则为

admin2013-11-19  57
问题 在考生文件夹下有一个数据库文件“samp3．mdb”，里面已经设计了表对象“tEmp”、窗体对象“fEmp”、报表对象“rEmp”和宏对象“mEmp”。请在此基础上按照以下要求补充设计。
    (1)设置表对象“tEmp”中“聘用时间”字段的有效性规则为：1991年1月1日(含)以后的时间。相应有效性文本设置为“输入一九九一年以后的日期”。
    (2)设置报表“rEmp”按照“性别”字段升序(先男后女)排列输出；将报表页面页脚区域内名为“tPage”的文本框控件设置为“-页码／总页数-”形式的页码显示(如-1／15-、-2／15-、……)。
    (3)将“fEmp”窗体上名为“bTitle”的标签上移到距“btnP”命令按钮l厘米的位置(即标签的下边界距命令按钮的上边界1厘米)，并设置其标题为“职工信息输出”。
    (4)根据以下窗体功能要求，对已给的命令按钮事件过程进行补充和完善。在“fEmp”窗体上单击“输出”命令按钮(名为“btnP”)，弹出一输入对话框，其提示文本为“请输入大于0的整数值”。
  输入1时，相关代码关闭窗体(或程序)。
  输入2时，相关代码实现预览输出报表对象“rEmp”。
  输入>=3时，相关代码调用宏对象“mEmp”以打开数据表“tEmp”。
  注意：不要修改数据库中的宏对象“mEmp”；不要修改窗体对象“fEmp”和报表对象“rEmp”中未涉及的控件和属性；不要修改表对象“tEmp”中未涉及的字段和属性。
    程序代码只允许在“*****Add*****”与“*****Add*****”之间的空行内补充一行语句，从而完成设计，不允许增、删和修改其他位置已存在的语句。
  Option Compare Database
  Private Sub btnP_Click()
    Dim k As String
    k=InputBox(”请输入大于0的整数值”)
    If k=””Then Exit Sub
    Select Case Val(k)
   *****Addl*****
   *****Add*****
    DoCmd．RunMacro“mEmp”
    Case 2   
    *****Add2*****
    *****Add2*****
    Case 1
    DoCmd．Close
    End Select  
End Sub
选项
答案(1)[操作步骤] 步骤l：选择“表”对象，右键单击“tEmp”，从弹出的快捷菜单中选择“设计视图”命令。 步骤2：单击“聘用时间”字段行任一点，在“有效性规则”和“有效性文本”行分别输入“>=#11991-1-1#”和“输入一九九一年以后的日期”。 步骤3：单击“保存”按钮，关闭设计视图。 (2)[操作步骤] 步骤1：选择“报表”对象，右键单击“rEmp”，从弹出的快捷菜单中选择“设计视图”命令。 步骤2：单击菜单栏“视图”｜“排序与分组”命令，在“排序与分组”对话框的“字段／表达式”下拉列表中选中“性别”字段，在“排序与分组”下拉列表中选中“升序”，关闭“排序与分组”对话框。 步骤3：右键单击“tPage”，从弹出的快捷菜单中选择“属性”命令，在“全部”选项卡“控件来源”行输入：“=”-“&[Page]&”／“&[Pages]&”-“”，关闭属性界面。 步骤4：单击工具栏中“保存”按钮[*]，关闭设计视图。 (3)[操作步骤] 步骤1：选择“窗体”对象，右键单击“fEmp”，从弹出的快捷菜单中选择“设计视图”命令。 步骤2：右键单击“btnp”按钮，从弹出的快捷菜单中选择“属性”命令，查看“上边距”，并记录下来，关闭属性窗口。 步骤3：bTitle要放在btnp上面1cm处，所以bTitle的上边距应该是btnp的上边距减1cm再减bTitle的高度。右键单击“bTitle”标签，从弹出的快捷菜单中选择“属性”命令，在“标题”行输入“职工信息输出”，在“上边距”行输入“1cm”，关闭属性窗口。 (4)[操作步骤] 步骤1：右键单击命令按钮“输出”按钮，从弹出的快捷菜单中选择“事件生成器”命令，空行内输入如下代码。 *****Add1***** Case Is>=3 *****Add1***** *****Add2***** DoCmd．OpenRepor“rEmp” *****Add2***** 关闭界面。 步骤2：单击工具栏中“保存”按钮[*]，关闭设计视图。
解析 第1题在设计视图中设置字段属性；第2、3小题分别在窗体和报表设计视图单击该控件选择“属性”命令，设置属性；第4小题直接右键单击命令按钮，在弹出的对话框中选择“事件生成器”，进入编程环境，输入代码。
转载请注明原文地址:https://kaotiyun.com/show/Yyrp777K
本试题收录于： 二级Access题库NCRE全国计算机二级分类
0

二级Access

NCRE全国计算机二级

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