应用题
考生文件夹 在考生文件夹下存在一个数据库文件“samp3.accdb”，里面已经设计好表对象“tEmp”、窗体对象“fEmp.”、报表对象“rEmp”和宏对象“mEmp”。请按以下要求补充设计。
注意：不要修改数据库中的宏对象“mEmp”；不要修改窗体对象“fEmp”和报表对象“rEmp”中未涉及的控件和属性；不要修改表对象“tEmp”中未涉及的字段和属性。程序代码只允许在“'*****Add*****”与“'*****Add*****”之间的空行内补充一行语句完成设计，不允许增删和修改其他位置已存在的语句。
问答题
设置“tEmp”表中“聘用时间”字段的有效性规则为“2006年9月30日(含)以前的时间”，相应有效性文本设置为“输入二○○六年九月(含)以前的日期”。
【正确答案】[操作步骤] 步骤1：双击打开“samp3.accdb'数据库。选择“表”对象，右键单击“tEmp”表，从弹出的快捷菜单中选择“设计视图”命令，打开设计视图。 步骤2：单击“聘用时间”字段，在“字段属性”区的“有效性规则”行输入“＜=#2006-9-30#”，在“有效性文本”行输入“输入二○○六年九月(含)以前的日期”。 步骤3：按Ctrl+S键保存，关闭设计视图。
【答案解析】[考点] 本题考点：表中字段有效性规则和有效性文本的设置，报表排序操作，报表文本框控件属性的设置，窗体标签控件属性的设置，窗体命令按钮的单击事件。
问答题
设置“rEmp”报表按照“年龄”字段降序排列输出；将报表页面页脚区域内名为“tPage”的文本框控件设置为“页码-总页数”形式的页码显示(如1-15、2-15、……)。
【正确答案】[操作步骤] 步骤1：选择“报表”对象，右键单击“rEmp”报表，从弹出的快捷菜单中选择“设计视图”命令，打开设计视图。 步骤2：单击“报表设计工具|设计”选项卡下“分组和汇总”组中的“分组和排序”按钮，在屏幕下方的“分组、排序和汇总”界面中单击“添加排序”按钮，在“排序依据”下拉列表中选择“年龄”字段，选择“降序”，关闭界面。 步骤3：右键单击“tPage”，从弹出的快捷菜单中选择“属性”命令，弹出“属性表”对话框，在该对话框中单击“数据”选项卡，在“控件来源”行输入'=[Page]&'-'&[Pages]'。关闭属性表。 步骤4：按Ctrl+S键保存，关闭设计视图。
【答案解析】
问答题
将“fEmp，”窗体上“bTitle”标签的宽度设置为5cm，高度设置为1cm，设置其标题为“数据信息输出”并居中显示。
【正确答案】[操作步骤] 步骤1：选择“窗体”对象，右键单击“fEmp”窗体，从弹出的快捷菜单中选择“设计视图”命令，打开设计视图。 步骤2：右键单击“bTitle'标签控件，从弹出的快捷菜单中选择“属性”命令，弹出“属性表”对话框，在该对话框中单击“格式”选项卡，在“标题”行输入“数据信息输出”，在“宽度”和“高度”行分别输入“5cm”和“1cm”，并在“文本对齐”行右侧下拉列表中选择“居中”。关闭属性表。 步骤3：按Ctrl+S键保存，关闭设计视图。
【答案解析】
问答题
在“fEmp”窗体上单击“输出”命令按钮(名为“btnP”)，实现以下功能：计算Fibonacci数列第19项的值，将结果显示在窗体上“tData”文本框内，并输出到外部文件保存。
Fibonacci数列：
F
1=1 n=1
F
2=1 n=2
F
n=F
n-1+F
n-2 n＞=3
调试完毕后，必须点击“输出”命令按钮生成外部文件，才能得分。
试根据上述功能要求，对已给的命令按钮事件进行补充和完善。
【正确答案】[操作步骤] 步骤1：选择“窗体”对象，右键单击“fEmp”窗体，从弹出的快捷菜单中选择“设计视图”命令，打开设计视图。 步骤2：右键单击“输出”命令按钮，从弹出的快捷菜单中选择“事件生成器”命令，在弹出的对话框中选择“代码生成器”进入编程环境，在空行内输入以下代码： '*****Add1***** Dim f(19) As Integer '*****Add1***** '*****Add2***** f(i)=f(i-1)+f(i-2) '*****Add2***** '*****Add3***** tData=f(19) '*****Add3***** 步骤3：按Ctrl+S键保存，关闭VBA代码编辑区。 步骤4：按Ctrl+S键保存，关闭设计视图。 步骤5：选择“窗体”对象，双击打开“fEmp”窗体，单击“输出”按钮，生成外部文件。 易错提示：编写代码要注意代码的格式及选择正确的函数。
【答案解析】