考生文件夹下存在一个数据库文件“samp3.mdb”,里面已经设计了表对象“tEmp”、窗体对象“fEmp”、宏对象“mEmp”和报表对象“rEmp”。同时,给出窗体对象“fEmp”的“加载”事件和“预览”及“打印”两个命令按钮的单击事件代码,试按以下功能要求补充设计。
(1)将窗体“fEmp”上标签“bTitle”以特殊效果:阴影显示。
(2)已知窗体“fEmp”的三个命令按钮中,按钮“bt1”和“bt3”的大小一致且左对齐。现要求在不更改“bt1”和“bt3”大小位置的基础上,调整按钮“bt2”的大小和位置,使其大小与“bt1”和“bt3”相同,水平方向左对齐“bt1”和“bt3”,竖直方向在“bt1”和“bt3”之间的位置。
(3)在窗体“fEmp”的“加载”事件中设置标签“bTitle”以红色文本显示:单击“预览”按钮(名为“bt1”)或“打印”按钮(名为“bt2”),事件过程传递参数调用同一个用户自定义代码(mdPnt)过程,实现报表预览或打印输出;单击“退出”按钮(名为“bt3”),调用设计好的宏“mEmp”来关闭窗体。
(4)将报表对象“rEmp”的记录源属性设置为表对象“tEmp”。
注意:不允许修改数据库中的表对象“tEmp”和宏对象“mEmp”:不允许修改窗体对象“fEmp”和报表对象“rEmp”中未涉及的控件和属性。
程序代码只允许在“*****Add*****”与“*****Add*****”之间的空行内补充一行语句、完成设计,不允许增删和修改其他位置已存在的语句。
第1题:
根据以下资料,回答下列各题。 考生文件夹下存在一个数据库文件“samp3.mdb”,里面已经设计了表对象“tEmp”、窗 体对象“fEmp”、报表对象“rEmp”和宏对象“mEmp”。同时,给出窗体对象“fEmp”的若 干事件代码,试按以下功能要求补充设计。 功能: 将报表记录数据按姓氏分组升序排列,同时要求在相关组页眉区域添加一个文本框 控件(命名为“'mum”),设置其属性输出显示各姓氏员工的人数。 注意:这里不用考虑复姓情况,所有姓名的第一个字符视为其姓氏信息。 要求用·号或“编号”字段来统计各姓氏人数。
第2题:
考生文件夹下存在一个数据库文件“samp3.mdb”,里面已经设计了表对象“tEmp”、查询对象“qEmp”和窗体对象“tEmp”。同时,给出窗体对象“tEmp”上两个按钮的单击事件代码,试按以下要求补充设计。
(1)将窗体“fEmp”上名称为“tSS”的文本框控件改为组合框控件,控件名称不变,标签标题不变。设置组合框控件的相关属性,以实现从下拉列表中选择输入性别值“男”和“女”。
(2)将查询对象“qEmp”改为参数查询,参数为窗体对象“fEmp”上组合框“tSS”的输入值。
(3)将窗体对象“fEmp”上名称为“tPa”的文本框控件设置为计算控件。要求依据“党员否”字段值显示相应内容。如果“党员否”字段值为True,显示“党员”两个字;如果“党员否”字段值为False,显示“非党员”三个字。
(4)在窗体对象“fEmp”上有“刷新”和“退出”两个命令按钮,名称分别为“bt1”和“bt2”。单击“刷新”按钮,窗体记录源改为查询对象“qEmp”;单击“退出”按钮,关闭窗体。现已编写了部分VBA代码,请按照VBA代码中的指示将代码补充完整。
注意:不允许修改数据库中的表对象“tEmp”:不允许修改查询对象“qEmp”中未涉及的内容;不允许修改窗体对象“fEmp”中未涉及的控件和属性。
程序代码只允许在“*****Add*****”与“*****Add*****”之间的空行内补充一行语句、完成设计,不允许增删和修改其他位置已存在的语句。
(2)步骤1:在“samp3.mdb”数据库窗口中单击“查询”对象单击“qEmp”查询表。单击“设计”按钮。
步骤2:添加性别列设置条件为:[Forms]![fEmp]![tSS]取消“显示”复选框的勾选如图2-174所示。
步骤3:单击“保存”按钮保存查询。
(3)步骤l:在“fEmp”窗体的设计视图中右键单击名称为“tPa”的文本框控件选择“属性”命令.
步骤2:在“属性”对话框中设计“数据”标签中的“控件来源”值为:=IIf([党员否]〝党员〞〝非党员〞)。
(4)步骤1:在窗体的设计视图中右键单击窗体中的“刷新”按钮在弹出的快捷菜单中选择“事件生成器”命令。在“代码生成器”的VBA窗口中选择对应的bt1 Click事件中“*****Addl*****”与“*****Add1****”之间的空行内补充语句:Me.RecordSouree=“qEmp”。
步骤2:然后在bt2 Click的“*****Add2*****”与“*****Add2*****”之间的空行内补充语句:DoCmd.Close。
步骤3:单击“保存”按钮关闭代码窗口。关闭“samp3.mdb”窗口。
(2)步骤1:在“samp3.mdb”数据库窗口中单击“查询”对象,单击“qEmp”查询表。单击“设计”按钮。
步骤2:添加性别列,设置条件为:[Forms]![fEmp]![tSS],取消“显示”复选框的勾选,如图2-174所示。
步骤3:单击“保存”按钮保存查询。
(3)步骤l:在“fEmp”窗体的设计视图中,右键单击名称为“tPa”的文本框控件,选择“属性”命令.
步骤2:在“属性”对话框中,设计“数据”标签中的“控件来源”值为:=IIf([党员否],〝党员〞,〝非党员〞)。
(4)步骤1:在窗体的设计视图中,右键单击窗体中的“刷新”按钮,在弹出的快捷菜单中选择“事件生成器”命令。在“代码生成器”的VBA窗口中选择对应的bt1 Click事件中“*****Addl*****”与“*****Add1****”之间的空行内补充语句:Me.RecordSouree=“qEmp”。
步骤2:然后在bt2 Click的“*****Add2*****”与“*****Add2*****”之间的空行内补充语句:DoCmd.Close。
步骤3:单击“保存”按钮,关闭代码窗口。关闭“samp3.mdb”窗口。 解析:(1)主要考查改变窗体中文本框为组合框,并设置组合框的“行来源类型”和“行来源”属性。(2)主要考查在查询设计器中为字段添加参数条件,这里的性别字段的值为窗体对象“fEmp”上组合框“tSS”的输入值即[Forms]![fEmp]![tSS]。(3)本题考查改变窗体中文本框控件为计算类型,要求实现依据“党员否”字段值显示相应内容。如果“党员否”字段值为True,显示“党员”两个字;如果“党员否”字段值为False,显示“非党员”三个字。可以用.IIF()函数来实现。本题考查为窗体“刷新”和“退出”按钮的单击事件添加代码。
第3题:
考生文件夹下存在一个数据库文件“samp3.mdb”,里面已经设计了表对象“tEmp”、窗体对象“fEmp”、报表对象“rEmp”和宏对象“mEmp”。试在此基础上按照以下要求补充设计:
(1)设置表对象“tEmp”中“姓名”字段为“必填字段”,同时设置其为“有重复索引”。将考生文件夹下图像文件“zs.bmp”作为表对象“tEmp”中编号为“000002”、名为张三的女职工的照片数据。
(2)将报表“rEmp”的主体节区内“tAgc”文本框控件改名为“tYear”,同时依据报表记录源的“年龄”字段值计算并显示出其四位的出生年信息。
注意;系统当前年必须用相关函数返回。
(3)设置“fEmp”窗体上名为“bTitle”的标签文本显示为阴影特殊效果。同时,将窗体按钮“bmP'’的单击事件属性设置为宏“mEmp”,以完成按钮单击打开报表的操作。
注意:不允许修改数据库中的宏对象“mEmp”;不允许修改窗体对象“fEmp”和报表对象“rEmp”中未涉及的控件和属性;不允许修改表对象“tEmp”中未涉及的字段和属性。
第4题:
考生文件夹下存在一个数据库文件“samp3.mdb”,里面已经设计了表对象“tEmp”和窗体对象“fEmp”。同时,给出窗体对象“fEmp”上“计算”按钮(名为bt)的单击事件代码,试按以下要求完成设计。
(1)设置窗体对象“fEmp”的标题为“信息输出”。
(2)将窗体对象“fEmp”上名为“bTitle”的标签以红色显示其标题。
(3)删除表对象“tEmp”中的“照片”字段。
(4)按照以下窗体功能,补充事件代码设计。
窗体功能:打开窗体、单击“计算”按钮(名为bt),事件过程使用ADO数据库技术计算出表对象“tEmp”中党员职工的平均年龄,然后将结果显示在窗体的文本框“rage”内并写入外部文件中。
注意:不允许修改数据库中表对象“tEmp”未涉及的字段和数据;不允许修改窗体对象“fEmp”中未涉及的控件和属性。
程序代码只允许在“*****Add*****”与“*****Add*****”之间的空行内补充一行语句、完成设计,不允许增删和修改其他位置已存在的语句。
第5题:
根据以下资料,回答下列各题。 考生文件夹下存在~个数据库文件“samp3.mdb”,里面已经设计好窗体对象“fStaff”。 试在此基础上按照以下要求补充窗体设计: 在窗体的窗体页眉节区位置添加一个标签控件,其名称为“bTitle”,标题显示为“员工信息输出”。