在考生文件夹下有一个数据库文件“samp3.mdb”,里面已经设计好表对象“tBorrow”、“tReader”和“tBook”,查询对象“qT”,窗体对象“fReader”,报表对象“rReader”和宏对象“rpt”。请在此基础上按以下要求补充设计。

admin2013-11-19  28

问题 在考生文件夹下有一个数据库文件“samp3.mdb”,里面已经设计好表对象“tBorrow”、“tReader”和“tBook”,查询对象“qT”,窗体对象“fReader”,报表对象“rReader”和宏对象“rpt”。请在此基础上按以下要求补充设计。
    (1)在报表的报表页眉节区内添加一个标签控件,其名称为“bTitle”,标题显示为“读者借阅情况浏览”,字体名称为“黑体”,字体大小为22,同时将其安排在距上边0.5厘米、距左侧2厘米的位置上。
    (2)设计报表“rReader”的主体节区内“tSex”文本框控件依据报表记录源的“性别”字段值来显示信息。
    (3)将宏对象“rpt”改名为“mReader”。
    (4)在窗体对象“fReader”的窗体页脚节区内添加一个命令按钮,命名为“bList”,按钮标题为“显示借书信息”,其单击事件属性设置为宏对象“mReader”。
    (5)窗体加载时设置窗体标题属性为系统当前日期。窗体“加载”事件的代码已提供,请补充完整。
    注意:不允许修改窗体对象“fReader”中未涉及的控件和属性;不允许修改表对象“tBorrow”、“tReader”和“tBook”及查询对象“qT”;不允许修改报表对象“rReader”的控件和属性。
    程序代码只能在“*****Add*****”与“*****Add******”之间的空行内补充一行
语句,完成设计,不允许增、删和修改其他位置已存在的语句。
  Option Compare Database
  Private Sub Form_Load()
   设置窗体标题为当前日期
    *****Add*****
    *****Add*****
End Sub

选项

答案(1)[操作步骤] 步骤1:选中“报表”对象,右键单击“rReader”选择“设计视图”命令,弹出报表设计视图。 步骤2:选中工具箱中“标签”控件按钮[*],单击报表页眉处,然后输入“读者借阅情况浏览”。单击设计视图任意处,再右键单击该标签,从弹出的快捷菜单中选择“属性”命令,弹出标签属性对话框。 步骤3:选中“全部”选项卡,在“名称”行输入“bTitle”。 步骤4:单击“格式”选项卡,分别在“字体名称”和“字号”行右侧下拉列表中选中“黑体”和“22”,分别在“左边距”和“上边距”行输入“2cm”和“0.5cm”,关闭对话框。单击工具栏中“保存”按钮[*]。 (2)[操作步骤] 步骤1:右键单击文本框“tSex”,从弹出的快捷菜单中选择“属性”命令。 步骤2:在“控件来源”行右侧下拉列表中选中“性别”,关闭属性界面。 步骤3:单击工具栏中“保存”按钮[*],关闭设计视图。 (3)[操作步骤] 步骤l:选中“宏”对象,右键单击“rpt”,从弹出的快捷菜单中选择“重命名”命令。 步骤2:在光标处输入“mReader”。 (4)[操作步骤] 步骤1:选中“窗体”对象,右键单击“fReader”,从弹出的快捷菜单中选择“设计视图”命令。 步骤2:选中工具栏“命令按钮”控件[*],单击窗体页脚节区适当位置,弹出一对话框,单击“取消”按钮。 步骤3:右键单击该命令按钮选择“属性”命令,单击“全部”选项卡,在“名称”和“标题”行输入“bList”和“显示借书信息”。 步骤4:单击“事件”选项卡,在“单击”行右侧下拉列表中选中“mReader”,关闭属性界面。 (5)[操作步骤] 在设计视图中右键单击“窗体选择器”,在弹出的快捷菜单中选择“事件生成器”命令,在弹出对话框中选择“代码生成器”,进入编程环境,在空行内输入如下代码: *****Add***** Form.Caption=Date *****Add***** 关闭界面,单击工具栏中“保存”按钮[*],关闭设计视图。

解析 第1、4小题分别在报表和窗体设计视图中添加控件,并右键单击控件选择“属性”命令,对其设置属性;第3小题右键单击宏名选择“重命名”命令;第5小题直接右键单击“窗体选择器”选择“事件生成器”命令,在弹出的“选择生成器”对话框中选择“代码生成器””。进入编程环境,输入代码。
转载请注明原文地址:https://kaotiyun.com/show/owrp777K
0

最新回复(0)