在考生文件夹下有一个数据库文件“samp3. accdb”,里面已经设计了表对象“tEmp”、窗体对象“fEmp”、报表对象“rEmp”和宏对象“mEmp”。请在此基础上按照以下要求补充设计: “fEmp”窗体上单击“输出”命令按钮(名为“btnP”),

admin2017-02-21  34

问题 在考生文件夹下有一个数据库文件“samp3. accdb”,里面已经设计了表对象“tEmp”、窗体对象“fEmp”、报表对象“rEmp”和宏对象“mEmp”。请在此基础上按照以下要求补充设计:
“fEmp”窗体上单击“输出”命令按钮(名为“btnP”),实现以下功能:计算Fibonacci数列第19项的值,将结果显示在窗体上名为“tData”的文本框内并输出到外部文件保存;单击“打开表”命令按钮(名为 “btnQ”),调用宏对象“mEmp”以打开数据表“tEmp”。
    Fibonacci数列:
    F1 =1    n=1
    F2 =1    n=2
    Fn=Fn—1+Fn—2   n> =3
    调试完毕后,必须点击“输出”命令按钮生成外部文件,才能得分。
    试根据上述功能要求,对已给的命令按钮事件进行补充和完善。
    注意:不要修改数据库中的宏对象“mEmp”;不要修改窗体对象“fEmp”和报表对象“rEmp”中未涉及的控件和属性;不要修改表对象“tEmp”中未涉及的字段和属性。
    程序代码只允许在“*****Add*****”与“*****Add*****”之间的空行内补充一行语句、完成设计,不允许增删和修改其他位置已存在的语句。

选项

答案步骤1:右键单击命令按钮“输出”,从弹出的快捷菜单中选择“事件生成器”命令,在弹出的对话框中选择“代码生成器”,进入编程环境,在空行内输入以下代码: *****Addl***** Dim f(19)As Integer *****Add1***** *****Add2***** f(i)=f(i —1)+f(i —2) *****Add2***** *****Add3***** tData=f(19) *****Add3***** 关闭界面。 步骤2:按Ctrl+S保存修改,关闭设计视图。 设置代码要注意代码的格式及选择正确的函数。

解析 表中字段属性有效性规则的设置;窗体命令按钮控件和报表文本框控件属性的设置等。第1小题在设计视图中设置字段属性;第2、3小题分别通过在窗体和报表设计视图用鼠标右键单击该控件,从弹出的快捷菜单中选择“属性”命令,设置属性;第4小题通过直接用鼠标右键单击命令按钮,从弹出的快捷菜单中选择“事件生成器”命令,输入代码。
转载请注明原文地址:https://jikaoti.com/ti/9PXiFFFM
0

相关试题推荐
最新回复(0)