Access数据库程序设计

考试试题

[问答题]考生文件夹下存在一个数据库文件"samp3.mdb"。"samp3.mdb"数据库里面已经设计了表对象"tEmp"和"tGroup"、窗体对象"fEmp"、报表对象"rEmp"和宏对象"mEmp"。试在此基础上按照以下要求补充设计:(1)设置报表"rEmp"的相关属性,使其显示年龄小于30岁(不含30)、职务为"职员"的女职工记录。设置报表主体节区内"tName"文本框控件的显示内容为"姓名"字段值。(2)将报表"rEmp"主体节区内文本框"tDept"的控件来源属性设置为计算控件。要求该控件可以根据报表数据源中的"所属部门"字段值,从非数据源表对象"tGroup"中检索出对应的部门名称并显示输出。在适当位置增加一个计算控件(命名为tAvg),计算并显示每个部门的平均年龄。说明:适当位置是指组页脚、页面页脚或报表页脚。   提示:考虑使用Dlookup函数。   (3)设置窗体"fEmp"的窗体标题为"职员基本情况查询";将宏"mEmp"重命名为自动执行的宏。(4)在"fEmp"窗体的窗体页眉节上有一个文本框(名为"txtName")和一个命令按钮(名为"cmdQuery")。在文本框中输入职员姓名后,单击"cmdQuery"命令按钮,调用事件代码将依据输入的姓名在"tEmp"表中进行查找,并将找到的信息添加到主体节相应文本框中,如果没有找到将显示提示信息"对不起,没有这个职员!";如果在"txtName"文本框中未输入姓名,单击"cmdQuery"命令按钮后,将显示提示信息"对不起,未输入职员姓名,请输入!"。根据上述功能描述,按照VBA代码指示,将代码补充完整。  注意:不允许修改数据库中的表对象"tEmp"和"tGroup";不允许修改宏对象"mEmp"里的内容;不允许修改窗体对象"fEmp"和报表对象"rEmp"中未涉及的控件和属性。已给事件过程,只允许在"*****Add*****"与"*****Add*****"之间的空行内补充一条语句、完成设计,不允许增删和修改其它位置已存在的语句。
[问答题]考生文件夹下存在一个数据库文件“samp3.accdb”,里面已经设计好表对象“tCollect”,同时还设计出以“tCollect”为数据源的窗体对象“fCollect”。 试在此基础上按照以下要求补充窗体设计:(1)将窗体“fCollect”的记录源设置为根据输入的“CDID”,查找“CDID”、“主题名称”、“价格”、“购买日期”、“出版单位ID”和“介绍”等字段的数据。注意:输入提示参数为“请输入CDID:”。(2)在窗体“fCollect”的窗体页眉节区位置添加一个标签控件,其名称为“bTitle”,标题显示为“CD明细”,字体名称为“黑体”,字号为14,字体粗细为“加粗”。(3)打开窗体时,将窗体标题栏上的显示文字设为“CD明细显示”,请按照VBA代码中的指示将代码补充完整。要求:①显示文字中的“CD明细”使用“bTitle”标签控件的内容。      ②将程序代码填写在“*******Add******”与“*******Add******”之间的空行内,只允许补充一行语句。(4)在窗体页脚节区位置添加一个命令按钮,命名为“bC”,按钮标题为“改变颜色”;设置所建命令按钮bC的单击事件,使用户单击该命令按钮后,将标签“CDID_标签”的文字显示颜色改为红色。要求用VBA代码实现。注意:不允许修改窗体对象“fCollect”中未涉及的控件和属性;不允许修改表对象“tCollect”。
[问答题]考生文件夹下存在一个数据库文件“samp3.accdb”,里面已经设计好表对象“tEmployee”和“tGroup”及查询对象“qEmployee”,同时还设计出以“qEmployee”为数据源的报表对象“rEmployee”。试在此基础上按照以下要求补充报表设计:(1)在报表的报表页眉节区位置添加一个标签控件,其名称为“bTitle”,标题显示为“职工基本信息表”。(2)预览报表时,报表标题显示标签控件“bTitle”的内容,请按照VBA代码中的指示将代码补充完整。(3)在“性别”字段标题对应的报表主体节区距上边0.1厘米、距左侧5.2厘米位置添加一个文本框,显示出“性别”字段值,并命名为“tSex”; 在报表适当位置添加一个文本框,计算并显示每类职务的平均年龄,文本框名为tAvg。注意:报表适当位置是指报表页脚、页面页脚或组页脚。(4)设置报表主体节区内文本框“tDept”的控件来源属性为计算控件。要求该控件可以根据报表数据源里的“所属部门”字段值,从非数据源表对象“tGroup”中检索出对应的部门名称并显示输出。(提示:考虑域聚合函数的使用。)注意:不允许修改数据库中的表对象“tEmployee” 和“tGroup”及查询对象“qEmployee”;不允许修改报表对象“qEmployee”中未涉及的控件和属性。程序代码只允许在“*******Add******”与“*******Add******”之间的空行内补充一行语句、完成设计,不允许增删和修改其它位置已存在的语句。
[问答题]考生文件夹下存在一个数据库文件"samp3.mdb",里面已经设计好表对象"tStudent",同时还设计出窗体对象"fQuery"、"fStudent"和"fCount"。请在此基础上按照以下要求补充"fQuery"和"fCount"窗体的设计: (1)加载"fQuery"时重置窗体标题改为"显示查询信息",将窗体中"退出"命令按钮(名称为"命令7")上显示的文字颜色自动改为红色(红色值为255),字体粗细改为"加粗"(加粗值为700)。 请按照VBA代码中的指示将实现此功能的代码补充完整。  (2)在"fQuery"窗体距主体节上边0.4厘米、左边0.4厘米位置添加一个矩形控件,其名称为"rRim";矩形宽度为16.6厘米、高度为1.2厘米、特殊效果为"凿痕"。将窗体边框改为"对话框边框"样式,取消窗体中的水平和垂直滚动条、记录选择器、导航按钮和分隔线。(3)在"fQuery"窗体中有一个"显示全部记录"命令按钮(名称为bList),单击该按钮后,应实现将"tStudent"表中的全部记录显示出来的功能。现已编写了部分VBA代码,请按照VBA代码中的指示将代码补充完整。要求:修改后运行该窗体,并查看修改结果。  (4)在"fCount"窗体中有两个列表框、一个文本框和一个命令按钮,名称分别为"List0"、"List1"、"tData"和"Cmd"。在"tData"文本框中输入一个数,单击"Cmd"按钮,程序将判断输入的值是奇数还是偶数,如果是奇数将填入"List0"列表中,否则填入"List1"列表中。根据以上描述,请按照VBA代码中的指示将代码补充完整。注意:不允许修改窗体对象"fQuery"、"fStudent"和"fCount"中未涉及的控件、属性;不允许修改表对象"tStudent"。程序代码只允许在"***** Add *****"与"***** Add *****"之间的空行内补充一行语句、完成设计,不允许增删和修改其它位置已存在的语句。