等级考试中的vba操作题
操作说明：不允许修改窗体等对象中未涉及的控件、属性；程序代码只允许在“**********”与“**********”之间的空行内补充一行语句、完成设计，不允许增删和修改其它位置已存在的语句。
要求：打开窗体，查看代码的实际效果。
1.
数据库：samp01.mdb
实现功能：
单击“刷新”按钮（名为“bt1”），在事件过程中补充语句，动态设置窗体记录源为查询对象“qEmp”，并刷新窗体记录，实现窗体数据按性别条件动态显示退休职工的信息；单击“退出”按钮（名为“bt2”），关闭窗体。
参考答案：

2.
数据库：samp02.mdb
实现功能：
在窗体中有一个“显示全部记录”textbox控件边框设置命令按钮（名称为bList），单击该按钮后，应实现将“tStudent”表中的全部记录显示出来的功能。现已编写了部分VBA代码，请按照VBA代码中的指示将代码补充完整。
3.
数据库：samp03.mdb
实现功能：
窗体加载时设置窗体标题属性为系统当前日期。
单击“显示借书信息”按钮（名称为blist），以打印预览方式打开报表“rReader”。
Me.Caption = date()
Docmd.Openreport  “rReader”,acviewpreview

4.
数据库：samp04.mdb
实现功能：
在窗体对象“fEmp”上有“刷新”和“退出”两个命令按钮，名称分别为“bt1”和“bt2”。单击“刷新”按钮，窗体记录源改为查询对象“qEmp”；单击“退出”按钮，关闭窗体。
5.
数据库：samp05.mdb
实现功能：
窗体加载时，将标签”Tda”的标题设置为系统当前日期。
单击“显示雇员情况”按钮（名称为blist），运行宏“m1”

6.
数据库：samp06.mdb
实现功能：
在“fEmp”窗体上单击“输出”命令按钮（名为“btnP”），弹出一输入对话框，其提示文本为“请输入大于0的整数值”。

版权声明：本站内容均来自互联网，仅供演示用，请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198，我们将在24小时内删除。