考生文件夹下存在一个数据库文件“samp3.accdb”,里面已经设计了表对象“tEmp”、查询对象“qEmp”和窗体对象“fEmp"。同时,给出窗体对象“fEmp”上两个按钮的单击事件代码,试按以下要求补充设计。 在窗体对象“fEmp”上有“刷新”和“

admin2019-01-09  26

问题 考生文件夹下存在一个数据库文件“samp3.accdb”,里面已经设计了表对象“tEmp”、查询对象“qEmp”和窗体对象“fEmp"。同时,给出窗体对象“fEmp”上两个按钮的单击事件代码,试按以下要求补充设计。
在窗体对象“fEmp”上有“刷新”和“退出”两个命令按钮,名称分别为“bt1”和“bt2”。单击“刷新”按钮,窗体记录源改为查询对象“qEmp”;单击“退出”按钮,关闭窗体。现已编写了部分VBA代码,请按照VBA代码中的指示将代码补充完整。
    注意:不允许修改数据库中的表对象“tEmp”;不允许修改查询对象“qEmp”中未涉及的内容;不允许修改窗体对象“fEmp”中未涉及的控件和属性。
    程序代码只允许在“*****Add*****”与“*****Add*****”之间的空行内补充一行语句、完成设计,不允许增删和修改其他位置已存在的语句。

选项

答案步骤1:单击【窗体设计工具一设计】功能区的【工具】分组中的“查看代码”命令按钮,弹出代码生成器窗口。在代码窗口的“****Addl****”之间的空行内补充语句: Me.RecordSource="qEmp" 在代码窗口的“****Add2****”之间的空行内补充语句: DoCmd.Close 步骤2:单击快速访问工具栏中的“保存”按钮,关闭代码窗口。关闭“samp3.accdb”窗口。

解析 (1)主要考查改变窗体中文本框为组合框,并设置组合框的“行来源类型”和“行来源”属性。
(2)主要考查在查询设计器中为字段添加参数条件,这里的性别字段的值为窗体对象“fEmp”上组合框“tSS”的输入值即[Forms]! [fEmp]![tSS]。
(3)本题考查改变窗体中文本框控件为计算类型,要求实现依据“党员否”字段值显示相应内容。如果“党员否”字段值为True,显示“党员”两个字:如果“党员否”字段值为False,显示“非党员”三个字。可以用IIF()函数来实现。本题考查为窗体“刷新”和“退出”按钮的单击事件添加代码。
转载请注明原文地址:https://jikaoti.com/ti/CU10FFFM
0

最新回复(0)