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

admin2010-11-13  12

问题   考生文件夹下存在一个数据库文件“samp3.mdb”,里面已经设计了表对象“tEmp”、查询对象“qEmp”、窗体对象“fEmp”和宏对象“mEmp”。同时,给出窗体对象“fEmp”上一个按钮的单击事件代码,试按以下功能要求补充设计:
   功能:
    (1)将窗体“fEmp”上文本框“tSS”更改为组合框类型,保持控件名称不变。设置其相关属性实现下拉列表形式输入性别“男”和“女”。
    (2)将窗体对象“fEmp”上文本框“tPa”换为复选框类型控件,保持控件名称不变,然后设置控件来源属性以输出“党员否”字段值。
    (3)修正查询对象“qEmp”设计,增加退休人员(年龄>=55)的条件。
    (4)单击“刷新”按钮(名为“bt1”),在事件过程中补充语句,动态设置窗体记录源为查询对象“qEmp”,实现窗体数据按性别条件动态显示退休职工的信息;单击“退出”按钮(名为“bt2”),调用设计好的宏“mEmp”来关闭窗体。
    注意:不允许修改数据库中的表对象“tEmp”和宏对象“mEmp”;不允许修改查询对象“qEmp”中未涉及的属性和内容;不允许修改窗体对象“fEmp”中未涉及的控件和属性。
    程序代码只允许在“*****Add*****”与“*****Add*****”之间的空行内补充一行语句、完成设计,不允许增删和修改其他位置已存在的语句。

选项

答案【操作步骤】 (1)步骤1:打开“samp3.mdb”数据库窗口,选中“窗体”对象,右键单击“femp”,选择“设计视图”命令。 步骤2:右键单击文本框“tSS”,执行【更改为】→【组合框】快捷菜单命令,右键单击“tSS”后,选择“属性”菜单项,在“属性”对话框的“行来源类型”中选中“值列表”,在“数据”选项卡中“行来源”输入:”男”;”女”。 步骤3:单击工具栏中的“保存”按钮。 (2)步骤1:选中“tPa”控件,按下键盘上的键,将该控件删除。 步骤2:选中工具箱“复选框”控件,单击原“tPa”位置。选中“复选框标签”,按下<Del>键,将该标签删除。 步骤3:右键单击复选框按钮选择“属性”,在“名称”行输入“tPa”,在“控件来源”行右侧的下拉列表中选中“党员否”,关闭“属性”对话框。 (3)步骤1:选中“查询”对象,右键单击“qEmp”,选择“设计视图”命令。 步骤2:在“性别”下的“条件”栏中输入:[FonIls]![fEmp]![tSS],在“年龄”下的“条件”行中输入:>=55。 步骤3:单击“保存”按钮,关闭当前对话框。 (4)步骤l:打开窗体“femp”,选中“刷新”按钮,右键单击选择“事件生成器”命令,输入以下代码: ***** RecordSource=“qemp” ***** 步骤2:单击“退出”按钮,右键单击选择“事件发生器”命令,选择“宏生成器”,在宏中操作中输入:close。 步骤3:单击工具栏中的“保存”按钮,关闭设计视图。 步骤4:运行该窗体,查看运行结果。

解析 本题考点:窗体中标签、命令按钮控件属性的设置;查询的设置;宏操作,VBA编程。
转载请注明原文地址:https://jikaoti.com/ti/umXiFFFM
0

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