在考生文件夹下有一个数据库文件“samp3.mdb”,其中有已经设计好表对象“tBorrow”、“tReader”和“tRook,查询对象“qT”,窗体对象“fReader”,报表对象“rReader”和宏对象“rpt”。请在此基础上按以下要求补充设计。
窗体加载时设置窗体标题属性为系统当前日期。窗体“加载”事件的代码已提供,请补充完整。
注意:不允许修改窗体对象“fReader”中未涉及的控件和属性;不允许修改表对象“tBorrow”、“tReader”和“tBook”及查询对象“qT”;不允许修改报表对象“rReader”的控件和属性。
只能在“*****Add*****”与“*****Add*****”之间的空行内补充一行语句,完成设计,不允许增删和修改其他位置已存在的语句。
参考答案:
[微步骤]
打开设计视图,单击工具栏中的“生成器”按钮,从弹出的对话框中单击“代码生成器”,打开编程环境,在空行位置输入以下代码。
Fom Caption=Date,使整个位置如下所示。
’*****Add*****
Form.Caption=Date
’*****Add*****
关闭界面。单击工具栏中的“保存”按钮
,关闭设计视图。
解析:
本题关键字有:在报表中添加标签框控件及设置文本框属性;在窗体中添加命令按钮控件并设置其属性;宏命令的重命名等。
第(1)、(4)小题分别在报表和窗体的设计视图中添加控件,并用鼠标右击刚添加的控件,选择“属性”命令,对其属性进行设置;第(2)小题可直接用鼠标右击“窗体选择器”,在弹出的快捷菜单中单击“事件生成器”命令,输入相关代码;第(3)小题用鼠标右击宏的名称,从弹出的快捷菜单中单击“重命名”命令;第(S)小题用鼠标右击“窗体选择器”,在弹出的快捷菜单中单击“事件生成器”命令,输入相应代码。