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

admin2019-08-20  30

问题     考生文件夹下存在一个数据库文件“samp3.accdb”,里面已经设计好表对象“tCollect”,同时还设计出以“tCollect”为数据源的窗体对象“tCollect”。试在此基础上按照以下要求补充窗体设计:
    (1)将窗体“tCollect”的记录源设置为根据输入的“CDID”,查找“CDID”、“主题名称”、“价格”、“购买日期”、“出版单位ID”和“介绍”等字段的数据。
    注意:输入提示参数为“请输入CDID:”。
    (2)在窗体“tCollect”的窗体页眉节区位置添加一个标签控件,其名称为“bTitle”,标题显示为“CD明细”,字体名称为“黑体”,字号为14,字体粗细为“加粗”。
    (3)打开窗体时,将窗体标题栏上的显示文字设为“CD明细显示”,请按照VBA代码中的指示将代码补充完整。
    要球:①显示文字中的“cD明细”使用“bTitle”标签控件的内容。②将程序代码填写在“* * * * * * *Add * * * * * *”与“* * * * * * *Add * * * * * *”之间的空行内,只允许补充一行语句。
    (4)在窗体页脚节区位置添加一个命令按钮,命名为“bC”,按钮标题为“改变颜色”;设置所建命令按钮bC的单击事件,使用户单击该命令按钮后,将标签“CDID_标签”的文字显示颜色改为红色。要求用VBA代码实现。
注意:不允许修改窗体对象“tCollect”中未涉及的控件和属性;不允许修改表对象“tCollect”。

选项

答案本题考点:窗体控件以及记录源属性的设置和窗体事件代码VBA编程的实现。 第1、2小题单击窗体的设计视图按题目要求设置相关属性,第3、4小题单击“设计”选项卡“工具”组中的“查看代码”按钮进入VBA代码编辑界面。 (1)【操作步骤】 步骤l:打开考生文件夹下的数据库文件samp3.accdb,右键单击“tCdlect”窗体,在弹出的快捷菜单中选择“设计视图”命令。 步骤2:单击“设计”选项卡下“工具”功能组中的“属性表”按钮,在弹出的“属性表”对话框中单击“数据”选项卡,在“记录源”行中输入表达式“SELECT * FROM tCollect wHERE(((tCollect.[CDID])=[请输入CDID:]))”。 步骤3:按Ctrl+S组合键保存修改,关闭“属性表”对话框。 (2)【操作步骤】 步骤l:右键单击窗体的“主节”区,在弹出的快捷菜单中选择“窗体页眉/页脚”命令。 步骤2:单击“设计”选项卡下“控件”功能组中的“标签”控件,在“窗体页眉”区域内拖动,产生一个标签控件。 步骤3:在“标签”控件中输入“CD明细”,右键单击该“标签”控件,在弹出的快捷菜单中选择“属性”命令,在弹出“属性表”对话框中单击“全部”选项卡,在“名称”行中输入“bTitie”,在“字体名称”行中选择“黑体”;在“字号”行中选择“14”;在“字体粗细”行中选择“加粗”。 步骤4:按Ctrl+S组合键保存修改,关闭“属性表”对话框。 (3)【操作步骤】 步骤1:单击“设计”选项卡下“工具”功能组中的“查看代码”按钮进入VBA代码编辑界面。 步骤2:在“ * * * * Add * * * *”行之间添加代码“Me.Caption=bTitle.Caption&“显示””。 步骤3:按Ctrl+S组合键保存修改,关闭VBA代码编辑器。 (4)【操作步骤】 步骤1:单击“设计”选项卡下“控件”功能组中的“按钮”控件,在“窗体页脚”区域内拖动,产生一个按钮控件。 步骤2:右键单击该按钮控件,在弹出的快捷菜单中选择“属性”命令,弹出“属性表”对话框中单击“全部”选项卡,在“名称”行中输入“bC”,在“标题”行中输入“改变颜色”。 步骤3:单击“事件”选项卡,单击“单击”属性最右侧,在弹出“选择生成器”对话框中选择“代码生成器”,单击“确定”按钮,进入VBA代码编辑界面。 步骤4:在“bC_Click”事件过程中添加如下代码:“CDID_标签.ForeColor=255”。 步骤5:按Ctrl+S组合键保存修改,关闭VBA代码编辑器。

解析
转载请注明原文地址:https://jikaoti.com/ti/EZ5iFFFM
0

最新回复(0)