问答题
考生文件夹下有一个数据库文件"samp3.mdb"，其中存在已经设计好的表对象"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：选中"窗体"对象，右键单击"fCollect"选择【设计视图】。 步骤2：右键单击"窗体选择器"选择【属性】，在"记录源"行右侧下拉列表中选中"qT"，关闭属性界面。 (2)【操作步骤】 步骤1：选中工具箱中"标签"控件按钮
，单击窗体页眉处，然后输入"CD明细"，单击窗体任一点。 步骤2：右键单击"CD明细"标签选择【属性】，在"名称"行输入"bTitle"，分别在"字体名称"，"字号"和"字体粗细"行右侧下拉列表中选中"黑体"、"20"和"加粗"，关闭属性界面。 (3)【操作步骤】 步骤1：右键单击"窗体选择器"选择【属性】。 步骤2：在"标题"行输入"CD明细显示"，关闭属性界面。 (4)【操作步骤】 步骤1：选中工具栏"命令按钮"控件
，单击窗体页脚节区适当位置，弹出一对话框，单击"取消"按钮。 步骤2：右键单击该命令按钮选择【属性】，在"全部"选项卡，在"名称"和"标题"行输入"bC"和"改变颜色"。 (5)【操作步骤】 步骤1：右键单击命令按钮"bC"选择【事件生成器】，从弹出的"选择生成器"对话框中选择"代码生成器",在空行内输入代码"CDID_标签.ForeColor = vbRed"，关闭界面。 步骤2：单击工具栏中"保存"按钮
，单击窗体页眉处，然后输入"CD明细"，单击窗体任一点。 步骤2：右键单击"CD明细"标签选择【属性】，在"名称"行输入"bTitle"，分别在"字体名称"，"字号"和"字体粗细"行右侧下拉列表中选中"黑体"、"20"和"加粗"，关闭属性界面。 (3)【操作步骤】 步骤1：右键单击"窗体选择器"选择【属性】。 步骤2：在"标题"行输入"CD明细显示"，关闭属性界面。 (4)【操作步骤】 步骤1：选中工具栏"命令按钮"控件，单击窗体页脚节区适当位置，弹出一对话框，单击"取消"按钮。 步骤2：右键单击该命令按钮选择【属性】，在"全部"选项卡，在"名称"和"标题"行输入"bC"和"改变颜色"。 (5)【操作步骤】 步骤1：右键单击命令按钮"bC"选择【事件生成器】，从弹出的"选择生成器"对话框中选择"代码生成器",在空行内输入代码"CDID_标签.ForeColor = vbRed"，关闭界面。 步骤2：单击工具栏中"保存"按钮【答案解析】解析：第1、2小题在设计视图中添加控件，并右键单击控件选择【属性】，设置属性；第3、4小题直接右键单击控件选择【属性】，设置属性。