2011年3月等级考试VBA操作题参考答案.pdfVIP

等级考试中的vba操作题 操作说明：不允许修改窗体等对象中未涉及的控件、属性；程序代码只允许在 “**********”与“**********”之间的空行内补充一行语句、完成设计，不允许增删 和修改其它位置已存在的语句。 要求：打开窗体，查看代码的实际效果。 1. 数据库：samp01.mdb 实现功能： 单击“刷新”按钮（名为“bt1”），在事件过程中补充语句，动态设置窗体记录 源为查询对象“qEmp”，并刷新窗体记录，实现窗体数据按性别条件动态显示退休 职工的信息；单击“退出”按钮（名为“bt2”），关闭窗体。 参考答案： 2. 数据库：samp02.mdb 实现功能： 在窗体中有一个“显示全部记录”命令按钮（名称为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的整数值”。  输入1时，相关代码关闭窗体（或程序）。  输入2时，相关代码实现预览输出报表对象“rEmp” 。  输入=3时，相关代码调用宏对象“mEmp” 以打开数据表“tEmp” 。 7. 数据库：samp07.mdb 实现功能： fEdit窗体运行后，在窗体右侧显示可以修改的用户名、密码等内容的列表，同时 在窗体左侧显示列表中所指用户的信息。另外，在窗体中还有“修改”、“保存”和“退 出”三个命令按钮，名称分别为“CmdEdit”、“CmdSave”和“cmdquit”。  当单击“修改”按钮后，在窗体左侧显示出该窗体右侧光标所指用户的口令信息， 同时“保存”按钮变为可用；  在“ 口令”和“确认口令”文本框中输入口令信息后，单击“保存”按钮，若在两个 文本框中输入的信息相同，则保存修改后的信息，并先将“保存”命令按钮变为 不可用，再将除用户名外的其他文本框控件和标签控件全部隐藏，最后将用户 名以只读方式显示；  若在两个文本框中输入的信息不同，则显示提示框，显示内容为“请重新输入口 令！”，提示框中只有一个“确定”按钮。  单击窗体上的“退出”按钮，关闭当前窗体。 8. 数据库：samp08.mdb 实