考生文件夹下存在一个数据库文件“samp3．mdb”，里面已经设计了表对象“tEmp”、查询对象“qEmp”和窗体对象“tEmp”。同时，给出窗体对象“tEmp”上两个按钮的单击事件代码，试按以下要求补充设计。(1)将窗体“fEmp”上名称为“tSS”的文本框控件改为组合框控件，控件名称不变，标签标题不变。设置组合框控件的相关属性，以实现从下拉列表中选择输入性别值“男”和“女”。(2)将查询对象“qEmp”改为参数查询，参数为窗体对象“fEmp”上组合框“tSS”的输入值。(3)将窗体对象“fEmp”上名

正确答案：【操作步骤】 (1)步骤1：在“samp3．mdb”数据库窗口中单击“窗体”对象单击“fEmp”窗体单击“设计”按钮。 步骤2：选中“tSS”的文本框右键单击从弹出的快捷菜单中选择【更改为】→【组合框】命令。 步骤3：再次选中该文本框右键单击鼠标选择“属性”命令。在“属性”对话框中设置“数据”标签中的“行来源类型”值为“值列表”然后在“行来源”属性中输入“男：女”。如图2-173所示。 (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)步骤1：在“samp3．mdb”数据库窗口中单击“窗体”对象，单击“fEmp”窗体，单击“设计”按钮。 步骤2：选中“tSS”的文本框右键单击，从弹出的快捷菜单中选择【更改为】→【组合框】命令。 步骤3：再次选中该文本框右键单击鼠标，选择“属性”命令。在“属性”对话框中设置“数据”标签中的“行来源类型”值为“值列表”，然后在“行来源”属性中输入“男：女”。如图2-173所示。 (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()函数来实现。本题考查为窗体“刷新”和“退出”按钮的单击事件添加代码。