考生文件夹下存在一个数据库文件“samp3.aecdb”,里面已经设计好表对象“tCollect”,查询对象“qT”,同时还设计出以“tCollect”为数据源的窗体对象“fCollect”。试在此基础上按照以下要求补充窗体设计: (1)将窗体“f

admin2015-08-20  20

问题  考生文件夹下存在一个数据库文件“samp3.aecdb”,里面已经设计好表对象“tCollect”,查询对象“qT”,同时还设计出以“tCollect”为数据源的窗体对象“fCollect”。试在此基础上按照以下要求补充窗体设计:
    (1)将窗体“fCollect”的记录源改为查询对象“qT”。
    (2)在窗体“fCollect”的窗体页眉节区位置添加一个标签控件,其名称为“bTitle”,标题显示为“CD明细”,字体名称为“黑体”,字号大小为20,字体粗细为“加粗”。
    (3)将窗体标题栏上的显示文字设为“CD明细显示”。
    (4)在窗体页脚节区位置添加一个命令按钮,命名为“bC”,按钮标题为“改变颜色”。
    (5)设置所建命令按钮bC的单击事件,使用户单击该命令按钮后,CDID标签的显示颜色改为红色。要求用VBA代码实现。
    注意:不允许修改窗体对象“fCollect”中未涉及的控件和属性;不允许修改表对象“tCollect”和查询对象“qT”。

选项

答案(1)步骤1:打开“samp3.accdb”数据库,在【开始】功能区的“窗体”面板中右击“fCollect”窗体,选择“设计视图”快捷菜单命令,打开fCollect的设计视图。 步骤2:在“fCollect”窗体空白处右键单击,在快捷菜单中选择“属性”命令,在【属性表】对话框左上角的下拉列表中选择“窗体”,将在“记录源”所在行修改为:qT。 步骤3:单击快速访问工具栏中的“保存”按钮保存设置。 (2)步骤1:在“fCollect”窗体视图下,右键单击窗体空白处,选择“窗体页眉/页脚”快捷菜单命令,单击【控件】分组中的”标签”控件,在窗体页眉节区单击鼠标,在光标闪动处输入:CD明细。 步骤2:选中新增加的标签,在【属性表】对话框中修改“名称”为:bTitle,修改“字体名称”为:黑体,修改“字号大小”为:20,修改“字体粗细”为:加粗。 步骤3:关闭对话框,单击快速访问工具栏中的“保存”按钮保存设计 (3)步骤1:在【属性表】对话框的左上角的下拉列表单击选择“窗体”。将“标题”属性设为:CD明细显不。 步骤2:单击快速访问工具栏中的“保存”按钮保存设置。 (4)步骤1:在“fCollect”窗体设计视图中,单击【控件】分组中的“按钮”控件,在窗体的页脚节区内单击,单击“取消”按钮,取消【查阅向导】对话框,添加一个命令按钮。 步骤2:选中命令按钮,在【属性表】对话框中将“标题”设置为:改变颜色,“名称”设置为:bC。 步骤3:单击快速访问工具栏中的“保存”按钮保存设置。 (5)步骤1:右键单击“改变颜色”按钮,选择“事件生成器”命令,在VBA窗口的“Private Sub bC Click()”和“End Sub”之间添加代码:CDID标签.ForeColor=255。 步骤2:单击快速访问工具栏中的“保存”按钮,保存编写的代码。

解析
转载请注明原文地址:https://kaotiyun.com/show/VHgp777K
0

最新回复(0)