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

admin2017-02-21  34

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

选项

答案【操作步骤】 步骤1:右键单击命令按钮“刷新”,从弹出的快捷菜单中选择“事件生成器”命令,在弹出的对话框中选择“代码生成器”,进入编程环境,在空行输入以下代码: *****Add1***** Form. RecordSource="qEmp" *****Add1***** 关闭界面。 步骤2:右键单击命令按钮“退出”,从弹出的快捷菜单中选择“事件生成器”命令,在弹出的对话框中选择“代码生成器”,进入编程环境,在空行内输入以下代码: *****Add2***** DoCmd.Close *****Add2***** 关闭界面。 步骤3:按Ctrl+S保存修改,关闭设计视图。 添加代码时要选择正确的函数类型。

解析 窗体中文本框、命令按钮、组合框控件属性和查询的设置等。第1、3小题在窗体的设计视图中通过用鼠标右键单击该控件,从弹出的快捷菜单中选择“属性”命令,设置属性;第2小题在查询设计视图中设置参数;第4小题直接用鼠标右键单击控件,从弹出的快捷菜单中选择“事件生成器”命令,输入代码。
转载请注明原文地址:https://kaotiyun.com/show/orBD777K
0

随机试题
最新回复(0)