在考生文件夹下有一个数据库文件“samp3.accdb”,其中存在已经设计好的表对 象“tEmp”、查询对象“qEmp”和窗体对象 “fEmp”。同时,给出窗体对象“fEmp”上两个 按钮的单击事件的部分代码,请按以下要求 补充设计。 (1

admin2019-04-13  35

问题  在考生文件夹下有一个数据库文件“samp3.accdb”,其中存在已经设计好的表对  象“tEmp”、查询对象“qEmp”和窗体对象  “fEmp”。同时,给出窗体对象“fEmp”上两个  按钮的单击事件的部分代码,请按以下要求  补充设计。
    (1)将窗体“fEmp”上名称为“tSS”的文本框控件改为组合框控件,控件名称不变,标签标题不变。设置组合框控件的相关属性,以实现从下拉列表中选择输入性别值“男”和“女”。
    (2)将查询对象“qEmp”改为参数查询,参数为窗体对象“fEmp”上组合框“tSS”中的输入值。
    (3)将窗体对象“fEmp”中名称为“tPa”的文本框控件设置为计算控件。
    要求依据“党员否”字段值显示相应内容。如果“党员否”字段值为True,显示“党员”;如果“党员否”字段值为False,显示“非党员”。
    (4)在窗体对象“fEmp”上有“刷新”和“退出”两个命令按钮,名称分别为“btl”和“bt2”。单击“刷新”按钮,窗体记录源改为查询对象“qEmp”;单击“退出”按钮,关闭窗体。现已编写了部分VBA代码,请按照VBA代码中的指示将代码补充完整。
注意:不能修改数据库中的表对象“tEmp”;不能修改查询对象“qEmp”中未涉及的内容;不能修改窗体对象“fEmp”中未涉及的控件和属性。程序代码只允许在“* ** * Add * * * * *”与“* * * * *Add** * * *”之间的空行内补充一行语句、完成设计,不允许增删和修改其他位置已存在的语句。

选项

答案 (1)【操作步骤】 步骤1:选中“窗体”对象,右键单击“fEmp”选择“设计视图”。 步骤2:右键单击“性别”标签右侧的“未绑定”文本框选择“更改为l组合框",再右键单击该控件选择“属性”,打开属性表,在“数据”选项卡的“行来源类型”列选择“值列表”,在“行来源”列输入“男;女”。 步骤3:按Ctrl+S键保存修改,关闭设计视图。 (2)【操作步骤】 步骤1:选中“查询”对象,右键单击“qEmp”选择“设计视图”。 步骤2:双击”性别”字段,在“性别”字段的“条件”行输入“[forms]![fEmp]![tSS]”,取消该字段的显示。 步骤3:按Ctrl+S键保存修改,关闭设计视图。 (3)【操作步骤】 在窗体“fEmp”的设计视图中,右键单击文本框“tPa”选择“属性”,在“数据”选项卡中的“控件来源”行输入“=IIf([党员否]=True,”党员”,”非党员”)”,关闭属性表。 (4)【操作步骤】 步骤1:右键单击命令按钮“刷新”选择“事件生成器”,空行内输入代码: ’* * * * * Addl * * * * * Form.RecordSource="qEmp" ’* * * * * Addl* * * * *关闭界面。 步骤2:右键单击命令按钮“退出”选择“事件生成器”,空行内输入“代码” ’* * * * *Add2* * * * * DOCmd.Close ’* * * * * Add2 * * * * * 关闭界面。按Ctrl+S键保存修改,关闭设计视图。

解析
转载请注明原文地址:https://kaotiyun.com/show/CU0p777K
0

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