综合应用：

　　考生文件夹下存在一个数据库文件"samp3.mdb"，里面已经设计了表对象"tEmp"、窗体对象"fEmp"、报表对象"rEmp" 和宏对象"mEmp"。试在此基础上按照以下要求补充设计：

　　（1）设置表对象"tEmp"中"聘用时间"字段的有效性规则为：2006年9月30日（含）以前的时间、相应有效性文本设置为"输入二零零六年九月以前的日期"；

　　（2）设置报表"rEmp"按照"年龄"字段降序排列输出；将报表页面页脚区域内名为"tPage"的文本框控件设置为"页码-总页数"形式的页码显示（如1-15、2-15、...）；

　　（3）将"fEmp"窗体上名为"bTitle"的标签宽度设置为5厘米、高度设置为1厘米，设置其标题为"数据信息输出"并居中显示；

　　（4）"fEmp"窗体上单击"输出"命令按钮（名为"btnP"），实现以下功能：计算Fibonacci数列第19项的值，将结果显示在窗体上名为"tData"的文本框内并输出到外部文件保存；单击"打开表"命令按钮（名为"btnQ"），调用宏对象"mEmp"以打开数据表"tEmp"。

　　Fibonacci数列：

　　调试完毕，必须点击"输出"命令按钮生成外部文件，才能得分。

　　试根据上述功能要求，对已给的命令按钮事件过程进行补充和完善。

　　注意：不允许修改数据库中的宏对象"mEmp"；不允许修改窗体对象"fEmp"和报表对象"rEmp"中未涉及的控件和属性；不允许修改表对象"tEmp"中未涉及的字段和属性；已给事件过程，只允许在"*****Add*****"与"****Add******"之间的空行内补充语句、完成设计，不允许增删和修改其它位置已存在的语句。

　　综合应用：

　　本题主要考的是数据表有效性规则的设置、窗体的设计、报表的设计、VBA的数据库编程。

　　本题解题思路如下：

　　（1）打开考生文件夹下的"samp3.mdb"数据库。

　　（2）选中表对象"tEmp"，点击"设计(D)"按钮，选中"聘用时间"字段，再选中下面的"有效性规则"，在"有效性规则"右边的框中输入"<=#2006-9-30#"，然后在"有效性文本"右边的框中直接输入"输入二零零六年九月以前的日期"，然后保存该表。

　　（3）选中报表对象"rEmp"，选择"设计(D)"，再选择"视图"菜单中的"排序与分组"，在弹出的对话框中选择"年龄"字段，排序次序选择"降序"。选中页面页脚区的"tPage"文本框控件，在文本框中输入"= & "-" & [Pages]"，然后保存该报表。

　　（4）打开窗体对象"fEmp"的设计视图，选中"bTitle"标签，右击鼠标选择属性，设置其"宽度"为"5厘米"，"高度"为"1厘米"，"标题"为"数据信息输出"，文本对齐为"居中"。"输出"命令按钮单击事件的第1处需要定义19个变量的数组，语句为Dim f(19) As Integer，第2处是For循环体，循环体是计算Fibonacci数列第19项的值，语句为f(i)=f(i-1)+f(i-2)，第3处是将计算结果显示在窗体上名为"tData"的文本框内，语句为tData=f(19)。

　　（5）选中"打开表"命令按钮（名为"btnQ"），点击工具栏上的"属性"按钮，设置这个命令按钮的单击属性为"mEmp"，然后保存该窗体。