计算机二操作必考题(操作题题库) 下载本文

第01套:

在考生文件夹下,“samp1.accdb”数据库文件中已建立表对象“tEmployee ”。试按以下操作要求,完成表的编辑:

(60-1)

(1) 分析“tEmployee”表的结构,判断并设置主键。

(2) 删除表中的“所属部门”字段;设置“年龄”字段的有效性规则为只能 输入大于16的数据。

(3) 在表结构中的“年龄”与“职务”两个字段之间增添一个新的字段:字 段名称为“党员否”,字段类型为“是/否”型;删除表中1999年5月聘 用、并具有“相声”爱好的女职工记录。

(4) 设置“职务”字段值的输入方式为从下拉列表中选择“职员”、“主管 ”或“经理”选项值。

(5) 设置“聘用时间”字段的相关属性,使该字段按照“XXXX/XX/XX”格式 输入。例如,2013/06/08。

(6) 将表中聘用时间超过30年(不含30年)的职工“职务”字段值更改为“ 退休”。

********************************************************************** 考生文件夹下存在一个数据库文件“samp2.accdb”,里面已经设计好表对 象“tStud”和“tTemp”。tStud表是学校历年来招收的学生名单,每名学生均 有身份证号。对于现在正在读书的“在校学生”,均有家长身份证号,对于已 经毕业的学生,家长身份证号为空。

( 26-2 )

例如,表中学生“张春节”没有家长身份证号,表示张春节已经从本校毕 业,是“校友”。

表中学生“李强”的家长身份证号为“110107196201012370”,表示李强 为在校学生。由于在tStud表中身份证号“110107196201012370”对应的学生姓 名是“李永飞”,表示李强的家长李永飞是本校校友。

“张天”的家长身份证号为“110108196510015760”,表示张天是在校学 生;由于在tStud表中身份证号“110108196510015760”没有对应的记录,表示 张天的家长不是本校的校友。 请按下列要求完成设计:

(1) 创建一个查询,要求显示在校学生的“身份证号”和“姓名”两列内容, 所建查询命名为“qT1”。

(2) 创建一个查询,要求按照身份证号码找出所有学生家长是本校校友的学生 记录。输出学生身份证号、姓名及家长姓名三列内容,标题显示为“身份 证号”、“姓名”和“家长姓名”,所建查询命名为“qT2”。

(3) 创建一个查询,统计数学成绩为100分的学生人数,标题显示为“num”, 所建查询命名为“qT3”。

要求:使用“身份证号”字段进行计数统计。

(4) 创建一个查询,将“tStud”表中总分成绩超过270分(含270)的学生信 息追加到空表“tTemp”中。其中,“tTemp”表的入学成绩为学生总分, 所建查询命名为“qT4”。

********************************************************************** 考生文件夹下存在一个数据库文件“samp3.mdb”,里面已经设计好表对象 “tStudent”,同时还设计出窗体对象“fQuery”、“fStudent”和“fCount” 。请在此基础上按照以下要求补充“fQuery”和“fCount”窗体的设计:

(70-3)

(1)加载“fQuery”时重置窗体标题改为“显示查询信息”,将窗体中“退出 ”命令按钮(名称为“cQuit”)上显示的文字颜色自动改为红色(红色 值为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 *****” 之间的空行内补充一行语句、完成设计,不允许增删和修改其它 位置已存在的语句。

※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※ 第02套:

在考生文件夹下,“samp1.accdb”数据库文件中已建立两个表对象“员工 表”和“部门表”。试按以下要求,完成表的各种操作:

(54-1)

(1)分析两个表对象“员工表”和“部门表”的构成,判断其中的外键属性, 将其字段名称作为“员工表”表属性中说明的内容进行设置。

(2)将“员工表”中有摄影爱好的员工其“备注”字段的值设为True(即复 选框里打上钩)。

(3)删除聘用时间超过30年(含30年)、“职务”为“经理”的职工。 (4)将考生文件夹下文本文件Test.txt中的数据导入追加到当前数据库的“ 员工表”相应字段中。

(5)设置相关属性,使“员工表”中“密码”字段以密码方式输入并显示。 (6)建立“员工表”和“部门表”的表间关系,并实施参照完整性。

********************************************************************** 考生文件夹下存在一个数据库文件“samp2.accdb”,里面已经设计好三个 关联表对象“tStud”、“tCourse”和“tScore”及表对象“tTemp”。试按以 下要求完成设计:(60-2)

(1)创建一个查询,查找选课学分超过3分或没有先修课的学生记录,并显示 学生的“姓名”、“课程名”和“成绩”三个字段内容,所建查询命名 为“qT1”。

(2)创建一个查询,查找5号入校的学生,显示其“学号”、“姓名”、“性 别”和“年龄”四个字段内容,所建查询命名为“qT2”。

(3)创建一个查询,查找选课成绩均在80分(含80分)以上的学生记录,并 显示“学号”和“平均成绩”两列内容。其中“平均成绩”一列数据由 统计计算得到,所建查询命名为“qT3”。

(4)创建一个查询,将“tStud”表中女学生的信息追加到“tTemp”表对应的 字段中,所建查询命名为“qT4”。

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

(4-3)

(1)在窗体的窗体页眉节区位置添加一个标签控件,其名称为“bTitle”, 初始化标题显示为“雇员基本信息”,字体名称为“黑体”,字号为 18。

(2)将命令按钮bList的标题设置为“显示雇员情况”。

(3)单击命令按钮bList,要求运行宏对象m1;单击事件代码已提供,请补 充完整。

(4)取消窗体的水平滚动条和垂直滚动条;取消窗体的最大化和最小化按 钮。

(5)窗体加载时,将“Tda”标签标题设置为“YYYY年雇员信息”,其中

“YYYY”为系统当前年份(要求使用相关函数获取),例如,2013年 雇员信息。窗体“加载”事件代码已提供,请补充完整。

注意:不允许修改窗体对象“fEmployee”中未涉及的控件和属性;不允许 修改表对象“tEmployee”和宏对象“m1”。

程序代码只允许在“*****Add*****”与“*****Add*****”之间的 空行内补充一行语句、完成设计,不允许增删和修改其它位置已存 ※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※ 第03套:

考生文件夹下,“samp1.accdb”数据库文件中已建立表对象“tEmp”。试 按以下操作要求,完成对表“tEmp”的编辑修改和操作:

(29-1)

(1)将“编号”字段改名为“工号”,并设置为主键;按所属部分修改工号, 修改规则为:部门“01”的“工号”首字符为“1”,部门“02”首字符 为“2”,依次类推。

(2)设置“年龄”字段的有效性规则为不能是空值。

(3)设置“聘用时间”字段的默认值为系统当前年的一月一号。

(4)删除表结构中的“简历”字段;设置“聘用时间”字段的相关属性,使 该字段按照“XXXX/XX/XX”格式输入,例如,2013/07/08。

(5)将考生文件夹下“samp0.accdb”数据库文件中的表对象“tTemp”导入到 “samp1.accdb”数据库文件中。

(6)完成上述操作后,在“samp1.accdb”数据库文件中做一个表对象“tEmp ”的备份,命名为“tEL”。

********************************************************************** 考生文件夹下存在一个数据库文件“samp2.accdb”,里面已经设计好二个表 对象“tTeacher1”和“tTeacher2”。试按以下要求完成设计:(29-2)

(1)创建一个查询,查找并显示在职教师的“编号”、“姓名、“年龄”和“性 别”四个字段内容,所建查询命名为“qT1”。

(2)创建一个查询,查找年龄低于所有职工平均年龄的职工记录,并显示“编 号姓名”和“联系电话”两列信息,其中“编号姓名”由“编号”与“姓 名”两个字段合二为一构成,所建查询命名为“qT2”。

(3)创建一个查询,按输入的参加工作时间的月份查找,并显示教师的“编号” 、“姓名”、“年龄”和“性别”四个字段内容,当运行该查询时,应显 示提示信息:“请输入月份”,所建查询命名为“qT3”。 (4)创建一个查询,将“tTeacher1”表中的党员教授的记录追加到 “tTeacher2”表相应的字段中,所建查询命名为“qT4”。

********************************************************************** 考生文件夹下存在一个数据库文件“samp3.accdb”,里面已经设计好表对 象“tStud”、查询对象“qStud”、窗体对象“fStud”和子窗体对象“fDetail ”,同时还设计出以“qStud”为数据源的报表对象“rStud”。请在此基础上按 照以下要求补充“fStud”窗体和“rStud”报表的设计:

(57-3)

(1)在报表的报表页眉节区位置添加一个标签控件,其名称为“bTitle”, 标题显示为“团员基本信息表”;将名称为“tSex”的文本框控件的输出内容设 置为 “性别”字段值。在报表页脚节区添加一个计算控件,其名称为“tAvg”, 设置相关属性,输出学生的平均年龄。

(2)将“fStud”窗体对象主体节中控件的Tab键焦点移动顺序设置为: “CItem”→“TxtDetail” →“CmdRefer” →“CmdList” → “CmdClear” →“fDetail” →“简单查询”。

(3)在窗体加载事件中,实现重置窗体标题为标签“tTitle”的标题内容。 (4)试根据以下窗体功能要求,对已给的事件过程进行代码补充,并运行 调试。

在窗体中有一个组合框控件和一个文本框控件,名称分别为“CItem”和 “TxtDetail”;有两个标签控件,名称分别为“Label3”和“Ldetail”;还 有三个命令按钮,名称分别为“CmdList”、“CmdRefer”和“CmdClear”。

在“CItem”组合框中选择某一项目后,“Ldetail”标签控件将显示出所选 项目名加上“内容:”。在“TxtDetail”文本框中输入具体项目值后,单击 “CmdRefer”命令按钮,如果“CItem”和“TxtDetail”两个控件中均有值, 则在子窗体中显示找出的相应记录,如果两个控件中没有值,显示提示框, 提示框标题为“注意”,提示文字为“查询项目或查询内容不能为空!!!”, 提示框中只有一个“确定”按钮;单击“CmdList”命令按钮,在子窗体中显 示“tStud”表中的全部记录;单击“CmdClear”命令按钮,将清空控件 “cItem”和“TxtDetail”中的值。

※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※ 第04套:

在考生文件夹下,“samp1.accdb”数据库文件中已建立表对象“tEmployee ”。试按以下操作要求,完成表的编辑:

(34-1)

(1) 分析表的结构,判断并设置主键。

(2) 设置“年龄”字段的“有效性规则”属性为:非空且非负。 (3) 设置“聘用时间”字段的默认值为:系统当前月的最后一天。 (4) 交换表结构中的“职务”与“聘用时间”两个字段的位置。 (5) 删除1995年聘用的“职员”职工信息。 (6) 在编辑完的表中追加以下一条新记录:

********************************************************************** 考生文件夹下存在一个数据库文件“samp2.accdb”,里面已经设计好两个 关联表对象“tStaff”和“tSalary”及表对象“tTemp”。试按以下要求完成设 计:

(34-2)

(1)创建一个查询,查找下半年聘用的经理,并显示“工号”、“姓名、“年 龄”和“性别”四个字段内容,所建查询命名为“qT1”。

(2)创建一个查询,查找各位员工在2005年的工资信息,并显示“工号”、“ 工资合计”和“水电房租费合计”三列内容。其中,“工资合计”和“水 电房租费合计”两列数据均由统计计算得到,所建查询命名为“qT2”。 (3)创建一个查询,查找并显示员工的“年月”、“姓名”、“工资”、“水电 房租费”及“应发工资”五列内容。其中“应发工资”列数据由计算得到, 计算公式为:应发工资=工资-水电房租费,所建查询命名为“qT3”。 (4)创建一个查询,将表“tTemp”中“年龄”字段值均加1,所建查询命名 为“qT4”。

********************************************************************** 考生文件夹下存在一个数据库文件“samp3.accdb”,里面已经设计好表对 象“tStud”和查询对象“qStud”,同时还设计出以“qStud”为数据源的报表 对象“rStud”。试在此基础上按照以下要求补充报表设计:

(34-3)

(1)在报表的报表页眉节区位置添加一个标签控件,其名称为“bTitle”, 标题显示为“团员基本信息表”。

(2)在报表的主体节区添加一个文本框控件,显示“性别”字段值。该控 件放置在距上边0.1厘米、距左边5.2厘米,并命名为“tSex”。 (3)在报表页脚节区添加一个计算控件,计算并显示学生平均年龄。计算 控件放置在距上边0.2厘米、距左边4.5厘米,并命名为“tAvg”。 (4)利用表达式按“编号”字段前四位分组统计各组记录个数,并将统计 结果显示在组页脚节区。计算控件命名为“tCount”。 要求:按“编号”字段进行统计操作。

注意:不允许改动数据库中的表对象“tStud”和查询对象“qStud”,同时 也不允许修改报表对象“rStud”中已有的控件和属性。

※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※ 第05套:

在考生文件夹下,存在一个数据库文件“samp1.accdb”,里边已建立两个 表对象“tGrade”和“tStudent”;同时还存在一个Excel文件“tCourse.xls” 。试按以下操作要求,完成表的编辑:

(12-1)

(1)将Excel文件“tCourse.xls”链接到“samp1.mdb”数据库文件中,链接表 名称不变,要求:数据中的第一行作为字段名。 (2)将“tGrade”表中隐藏的列显示出来。

(3)将“tStudent”表中“政治面貌”字段的默认值属性设置为“团员”,并 使该字段在数据表视图中的显示标题改为“政治面目”。

(4)设置“tStudent”表的显示格式,使表背景颜色为主题颜色的“橄榄色,强 调文字颜色3,深色50%”,文字颜色为标准色中的“黄色”、字号为10号。 (5)将北京五中毕业学生的学号第3、4位改为“09”。 (6)建立“tGrade” 和“tStudent”两表之间的关系。

********************************************************************** 考生文件夹下存在一个数据库文件“samp2.accdb”,里面已经设计好三个 关联表对象“tStud”、“tCourse” 和“tScore”。试按以下要求完成设计:

(51-2)

(1)创建一个查询,查找并显示有摄影爱好的男女学生各自人数,字段显示标 题为“性别”和“NUM”,所建查询命名为“qT1” 。 注意,要求用学号字段来统计人数。

(2)创建一个查询,查找上半年入校的学生选课记录,并显示“姓名”和 “课程名”两个字段内容,所建查询命名为“qT2” 。

(3)创建一个查询,查找没有先修课程的课程相关信息,输出其“课程号”、 “课程名”和“学分”三个字段内容,所建查询命名为“qT3” 。

(4)创建更新查询,将表对象“tStud”中低于平均年龄(不含平均年龄)学 生的“备注”字段值设置为True,所建查询命名为“qT4”。

**********************************************************************

考生文件夹下存在一个数据库文件“samp3.accdb”,里面已经设计好表对象 “tStud\,同时还设计出窗体对象“fStud”和子窗体对象“fDetail\。请在此基 础上按照以下要求补充“fStud”窗体的设计:

(12-3)

(1)将窗体标题改为“学生查询”。

(2)将窗体的边框样式改为“细边框”,取消窗体中的水平和垂直滚动条、记录 选择器、导航按钮和分隔线;将子窗体边框样式改为“细边框”,取消子窗 体中的记录选择器、导航按钮和分隔线。

(3)在窗体中有两个标签控件,名称分别为“Label1”和“Label2”,将这两个标 签上的文字颜色改为“#FFFFFF”,背景颜色设置为“#2F3699”。 (4)将窗体主体节中控件的Tab键次序改为:

“CItem”→“TxtDetail” →“CmdRefer” →“CmdList” →“CmdClear ” →“fDetail” →“简单查询” →“Frame18\。 (5)按照以下窗体功能,补充事件代码设计。

在窗体中有一个组合框控件和一个文本框控件,名称分别为“CItem”和“ TxtDetail\;有两个标签控件,名称分别为“Label3”和“Ldetail”;还 有三个命令按钮,名称分别为“CmdList”、“CmdRefer”和“CmdClear” 。在“CItem”组合框中选择某一项目后,“Ldetail”标签控件将显示出 所选项目名加上“内容:”。在“TxtDetail\文本框中输入具体项目值后 ,单击“CmdRefer”命令按钮,如果“CItem”和“TxtDetail\两个控件中 均有值,则在子窗体中显示找出的相应记录,如果两个控件中不全有值, 显示消息框,消息框标题为“注意”,提示文字为“查询项目和查询内容 不能为空!!!”,消息框中只有一个“确定”按钮;单击“CmdList”命 令按钮,在子窗体中显示“tStud\表中的全部记录;单击“CmdClear”命 令按钮,将“cItem”和“TxtDetail\两个控件中的值清空。

注意:不允许修改窗体对象“fStud” 和子窗体对象“fDetail\中未涉及 的控件、属性和任何VBA代码;不允许修改表对象“tStud”。 代码设计只允许在“*****Add*****”与“*****Add*****”之间的 空行内补充一条语句、完成设计,不允许增删和修改其它位置已存

在的语句。

※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※ 第06套:

在考生文件夹下,“samp1.accdb”数据库文件中已建立两个表对象“员工 表”和“部门表”及一个报表对象“rEmp”。试按以下要求顺序,完成表及报表 的各种操作:

(55-1)

(1)设置“员工表”的职务字段有效性规则为只能输入“经理”、“主管”和“ 职员”三者之一;同时设置相应有效性文本为“请输入有效职务”。

(2)分析员工的聘用时间,将截止到2008年聘用期在10年(含10年)以上的员工 其“说明”字段的值设置为“老职工”。

要求:以2008年为截止期判断员工的聘用期,不考虑月日因素。比如,聘用 时间在2000年的员工,其聘用期为8年。 (3)删除员工表中姓名含“钢”字的员工纪录。

(4)将“员工表”中女职工的前四列信息(编号,姓名,性别,年龄)导出到考 生文件夹下,以文本文件形式保存,命名为Test.txt。 要求各数据项间以逗号分隔,且第一行包含字段名称。

(5)建立表对象“员工表”和“部门表”的表间关系,并实施参照完整性。 (6)将报表对象“rEmp”的记录源设置为表对象“员工表”。

********************************************************************** 考生文件夹下存在一个数据库文件“samp2.accdb”,里面已经设计好四个 关联表对象“tDoctor”、“tOffice”、“tPatient”和“tSubscribe”以及表 对象“tTemp”,同时还设计出窗体对象“fQuery”。试按以下要求完成设计:

(41-2)

(1)创建一个查询,查找姓“王”病人的基本信息,并显示“姓名”、“年龄 ”、“性别”,所建查询名为“qT1”。

(2)创建一个查询,统计年龄小于30岁的医生被病人预约的次数,输出“医生 姓名”和“预约人数”两列信息。要求预约人数用“病人ID”字段计数并 降序排序,所建查询名为“qT2”。

(3)创建一个查询,删除表对象“tTemp”内所有“预约日期”为10月份中20 日以后(含 20日)的记录,所建查询名为“qT3”。

(4)现有一个已经建好的“fQuery”窗体。运行该窗体后,在文本框(文本框名 称为tName)中输入要查询的科室名,然后按下“查询”按钮,即运行一个 名为“qT4”的查询。“qT4”查询的功能是显示所查科室的“科室ID”和 “预约日期”。请设计“qT4”查询。

********************************************************************** 考生文件夹下存在一个数据库文件“samp3.accdb”,里面已经设计好表对 象“tAddr”和“tUser\,同时还设计出窗体对象“fEdit”和“fEuser”。请在 此基础上按照以下要求补充“fEdit”窗体的设计:

(41-3)

(1) 将窗体中名称为“Lremark”的标签控件上的文字颜色设置为“#FF0000” 、字体粗细改为“加粗”。

(2)将窗体标题设为“显示/修改用户口令”。

(3)将窗体边框改为“对话框边框”样式,取消窗体中的水平和垂直滚动条、 记录选择器、导航按钮、分隔线和控制框。

(4)将窗体中“退出”命令按钮(名称为“cmdquit”)上的文字字体粗细改为 “加粗”,并在文字下方加上下划线。

(5)在窗体中还有“修改”和“保存”两个命令按钮,名称分别为“CmdEdit” 和“CmdSave”,其中“保存”命令按钮在初始状态为不可用,当单击“修 改”按钮后,“保存”按钮变为可用。当单击“保存”按钮后,输入焦点 移到“修改”按钮。此时,程序可以修改已有的用户相 关信息,现已编写了部分VBA代码,请补充完整。 要求:修改后运行该窗体,并查看修改结果。

注意:不允许修改窗体对象“fEdit”和“fEuser”中未涉及的控件、属 性;不允许修改表对象“tAddr”和“tUser”。

程序代码只允许在“*****Add*****”与“*****Add*****”之间的

空行内补充一行语句、完成设计,不允许增删和修改其它位置已存 在的语句。

※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※ 第07套:

在考生文件夹下,“samp1.accdb”数据库文件中已创建两个表对象“员工 表”和“部门表”及一个窗体对象“fEmp”。试按以下要求顺序,完成表及窗体 的各种操作:

(56-1)

(1)对表对象“员工表”操作,按照员工性别不同,为编号字段值增补前 置字符,男性员工编号前增补字符“8”,女性员工编号前增补字符“ 6”,如男性的000001更改为8000001,女性的000002更改为6000002。 (2)查出员工张汉望的对应密码内容,将密码实际值追加到其简历内容末 尾。

(3)设置表对象“员工表”的部门号字段值为列表框下拉选择,其值引用 “部门表”的对应字段。

(4)将“员工表”姓名中的所有“小”字替换为“晓”。

(5)依据“员工表”中的职务信息,在经理和主管员工对应的“说明”字 段内输入“干部”信息。

(6)设置窗体对象“fEmp”的“记录源”属性和“筛选”属性,使其打开 后输出“员工表”的女员工信息。

********************************************************************** 考生文件夹下存在一个数据库文件“samp2.accdb”,里面已经设计好两个 表对象住宿登记表“tA”和住房信息表“tB”,其中“tA”和“tB”表中“房 间号”的前两位为楼号。试按以下要求完成设计:

(15-2)

(1)创建一个查询,查找楼号为“01”的客人记录,并显示“姓名”、“入住 日期”和“价格”三个字段内容,所建查询命名为“qT1” 。

(2)创建一个查询,按输入的房间价格区间查找,显示“房间号”字段信息。 当运行查询时,应分别显示提示信息“最低价”和“最高价”,所建查询 命名为“qT2” 。

(3)以表对象“tB”为基础,创建一个交叉表查询。要求:选择楼号为行标题、 列名称显示为“楼号”,“房屋类别”为列标题来统计输出每座楼房的各 类房间的平均房价信息。所建查询命名为“qT3”。 注:房间号的前两位为楼号。 交叉表查询不做各行小计。

(4)创建一个查询,统计出各种类别房屋的数量。输出两列信息,字段标题分 别为“type”和“num”,所建查询命名为“qT4” 。

********************************************************************** 考生文件夹下存在一个数据库文件“samp3.accdb”,里面已经设计好表对 象“tNorm”和“tStock”,查询对象“qStock”和宏对象“m1”,同时还设计 出以“tNorm”和“tStock”为数据源的窗体对象“fStock”和“fNorm”。试 在此基础上按照以下要求补充窗体设计:

(27-3)

(1)将“fStock”窗体的标题设置为“库存浏览”;在“fStock”窗体对 象的窗体页眉节区位置添加一个标签控件,其名称为“bTitle”,初 始化标题显示为“库存浏览”,字体名称为“黑体”,字号为18,字 体粗细为“加粗”。

(2)在“fStock”窗体对象的窗体页脚节区位置添加一个命令按钮,命名 为“bList”,按钮标题为“显示信息”。

(3)设置所建命令按钮bList的单击事件属性为运行宏对象m1。 (4)设置相关属性,取消在子窗体中添加新记录的功能。

(5)将“fStock”窗体对象中的“fNorm”子窗体的导航按钮去掉。 (6)为当前数据库设置“启用布局视图”。

注意:不允许修改窗体对象中未涉及的控件和属性;不允许修改表对象“ tNorm”、“tStock”和宏对象“m1”。

※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※

第08套:

在考生文件夹下,“samp1.accdb”数据库文件中已建立两个表对象“员工 表”和“部门表”。试按以下要求,完成表的各种操作:

(45-1)

(1)设置表对象“员工表”的聘用时间字段有效性规则为:1950年(含)以后的 日期;同时设置相应有效性文本为“请输入有效日期”。

(2)将表对象“员工表”中编号为“000008”的员工的照片字段值替换为考生文 件夹下的图像文件“000008.bmp”数据。

(3)删除员工表中姓名字段含有“红”字的员工纪录;隐藏表对象“员工表”的 “所属部门”字段。

(4)查找部门“04”的女主管,将其“编号”字段首字符更改为“4”。

(5)删除表对象“员工表”和“部门表”之间已建立的错误表间关系,重新建立 正确关系。

(6)将考生文件夹下Excel文件Test.xls中的数据导入到当前数据库的新表中。 要求第一行包含列标题,导入其中的“编号”、“姓名”“性别”“年龄” 和“职务”五个字段,选择“编号”字段为主键,新表命名为“tmp”。 ********************************************************************** 考生文件夹下存在一个数据库文件“samp2.accdb”,里面已经设计好三个 关联表对象“tStud”、“tCourse” 、“tScore”和一个临时表“tTemp”及一 个窗体对象“fTmp”。试按以下要求完成设计:

(45-2)

(1)创建一个查询,查找并显示没有运动爱好学生的“学号”、“姓名”、“ 性别”和“年龄”四个字段内容,所建查询命名为“qT1”。

(2)创建一个查询,查找并显示所有学生的“姓名”、“课程号”和“成绩” 三个字段内容,所建查询命名为“qT2” 。

注意,这里涉及选课和没选课的所有学生信息,要考虑选择合适查询联接 属性。

(3)创建一个参数查询,查找并显示学生的“学号”、“姓名”、“性别”和“ 年龄”四个字段内容。其中设置性别字段为参数,参数条件要引用窗体“ fTmp”上控件“tSS”的值,所建查询命名为“qT3”。

(4)创建一个查询,删除临时表对象“tTemp”中年龄为奇数的记录,所建查询 命名为“qT4”。

********************************************************************** 考生文件夹下存在一个数据库文件“samp3.mdb”,里面已经设计了两个表 对象“tEmp”和“tGroup”,同时还设计了窗体对象“fEmp”、报表对象“ rEmp”和宏对象“mEmp”,试按以下功能要求补充设计。

(73-3)

(1)将报表“rEmp”中的记录数据按姓氏分组升序排列,并在相关的组页眉节 区域添加一个文本框控件(命名为“tNum”),计算并显示各姓氏员工的 人数。

注意:这里不需考虑复姓情况。所有姓名的第一个字符视为其姓氏信息。 要求:使用分组表达式进行分组;用“编号”字段统计各姓氏人数。 (2)将报表“rEmp”主体节区内文本框“tDept”的控件来源属性设置为计算 控件。要求该控件可以根据报表数据源里的“所属部门”字段值,从非数 据源表对象“tGroup”中检索出对应的部门名称并显示输出。 提示:考虑使用DLookup函数。

(3)设置相关属性,将“fEmp”窗体的整个背景显示为考生文件夹内的图像文 件“bk.bmp”。在窗体加载事件中设置窗体标题为显示“××年度报表输 出”。

说明:“××”为两位的当前年显示。 要求:当前年的年份使用相关函数获取。

(4)在“fEmp”窗体中单击“报表输出”按钮(名为“bt1”),调用事件代 码先将“退出”按钮标题设为粗体显示,再以预览方式打开报表“rEmp” ,请按VBA代码指示将代码补充完整。设置“退出”按钮(名为“bt2”) 的相关事件,当单击该按钮时,调用设计好的宏“mEmp”来关闭窗体。

注意:不允许修改数据库中的表对象“tEmp”、 “tGroup”和宏对象“

mEmp”;不允许修改窗体对象“fEmp”和报表对象“rEmp”中未涉 及的控件和属性;已给事件过程,只允许在“*****Add*****”与 “*****Add*****”之间的空行内补充语句、完成设计,不允许增 删和修改其它位置已存在的语句。

※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※ 第09套:

在考生文件夹下,存在一个数据库文件“samp1.accdb” 、一个Excel文件 “tScore.xls”和一个图像文件“photo.bmp”。在数据库文件中已经建立了一 个表对象“tStud”。试按以下操作要求,完成各种操作:

(46-1)

(1)设置“ID”字段为主键;并设置“ID”字段的相应属性,使该字段在数据 表视图中的显示标题为“学号”;

(2)将“性别”字段的默认值属性设置为“男”,设置“入校时间”字段的相 关属性,使该字段的输入格式为“XXXX/XX/XX”,例如,2013/06/08; (3)设置“入校时间”字段的有效性规则和有效性文本。有效性规则为:输入 的入校时间必须为9月;有效性文本内容为“输入的月份有误,请重新输 入”;

(4)将学号为“20041002”学生的“照片”字段值设置为考生文件夹下的“ photo.bmp”图像文件(要求使用“由文件创建”方式);

(5)设置“政治面目”字段的输入方式为从下拉列表中选择“团员”、“党员” 和“其他”选项值;

(6)将考生文件夹下的“tScore.xls”文件导入到“samp1.mdb”数据库文件 中,表名不变,主键为表中的“ID”字段。

********************************************************************** 考生文件夹下存在一个数据库文件“samp2.accdb”,里面已经设计好三个 关联表对象“tStud”、“tScore”和“tCourse”,试按以下要求完成设计:

(46-2)

(1)创建一个查询,查找年龄高于平均年龄的党员记录,并显示“姓名”、“ 性别”和“入校时间”。所建查询命名为“qT1”。

(2)创建一个查询,按输入的成绩区间查找,并显示“姓名”、“课程名”和 “成绩”。当运行该查询时,应分别显示提示信息:“最低分”和“最高 分”。所建查询命名为“qT2”。

(3)创建一个查询,统计并显示各门课程男女生的平均成绩,统计显示结果如 下图所示。所建查询命名为“qT3”。

要求:平均分结果用Round函数取整输出。

(4)创建一个查询,运行该查询后生成一个新表,表名为“tTemp”,表结构包 括“姓名”、“课程名”和“成绩”等三个字段,表内容为不及格的所有 学生记录。所建查询命名为“qT4”。要求创建此查询后,运行该查询,并 查看运行结果。

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

(46-3)

(1)在窗体的“窗体页眉”中距左边1.2厘米、距上边1.2厘米处添加一个直线 控件,控件宽度为7.8厘米,边框颜色改为“蓝色\( 蓝色代码为 #0000FF),控件命名为“tLine”;

(2)将窗体中名称为“lTalbel”的标签控件上的文字颜色改为“蓝色\( 蓝色 代码为#0000FF)、字体名称改为“华文行楷”、字号改为22;

(3)将窗体边框改为“细边框”样式,取消窗体中的水平和垂直滚动条、记录选 择器、导航按钮和分隔线;并且只保留窗体的关闭按钮;

(4)假设“tStud”表中,“学号”字段的第5位和6位编码代表该生的专业信息, 当这两位编码为“10”时表示“信息”专业,为其他值时表示“管理”专业 。设置窗体中名称为“tSub”的文本框控件的相应属性,使其根据“学号” 字段的第5位和第6位编码显示对应的专业名称;

(5)在窗体中有一个“退出”命令按钮,名称为“CmdQuit”,单击该按钮,弹出 提示框。提示框标题为“提示”,提示框内容为“确认退出?”,并显示问 号图标;提示框中有两个按钮,分别为“是”和“否”,单击“是”按钮, 关闭消息框和当前窗体,单击“否”按钮,关闭消息框。请按照VBA代码中 的指示将实现此功能的代码填入指定的位置中。

注意:不允许修改窗体对象“fStud”中未涉及的控件、属性和任何VBA代 码;不允许修改表对象“tStud”;

程序代码只允许在“*****Add*****”与“*****Add*****”之间的 空行内补充一行语句、完成设计,不允许增删和修改其它位置已存 在的语句。

※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※ 第10套:

在考生文件夹下,存在一个数据库文件“samp1.accdb”和一个Excel文件“ tQuota.xls”。在数据库文件中已经建立了一个表对象“tStock”。试按以下操 作要求,完成各种操作:

(47—1)

(1)分析“tStock”表的字段构成,判断并设置其主键。

(2)在“tStock”表的“规格”和“出厂价”字段之间增加一个新字段,字段 名称为“单位”,数据类型为文本,字段大小为1;设置有效性规则,保 证只能输入“只”或“箱”。

(3)删除“tStock”表中的“备注”字段,并为该表的“产品名称”字段创建 查阅列表,列表中显示“灯泡”、“节能灯”和“日光灯”三个值。 (4)向“tStock”表中输入数据有如下要求:第一,“出厂价”只能输入3位 整数和2位小数(整数部分可以不足3位),第二,“单位”字段的默认值 为“只”。设置相关属性以实现这些要求。

(5)将考生文件夹下的“tQuota.xls”文件导入到“samp1.accdb”数据库文 件中,表名不变,分析该表的字段构成,判断并设置其主键;设置表的相 关属性,保证输入的“最低储备”字段值低于“最高储备”字段值,当输 入的数据违反有效性规则时,提示“最低储备值必须低于最高储备值”。 (6)建立“tQuota”表与“tStock”表之间的关系。

********************************************************************** 考生文件夹下存在一个数据库文件“samp2.mdb”,里面已经设计好表对象 “tDoctor”、“tOffice”、“tPatient”和“tSubscribe”,同时还设计出 窗体对象“fQuery”。试按以下要求完成设计:

(70-2)(52-2)

(1)创建一个查询,查找姓名为两个字的姓“王”病人的预约信息,并显示病 人的“姓名”、“年龄”、“性别”、“预约日期”、“科室名称”和“ 医生姓名”,所建查询命名为“qT1”。

(2)创建一个查询,统计星期一预约病人的平均年龄,要求输出一列内容,显 示标题为“平均年龄”,所建查询命名为“qT2”。

(3)创建一个查询,查找预约了但没有留下电话的病人,并显示“姓名”,所 建查询命名为“qT3”。

注意:病人的姓名不允许重复显示。

(4)现有一个已经建好的“fQuery”窗体,运行该窗体后,在文本框(文本框 名称为tName)中输入要查询的医生姓名,然后按下“查询”按钮,即运行 一个名为“qT4”的查询。“qT4”查询的功能是显示所查医生的“医生姓 名”和“预约人数”两列信息,其中“预约人数”值由“病人ID”字段统 计得到,请设计“qT4”查询。

********************************************************************** 考生文件夹下存在一个数据库文件“samp3.accdb”,里面已经设计好窗体 对象“fSys”。请在此基础上按照以下要求补充“fSys”窗体的设计:

(59-3)

(1)将窗体的边框样式设置为“对话框边框”,取消窗体中的水平和垂直滚动条 、记录选择器、导航按钮、分隔线、控制框、关闭按钮、最大化按钮和最小 化按钮。

(2)将窗体标题栏显示文本设置为“系统登录”。

(3)将窗体中“用户名称”(名称为“lUser”)和“用户密码”(名称为“ lPass)两个标签上的文字颜色改为浅综色(浅综色代码为#800000)、字 体粗细改为“加粗”。

(4)在窗体加载时,“tPass”文本框的内容以密码形式显示。窗体“加载”事 件代码已给出,请补充完整。

(5)按照以下窗体功能,补充事件代码设计。

在窗体中有“用户名称”和“用户密码”两个文本框,名称分别为“tUser ”和“tPass”,还有“确定”和“退出”两个命令按钮,名称分别为“ cmdEnter”和“cmdQuit”。在“tUser”和“tPass”两个文本框中输入用 户名称和用户密码后,单击“确定”按钮,程序将判断输入的值是否正确, 如果输入的用户名称为“cueb”,用户密码为“1234”,则显示正确提示 框;如果输入不正确,则提示框显示内容为“密码错误!”,同时清除“ tUser”和“tPass”两个文本框中的内容,并将光标置于“tUser”文本框 中。当单击窗体上的“退出”按钮后,关闭当前窗体。

注意:不允许修改窗体对象“fSys”中未涉及的控件、属性和任何VBA代码。 只允许在“*****Add*****”与“*****Add*****”之间的空行内补充 一条语句,不允许增删和修改其它位置已存在的语句。

※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※ 第11套:

在考生文件夹下,存在一个数据库文件“samp1.mdb” ,里边已经设计好了 表对象“tDoctor”、“tOffice”、“tPatient”和“tSubscribe”,同时还设 计了窗体对象“fSubscribe”。试按以下操作要求,完成各种操作:

(70-1)((1)分析“tSubscribe”预约数据表的字段构成,判断并设置其主键。设置“ 科室ID”字段的字段大小,使其与“tOffice”表中相关字段的字段大小一 致。删除医生“专长”字段。

(2)设置“tSubscribe”表中“医生ID”字段的相关属性,使其输入的数据只 能为第1个字符为“A”,从第2个字符开始后三位只能是0~9之间的数字, 并设置该字段为必填字段。设置“预约日期”字段的有效性规则为:只能 输入系统时间以后的日期。 要求:使用函数获取系统时间。

(3)设置“tDoctor”表中“性别”字段的默认值为“男”,并设置该字段值 的输入方式为从下拉列表中选择“男”或“女”选项值。设置“年龄”字 段的有效性规则和有效性文本,有效性规则为:输入年龄必须在18岁至60 岁之间(含18岁和60岁),有效性文本内容为:“年龄应在18岁到60岁之 间”。

(4)设置“tDoctor”表的显示格式,使表的背景颜色为“褐色2”,网格线为 “黑色”。设置数据表中显示所有字段。

(5)通过相关字段建立“tDoctor”、“tOffice”、“tPatient”和“ tSubscribe”等四表之间的关系,并实施参照完整性。

(6)将窗体“fSubscribe”主体节区内文本框“tDept”和“tDoct”的控件来 源属性设置为计算控件。要求该控件可以根据窗体数据源里的“科室ID” 和“医生ID”字段值,分别从非数据源表对象“tPatient”和“tDoctor” 中检索出对应的科室名称和医生姓名并显示输出。 提示:考虑使用DLookup函数。

********************************************************************** 考生文件夹下存在一个数据库文件“samp2.accdb”,里面已经设计好三个关 联表对象“tStud”、“tCourse” 、“tScore”和一个空表“tTemp”。试按 以下要求完成设计:

(55-56---2)

(1)创建一个查询,统计人数在5人以上(不含5)的院系人数,字段显示标题

52-1)

为“院系号”和“人数”,所建查询命名为“qT1” 。 注意:要求按照学号来统计人数。

(2)创建一个查询,查找非“04” 院系的选课学生信息,输出其“姓名”、“ 课程名”和“成绩”三个字段内容,所建查询命名为“qT2” 。

(3)创建一个查询,查找还没有选课的学生的姓名,所建查询命名为“qT3”。 (4)创建一个查询,将前5条记录的学生信息追加到表“tTemp”的对应字段中, 所建查询命名为“qT4”。

**********************************************************************

考生文件夹下存在一个数据库文件“samp3.accdb”,里面已经设计好表对象 “tStud”、查询对象“qStud”、窗体对象“fStud”和子窗体对象“fDetail” ,同时还设计出以“qStud”为数据源的报表对象“rStud”。请在此基础上按照 以下要求补充“fStud”窗体和“rStud”报表的设计:

(57-3)

(1)在报表的报表页眉节区位置添加一个标签控件,其名称为“bTitle”, 标题显示为“团员基本信息表”;将名称为“tSex”的文本框控件的输 出内容设置为 “性别”字段值。在报表页脚节区添加一个计算控件, 其名称为“tAvg”,设置相关属性,输出学生的平均年龄。

(2)将“fStud”窗体对象主体节中控件的Tab键次序移动顺序设置为: “CItem”→“TxtDetail” →“CmdRefer” →“CmdList” → “CmdClear” →“fDetail” →“简单查询”。

(3)在窗体加载事件中,实现重置窗体标题为当前年月加标签“tTitle” 的标题内容,如“2013年06月xxxx”。其中,当前年月要求用函数获 得,xxxx部分是标签“tTitle”的标题内容。

(4)试根据以下窗体功能要求,对已给的事件过程进行代码补充,并运行 调试。

在窗体中有一个组合框控件和一个文本框控件,名称分别为“CItem”和 “TxtDetail”;有两个标签控件,名称分别为“Label3”和“Ldetail”;还 有三个命令按钮,名称分别为“CmdList”、“CmdRefer”和“CmdClear”。 在“CItem”组合框中选择某一项目后,“Ldetail”标签控件将显示出所选 项目名加上“内容:”。在“TxtDetail”文本框中输入具体项目值后,单击 “CmdRefer”命令按钮,如果“CItem”和“TxtDetail”两个控件中均有值, 则在子窗体中显示找出的相应记录,如果两个控件中没有值,显示提示框, 提示框标题为“注意”,提示文字为“查询项目或查询内容不能为空!!!”, 提示框中只有一个“确定”按钮;单击“CmdList”命令按钮,在子窗体中显 示“tStud”表中的全部记录;单击“CmdClear”命令按钮,将清空控件 “cItem”和“TxtDetail”中的值。

注意:不允许修改窗体对象“fStud” 和子窗体对象“fDetail”中未涉 及的控件、属性和任何VBA代码;不允许修改报表对象“rStud”中已有的控 件和属性;不允许修改表对象“tStud”和查询对象“qStud”。只允许在 “*****Add*****”与“*****Add*****”之间的空行内补充一条代码语句、 完成设计,不允许增删和修改其它位置已存在的语句。

※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※ 第12套:

在考生文件夹下,存在一个Excel文件“Test.xls”和一个数据库文件“ samp1.accdb”。库文件中已建立三个表对象(名为“线路”、“游客”和“团 队”)和一个窗体对象(名为“brow”)。试按以下要求,完成表和窗体的各 种操作:

(18-1)

(1)将“线路”表中的“线路ID”字段设置为主键;设置“天数”字段的有效 性规则属性,有效性规则为非空且大于0。

(2)将“团队”表中的“团队ID”字段设置为主键;追加“线路ID”新字段, 数据类型为“文本”,字段大小为8。

(3)将“游客”表中的“年龄”字段删除;添加两个字段,字段名分别为“证 件编号”和“证件类别”;“证件编号”的数据类型为“文本”,字段大 小为20;“证件类别”字段的数据类型为“文本”,字段大小为8,其值

的输入要求从下拉列表选择“身份证”、“军官证”或“护照”之一。 (4)将考生文件夹下Test.xls文件中的数据链接到当前数据库中。要求:数据 中的第一行作为字段名,链接表对象命名为“tTest”。

(5)建立“线路”、“团队”和“游客”三表之间的关系,并实施参照完整性。 (6)修改窗体“brow”,取消“记录选择器”和“分隔线”显示,在窗体页眉 处添加一个标签控件(名为Line),标签标题为“线路介绍”,字体名称 为隶书、字体大小为18。

********************************************************************** 考生文件夹下存在一个数据库文件“samp2.mdb”,里面已经设计好两个表对 象“tA”和“tB”。试按以下要求完成设计:

(18-2)

(1)创建一个查询,查找并显示6月份入住客人的“姓名”、“房间号”、“ 电话”和“入住日期”四个字段内容,所建查询命名为“qT1”。

(2)创建一个查询,能够在客人每次结账时根据客人的姓名提示统计这个客人 已住天数和应交金额,并显示“姓名”、“房间号”、“已住天数”和“ 应交金额”,所建查询命名为“qT2”。 注:输入姓名时应提示“请输入姓名”。

已住天数按系统时间为客人结账日进行计算。 应交金额=已住天数*价格。

(3)创建一个查询,查找“身份证”字段第4位至第6位值为“102”的纪录,并 显示“姓名”、“入住日期”和“价格”三个字段内容,所建查询命名为 “qT3”。

(4)以表对象“tB”为数据源创建一个查询,使用房间号统计并显示每栋楼的 各类房间个数。行标题为“楼号”,列标题为“房间类别”,所建查询命 名为“qT4”。

注:房间号的前两位为楼号。

**********************************************************************

考生文件夹下存在一个数据库文件“samp3.accdb”,里面已经设计了表对象 “tEmp”、查询对象“qEmp”和窗体对象“fEmp”。同时,给出窗体对象“fEmp ”上两个按钮的单击事件代码,试按以下要求补充设计。

(18-3)

(1)将窗体“fEmp”上名称为“tSS”的文本框控件改为组合框控件,控件名称 不变,标签标题不变。设置组合框控件的相关属性,以实现从下拉列表中 选择输入性别值“男”和“女”。

(2)选择合适字段,将查询对象“qEmp”改为参数查询,参数为引用窗体对象 “fEmp”上组合框“tSS”的输入值。

(3)将窗体对象“fEmp”上名称为“tPa”的文本框控件设置为计算控件。要求 依据“党员否”字段值显示相应内容。如果“党员否”字段值为True,显示 “党员”两个字;如果“党员否”字段值为False,显示“非党员”三个字。 (4)在窗体对象“fEmp”上有“刷新”和“退出”两个命令按钮,名称分别为 “bt1”和“bt2”。单击“刷新”按钮,窗体记录源改为查询对象“qEmp ”;单击“退出”按钮,关闭窗体。现已编写了部分VBA代码,请按照VBA 代码中的指示将代码补充完整。

注意:不允许修改数据库中的表对象“tEmp”;不允许修改查询对象“qEmp ”中未涉及的内容;不允许修改窗体对象“fEmp”中未涉及的控件和 属性。

程序代码只允许在“*****Add*****”与“*****Add*****”之间的 空行内补充一行语句、完成设计,不允许增删和修改其它位置已存 在的语句。

※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※ 第13套:

在考生文件夹下,存在一个数据库文件“samp1.accdb”。在数据库文件中已 经建立了五个表对象“tOrder”、“tDetail”、“tEmployee”、“tCustom” 和“tBook”。试按以下操作要求,完成各种操作:

(49-1)

(1)分析“tOrder”表对象的字段构成,判断并设置其主键。

(2)设置“tDetail”表中“订单明细ID”字段和“数量”字段的相应属性,使 “订单明细ID”字段在数据表视图中的显示标题为“订单明细编号”,将 “数量”字段取值非空且大于0 。

(3)删除“tBook”表中的“备注”字段;并将“类别”字段的“默认值”属性 设置为“计算机” 。

(4)设置“tEmployee”表中“性别”字段相关属性,实现下拉列表选择“男” 和“女”之一。

(5)将“tCustom”表中“邮政编码”和“电话号码”两个字段的数据类型改 为“文本”,将“邮政编码”字段的“输入掩码”属性设置为“邮政编码 ”,将“电话号码”字段的输入掩码属性设置为“010-XXXXXXXX”,其中, “X”为数字位,且只能是0~9之间的数字。 (6)建立五个表之间的关系。

********************************************************************** 考生文件夹下存在一个数据库文件“samp2.mdb”,里面已经设计好表对象 “tCourse”、“tSinfo”、“tGrade”和“tStudent”,试按以下要求完成设 计:

(74-2)

(1)创建一个查询,计算每名学生所选课程的学分总和,并显示“姓名”和“ 学分”,其中“学分”为计算出的学分总和,所建查询命名为“qT1”。 (2)创建一个查询,查找未选课的团员学生信息,并显示其“姓名”字段内 容,所建查询命名为“qT2”。

(3)创建一个查询,查找与李红所学课程相同(含部分相同)的学生,并显 示其“姓名”和“课程编号”两列信息,所建查询命名为“qT3”。 (4)创建一个查询,查找所选课的平均成绩超过80(含80)的学生,并将 其“班级编号”、“姓名”和“平均成绩”等值填入“tSinfo”表相 应字段中,所建查询命名为“qT4”。

说明:“班级编号”值是“tStudent”表中“学号”字段的前6位。 要求:创建查询后,运行查询,查看结果。

**********************************************************************

考生文件夹下存在一个数据库文件“samp3.accdb”,里面已经设计好表对象 “tOrder”、“tDetail”和“tBook”,查询对象“qSell”,报表对象“rSell ”。请在此基础上按照以下要求补充“rSell”报表的设计:

(49-3)

(1)对报表进行适当设置,使报表显示“qSell”查询中的数据。

(2)对报表进行适当设置,使报表标题栏上显示的文姓名字为“销售情况报表”; 在报表页眉处添加一个标签,标签名为“bTitle”,显示文本为“图书销 售情况表”,字体名称为“黑体”、颜色为褐色(褐色代码为#7A4E2B)、 字号为20,文字不倾斜。

(3)对报表中名称为“txtMoney”的文本框控件进行适当设置,使其显示每本 书的金额(金额=数量*单价)。

(4)在报表适当位置添加一个文本框控件(控件名称为“txtAvg”),计算每 本图书的平均单价。

说明:报表适当位置指报表页脚、页面页脚或组页脚 要求:使用Round函数将计算出的平均单价保留两位小数

(5)在报表页脚处添加一个文本框控件(控件名称为“txtIf”),判断所售图 书的金额合计,如果金额合计大于30000,“txtIf”控件显示“达标”, 否则显示“未达标” 。

注意:不允许修改报表对象“rSell”中未涉及的控件、属性;不允许修 改表对象“tOrder”、“tDetail”和“tBook”,不允许修改查 询对象“qSell”。

※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※ 第14套:

在考生文件夹下,存在一个数据库文件“samp1.accdb” ,里边已经设计好 了表对象“tDoctor”、“tOffice”、“tPatient”和“tSubscribe”。试按以

下操作要求,完成各种操作:

(41-1)

(1)在“samp1.mdb”数据库中建立一个新表,名为“tNurse”,表结构如下表 所示:

(2)判断并设置表“tNurse”的主键。

(3)设置“护士姓名”字段为必需字段、“工作日期”字段的默认值为系统当 前月的第一天(规定:系统日期必须由函数获取)。设置“护士ID”字段 的有效性规则,保证输入的第一个字符为“N”。

(4)将下表所列数据输入到“tNurse”表中,且显示格式应与下表相同。

(5)向“tDoctor”表“性别”字段中输入数据有如下要求:第一,输入方式 为从下拉列表中选择“男”、或“女”值;第二,初始值为“男”。设置 相关属性以实现这些要求。

(6)通过相关字段建立“tDoctor”、“tOffice”、“tPatient”和“ tSubscribe”等四表之间的关系,同时使用“实施参照完整性”。

********************************************************************** 考生文件夹下存在一个数据库文件“samp2.accdb”,里面已经设计好两个 表对象“tEmployee”和“tGroup”。试按以下要求完成设计:

(3-2)

(1)创建一个查询,查找并显示没有运动爱好的职工的“编号”、“姓名” 、“性别”、“年龄”和“职务”五个字段内容,所建查询命名为“ qT1”。

(2)创建一个查询,查找并显示聘期超过5年(必须使用函数获取)的开发 部职工的“编号”、“姓名”、“职务”和“聘用时间”四个字段内 容,所建查询命名为“qT2”。

(3)创建一个查询,计算5月份聘用的、男女生每个部门的最小年龄。要 求,第一列显示性别,第一行显示部门名称,所建查询名为“qT3”。 (4)创建一个查询,查找年龄低于所有职工平均年龄并且职务为经理的职 工记录,并显示“管理人员”信息。其中管理人员由“编号”和“姓 名”两列信息合二为一构成(比如,编号为“000011”、姓名为“吴 大伟”的数据输出形式为“000011吴大伟”),所建查询命名为“ qT4”。

********************************************************************** 考生文件夹下存在一个数据库文件“samp3.accdb”,里面已经设计了表对 象“tEmp”、窗体对象“fEmp”、报表对象“rEmp” 和宏对象“mEmp”。试在 此基础上按照以下要求补充设计:

(55-3)

(1)设置报表“rEmp”按照“年龄”字段升序排列输出;将报表页面页脚区域 内名为“tPage”的文本框控件设置为“第N页,共M页”形式的页码显示

(如第1页,共15页、第2页,共15页、?)。

(2)设置窗体对象“fEmp”背景图像为考生文件夹下的图像文件“photo.bmp” ,并将该图像以平铺方式显示。

(3)在窗体加载事件中实现代码重置窗体标题为标签“bTitle”的标题内容。 (4)试根据以下窗体功能要求,对已给的事件过程进行代码补充,并运行调试。 在“fEmp”窗体上单击“输出”命令按钮(名为“btnP”),计算满足表 达式1+2+3+?+n<=30000的最大n值,并将n的值显示在窗体上名为“tData” 的文本框内并输出到外部文件保存。单击“打开表”命令按钮(名为“ btnQ”),代码调用宏对象“mEmp”以打开数据表“tEmp”。

注意:不允许修改数据库中的表对象“tEmp”和宏对象“mEmp”;不允许 修改窗体对象“fEmp”和报表对象“rEmp”中未涉及的控件和属性; 只允许在“*****Add*****”与“****Add******”之间的空行内补 充语句、完成设计,不允许增删和修改其它位置已存在的语句。 ※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※ 第15套:

在考生文件夹下,存在一个数据库文件“samp1.accdb”,里面已经建立了 表对象“tBook”、“tDetail”、“tEmp”和“tOrder” ,宏对象“mTest”。 试按以下要求,完成各种操作:

(58-1)

(1)将“tOrder”表中“订单ID”字段的数据类型改为“文本”,字段大 小改为10;设置该字段的相关属性,使其在数据表视图中显示为“订 单号”。

(2)向“tOrder”表“订购日期”字段中输入数据有如下要求:第一,输 入格式为“XXXX/XX/XX(如,2011/01/08)”;第二,输入的数据为 2011年1月至8月产生的;第三,当输入的数据不符合要求时,显示“ 输入数据有误,请重新输入”信息。设置相关属性以实现这些要求。 (3)向“tBook”表“类别”字段中输入数据有如下要求:第一,输入方 式为从下拉列表中选择“JSJ”、或“KJ”值;第二,初始值为“ JSJ”。设置相关属性以实现这些要求。

(4)在数据表视图中进行相关设置,使其能够显示出“tEmp”表中所有字 段的数据。

(5)建立“tBook”、“tDetail”、“tEmp”和“tOrder”等四张表之 间的关系,并全部实施参照完整性。

(6)将宏“mTest”重命名,保存为自动执行的宏。

********************************************************************** 考生文件夹下存在一个数据库文件“samp2.accdb”,里面已经设计好表对 象“tCourse”、“tScore”和“tStud”,试按以下要求完成设计:

(58-2)

(1)创建一个查询,查找人数为20的班级,并显示“班级编号”和“班级 人数”。所建查询名为“qT1”。 要求:使用“姓名”字段统计人数。

说明:“学号”字段的前8位为班级编号。

(2)创建一个查询,查找平均成绩最高的课程,并显示“课程名”和“平 均成绩”。所建查询名为“qT2”。

要求:使用Round函数实现平均成绩保留整数。

(3)创建一个查询,计算男女生每门课程的最高成绩。要求,第一列显示 性别,第一行显示课程名。所建查询名为“qT3”。

(4)创建一个查询,运行该查询后生成一张新表,表名为“tNew”,表结 构包括“姓名”、“课程名”和“成绩”等三个字段,表内容为90分 以上(包括90分)或不及格的所有学生记录。所建查询名为“qT4”。 要求:

1、所建新表中的记录按照“成绩”降序保存。 2、创建此查询后,运行该查询,并查看运行结果。

**********************************************************************

考生文件夹下存在一个数据库文件“samp3.accdb”,里面已经设计好表对 象“tBook”、“tDetail”、“tEmp”和“tOrder”,查询对象“qSell”,窗 体对象“fEmp”。同时还设计出以“qSell”为数据源的报表对象“rSell”。 请在此基础上按照以下要求补充“fEmp”窗体和“rSell”报表的设计

:(58-3)

(1)将“rSell”报表标题栏上的显示文本设置为“销售报表”;对报表中 名称为“txtNum”的文本框控件进行适当设置,使其显示每本书的售 出数量;在报表适当位置添加一个计算控件(控件名称为“txtC2”) ,计算各出版社所售图书的平均单价。

说明:报表适当位置指报表页脚、页面页脚或组页脚。 要求:计算出的平均单价使用函数保留两位小数。

(2)在“fEmp”窗体页眉节区添加一个标签,标签名为“bTitle”,显示 文本为“雇员基本情况查询”,字号为26。

(3)将“fEmp”窗体中命令按钮(名称为“CmdRefer”)上的文字颜色改 为褐色(褐色代码为#7A4E2B)、字体粗细改为“加粗”、文字下方显 示“下划线”。

(4)将“fEmp”窗体中窗体页眉节区控件的Tab键移动次序设置为:“ TxtDetail”→“CmdRefer”。

(5)试根据以下窗体功能要求,补充已给的事件代码,并运行调试。 在“fEmp”窗体的窗体页眉节区有一个文本框控件和一个命令按钮,名称 分别为“TxtDetail”和“CmdRefer”;在主体节区有多个文本框控件,显示 “tBook”表中的相关信息。在“TxtDetail”文本框中输入具体值后,单击“ CmdRefer”命令按钮。如果“TxtDetail”文本框中没有值,则显示提示框, 提示文字为“对不起!未输入雇员姓名,请输入!”;如果“TxtDetail”文 本框中有值,则在“tBook”表中进行查找,如果找到了相应记录,则显示在 主体节对应的文本框控件中,如果没有找到,则显示提示框,提示框显示标题 为“查找结果”,提示文字为“对不起!没有这个雇员!”,提示框中只有一个 “确定”按钮,然后清除“TxtDetail”文本框中的内容,并将光标置于“ TxtDetail”文本框中。

注意:不允许修改报表对象“rSell”中未涉及的控件、属性;不允许修 改表对象“tBook”、、“tDetail” 、“tEmp”和“tOrder”,不允许修改 查询对象“qSell”。不允许修改窗体对象“fEmp”中未涉及的控件、属性和 任何VBA代码;只允许在“*****Add*****”与“*****Add*****”之间的空行 内补充一条代码语句、不允许增删和修改其它位置已存在的语句。

※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※ 第16套:

在考生文件夹下,已有“samp1.accdb”数据库文件和Stab.xls文件, “samp1.mdb”中已建立表对象“student”和“grade”,试按以下要求,完成 表的各种操作:

(66-1) (2-1)

(1)将考生文件夹下的Stab.xls文件导入到“student”表中。

(2)将“student”表中1975年和1976年出生的学生记录删除。

(3)将“student”表中“性别”字段的默认值属性设置为“男”;将“学 号”字段的相关属性设置为只允许输入9位的0-9数字;将姓名中的“ 丽”改为“莉”。

(4)将“student”表拆分为两个新表,表名分别为“tStud”和“tOffice” 。其中“tStud”表结构为:学号,姓名,性别,出生日期,院系,籍贯 ,主键为学号;“tOffice”表结构为:院系,院长,院办电话,主键为 “院系”。

要求:保留“student”表。

(5)在“grade”表中增加一个字段,字段名为“总评成绩”,字段值为: 总评成绩 = 平时成绩*30% + 考试成绩*70%,计算结果的“结果类型” 为“整型”,“格式”为“标准”,“小数位数”为0。 (6)建立“student”和“grade”两表之间的关系。

********************************************************************** 考生文件夹下存在一个数据库文件“samp2.accdb”,里面已经设计好一个 表对象“tTeacher”。试按以下要求完成设计:

(66-2)

(1)创建一个查询,计算并显示教师最大年龄与最小年龄的差值,显示标 题为“m_age”,所建查询命名为“qT1”。

(2)创建一个查询,查找工龄不满30年、职称为副教授或教授的教师,并 显示“编号”、“姓名”、“年龄”、“学历”和“职称”五个字段 内容,所建查询命名为“qT2”。 要求:使用函数计算工龄。

(3)创建一个查询,查找年龄低于在职教师平均年龄的在职教师,并显示 “姓名”、“职称”和“系别”三个字段内容,所建查询命名为“ qT3”。

(4)创建一个查询,计算每个系的人数和所占总人数的百分比,并显示“ 系别”、“人数”和“所占百分比(%)”,所建查询命名为“ qT4”。

注意:“人数”和“所占百分比”为显示标题。

要求:①按照编号来统计人数;②计算出的所占百分比以两位整数显 示(使用函数实现)。

********************************************************************** 考生文件夹下存在一个数据库文件“samp3.accdb”,里面已经设计好表对 象“tEmployee”和“tGroup”及查询对象“qEmployee”,同时还设计出以“ qEmployee”为数据源的报表对象“rEmployee”。试在此基础上按照以下要求补 充报表设计:

(2-3)

(1)在报表的报表页眉节区位置添加一个标签控件,其名称为“bTitle”, 标题显示为“职工基本信息表”。

(2)预览报表时,报表标题显示标签控件“bTitle”的内容,请按照VBA 代码中的指示将代码补充完整。

(3)在“性别”字段标题对应的报表主体节区距上边0.1厘米、距左侧5.2 厘米位置添加一个文本框,显示出“性别”字段值,并命名为“tSex ”; 在报表适当位置添加一个文本框,计算并显示每类职务的平均年 龄,文本框名为tAvg。

注意:报表适当位置是指报表页脚、页面页脚或组页脚。

(4)设置报表主体节区内文本框“tDept”的控件来源属性为计算控件。要 求该控件可以根据报表数据源里的“所属部门”字段值,从非数据源 表对象“tGroup”中检索出对应的部门名称并显示输出。(提示:考 虑DLookup函数的使用。)

注意:不允许修改数据库中的表对象“tEmployee” 和“tGroup”及查询 对象“qEmployee”;不允许修改报表对象“qEmployee”中未涉及 的控件和属性。程序代码只允许在“*******Add******”与“ *******Add******”之间的空行内补充一行语句、完成设计,不允 许增删和修改其它位置已存在的语句。

※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※ 第17套:

在考生文件夹下,已有“samp1.accdb”数据库文件和Teacher.xlsx文件, 试按以下要求,完成表的各种操作:

(68-1)(3-1)

(1) 在考生文件夹下,“samp1.accdb”数据库文件中建立表“tTeacher”, 表结构如下。

(2) 将考生文件夹下的Teacher.xlsx文件导入到“tTeacher”表中,根据 “tTeacher”表的结构,判断并设置主键。

(3) 将“工作时间”字段的有效性规则设置为只能输入上一年度5月1日以 前(含5月1日)的日期(要求:本年度年号必须用函数获取); 将表 的有效性规则设置为输入的出生日期小于输入的工作时间。

(4) 将“在职否”字段的默认值设置为真值,设置“邮箱密码”字段的输入 掩码为将输入的密码显示为6位星号,设置“联系电话”字段的输入掩 码,要求前四位为“010-”,后八位为数字;将“性别”字段值的输入 设置为“男”、“女”列表选择。

(5) 将工作时间超过30年(不含30)的职工的“在职否”字段值改为“ 否”。

(6) 设置表格式,确保在浏览数据表时,“姓名”字段列不移出屏幕,且 网格线颜色为黑色。

********************************************************************** 考生文件夹下存在一个数据库文件“samp2.accdb”,里面已经设计好三个 关联表对象“tStud”、“tCourse” 、“tScore”和一个空表“tTemp”。试 按以下要求完成设计:

(像55)

(1)创建一个查询,查找并输出姓名是三个字的男女学生各自的人数,字段显 示标题为“性别”和“NUM”,所建查询命名为“qT1”。 要求:按照学号来统计人数。

(2)创建一个查询,查找“02”院系还未选课的学生信息,并显示其“学号” 和“姓名”两个字段内容,所建查询命名为“qT2”。

(3)创建一个查询,计算有运动爱好学生的平均分及其与所有学生平均分的差, 并显示“姓名”、“平均分”和“平均分差值”等内容,所建查询命名为 “qT3”。

注意:“平均分”和“平均分差值”由计算得到。

(4)创建一个查询,查找选修了没有先修课程的课程的学生,并将成绩排名前5 位的学生记录追加到表“tTemp”对应字段中,所建查询命名为“qT4”。 ********************************************************************** 考生文件夹下存在一个数据库文件“samp3.accdb”,里面已经设计好窗体 对象“fTest”及宏对象“m1”。试在此基础上按照以下要求补充窗体设计:

(像3-3)

(1)在窗体的窗体页眉节区位置添加一个标签控件,其名称为“bTitle”, 标题显示为“窗体测试”。

(2)打开窗体时,窗体标题显示内容为:“**月**日####”,请按照VBA代 码中的指示将代码补充完整。

注意:①显示标题中,月和日均为本年度当月和当日,“####”为标 签控件“bTitle”的内容;②显示内容中间及前后不允许出现空格; ③如果月或日小于10,按实际位数显示。

要求:本年度当月和当日的时间必须使用函数获取。

(3)在窗体主体节区内添加二个复选框控件,复选框选项按钮分别命名为“ opt1”和“opt2”,对应的复选框标签显示内容分别为“类型a”和“ 类型b”, 标签名称分别为“bopt1”和“bopt2”;分别设置复选框选 项按钮opt1和opt2的“默认值”属性为假值。

(4)在窗体页脚节区位置添加一个命令按钮,命名为“bTest”,按钮标题 为“测试”;设置命令按钮bTest的单击事件属性为给定的宏对象m1。 注意:不允许修改窗体对象fTest中未涉及的属性;不允许修改宏对象m1。 程序代码只允许在“*******Add******”与“*******Add******” 之间的空行内补充一行语句、完成设计,不允许增删和修改其它位 置已存在的语句。

※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※ 第18套:

在考生文件夹下,“samp1.accdb”数据库文件中已建立表对象“ tEmployee”。试按以下操作要求,完成表的编辑:

(61-1)

(1) 根据“tEmployee”表的结构,判断并设置主键;删除表中的“学历”字 段。

(2) 将“出生日期”字段的有效性规则设置为只能输入大于16岁的日期(要 求:必须用函数计算年龄);将“聘用时间”字段的有效性规则设置为 只能输入上一年度9月1日以前(不含9月1日)的日期(要求:本年度年 号必须用函数获取);将表的有效性规则设置为输入的出生日期小于输 入的聘用时间。

(3) 在表结构中的“简历”字段后增加一个新字段,字段名称为“在职否”, 字段类型为“是/否”型;将其默认值设置为真。 (4) 将有“书法”好爱的记录全部删除。

(5) 将“职务”字段的输入设置为“职员”、“主管”或“经理”列表选择。 (6) 根据“所属部门”字段的值修改“编号”,“所属部门”为“01”,将 “编号”的第1位改为“1”;“所属部门”为“02”,将“编号”的第1 位改为“2”,依次类推。

********************************************************************** 考生文件夹下存在一个数据库文件“samp2.accdb”,里面已经设计好三个 关联表对象“tStud”、“tCourse” 、“tScore”和一个空表“tTemp”。试按 以下要求完成设计:

(61-2)

(1)创建一个查询,统计人数在7人以上(含7)的院系人数,字段显示标题 为“院系号”和“人数”,所建查询命名为“qT1” 。 要求:按照学号来统计人数。

(2)创建一个查询,查找非“04” 院系还未选课的学生信息,并显示“学号” 和“姓名”两个字段内容,所建查询命名为“qT2” 。

(3)创建一个查询,计算组织能力强的学生的平均分及其与所有学生平均分的 差,并显示“姓名”、“平均分”和“平均分差值”等内容,所建查询命 名为“qT3”。

注意:“平均分”和“平均分差值”由计算得到。

要求:“平均分差值”以整数形式显示(使用函数实现)。

(4)创建一个查询,查找选修了有先修课程的课程的学生,并将成绩排在前3 位的学生记录追加到表“tTemp”的对应字段中,所建查询命名为“qT4”。 ********************************************************************** 考生文件夹下存在一个数据库文件“samp3.accdb”,里面已经设计好表对 象“tTeacher”、窗体对象“fTest”,报表对象“rTeacher”和宏对象“m1”。 试在此基础上按照以下要求补充窗体设计和报表设计:

(61-3)(26-3)

(1)将报表对象rTeacher的报表主体节区中名为“性别”的文本框显示内

容设置为“性别”字段值,并将文本框名称更名为“tSex”。

(2)在报表对象rTeacher的报表页脚节区位置添加一个计算控件,计算并 显示教师的平均年龄。计算控件放置在距上边0.3厘米、距左侧3.6厘 米,命名为“tAvg”。 要求:平均年龄保留整数。

(3)设置“fTest”窗体。打开窗体时,窗体标题显示内容为:“**月**日 ####样例”,请按照VBA代码中的指示将代码补充完整。

注意:①显示标题中,月和日均为本年度当月和当日,“####”为标 签控件“bTitle”的内容;②显示内容中间及前后不允许出现空格; ③如果月或日小于10,按实际位数显示。

要求:本年度当月和当日的时间必须使用函数获取。

(4)设置窗体对象fTest上名为“btest”的命令按钮的单击事件属性为给 定的宏对象m1。

注意:不允许修改数据库中的表对象“tTeacher”和宏对象“m1”;不允许 修改窗体对象“fTest” 和报表对象“rTeacher”中未涉及的控件和 属性。程序代码只允许在“*******Add******”与“*******Add**** **”之间的空行内补充一行语句、完成设计,不允许增删和修改其它 位置已存在的语句。

※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※ 第19套:

在考生文件夹下,“samp1.accdb”数据库文件中已建立好表对象“tStud” 和“tScore”、宏对象“mTest”和窗体“fTest”。试按以下要求,完成各种操 作:

(像7-1)

(1)分析并设置表“tScore”的主键;冻结表“tStud”中的“姓名”字段列。 (2)将表“tStud”中的“入校时间”字段的默认值设置为下一年度的9月1日 (要求:本年度的年号必须用函数获取)。

(3)根据表“tStud”中“所属院系”字段的值修改“学号”,“所属院系” 为“01”,将“学号”的第1位改为“1”;“所属院系”为“02”,将“ 学号”的第1位改为“2”,依次类推。

(4)在“tScore”表中增加一个字段,字段名为“总评成绩”,字段值为: 总评成绩 = 平时成绩*40% + 考试成绩*60%,计算结果的“结果类型” 为“整型”,“格式”为“标准”,“小数位数”为0。

(5)将窗体“fTest”的“标题”属性设置为“测试”;将窗体中名为“bt2” 的命令按钮,其宽度设置为2厘米、左边界设置为左边对齐“bt1”命令 按钮。

(6)将宏“mTest”重命名保存为自动执行的宏。

********************************************************************** 考生文件夹下存在一个数据库文件“samp2.accdb”,里面已经设计好表对 象“tCollect”、“tpress”和“tType”,试按以下要求完成设计:

(像7-2)

(1)创建一个查询,查找并显示购买“价格”大于100元并且“购买日期”在 2001年以后(含2001年)的“CDID”、“主题名称”、“价格”、“购买日 期”、“介绍”、 “出版单位名称”和“CD类型名称”七个字段的内容, 所建查询名为“qT1”。

(2)创建一个查询,查找收藏品中CD盘最高价格和最低价格,计算两种价格的 差值,并输出,标题显示为“v_Max”、“v_Min”和“价格差”,所建查 询名为“qT2”。

(3)创建一个查询,查找“类型ID”为“02”的CD盘中,价格低于所有CD盘 平均价格的信息,并显示“CDID”和“主题名称”,所建查询名为“ qT3”。

(4)创建一个查询,对“tType”表进行调整,将“类型ID”等于“05”的记 录中的“类型介绍”字段更改为“古典音乐”,所建查询名为“qT4”。 **********************************************************************

考生文件夹下存在一个数据库文件“samp3.accdb”,里面已经设计了表对 象“tEmp”、查询对象“qEmp”、窗体对象“fEmp”、报表对象“rEmp”和宏对 象“mEmp”。试在此基础上按照以下要求补充设计:

(1)消除报表的“性别”排序,重新按照职工姓氏进行排列,并在合适页脚区 域添加一个文本框控件(命名为tmAge),输出不同姓氏职工的最小年龄 值。

说明:这里不考虑复姓情况。

(2)将报表页面页脚区域内名为“tPage”的文本框控件设置为“页码/总页数 ”形式的页码显示(如1/35、2/35、...)。

(3)将“fEmp”窗体上名为“bTitle”的标签上移到距“btnP”命令按钮0.5 厘米的位置(即标签的下边界距命令按钮的上边界0.5厘米)。同时,将 窗体按钮“btnP”的单击事件属性设置为宏“mEmp”。

(4)在“fEmp”窗体的左侧有一个名称为“COMBO1”的组合框和两个名称分别 为“btitle1”、“btitle2”的标签。“btitle1”标签用于显示组合框 左侧的标题内容,“btitle2”标签用于显示计算的平均年龄。“COMBO1” 组合框中列出性别值“男”和“女”,当在组合框中选择某一性别值后, 计算该性别的平均年龄,并将计算的结果显示在“btitle2”标签中,显示 内容及格式如下图所示。请按照VBA代码中的指示将代码补充完整。

注意:不允许修改数据库中的宏对象“mEmp”;不允许修改窗体对象“ fEmp”和报表对象“rEmp”中未涉及的控件和属性;不允许修改 表对象“tEmp”和查询对象“qEmp”中未涉及的字段和属性。程 序代码只允许在“*******Add******”与“*******Add******” 之间的空行内补充一行语句、完成设计,不允许增删和修改其它 位置已存在的语句。

※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※ 第20套:

考生文件夹下,已有“samp0.accdb”和“samp1.accdb”数据库文件。 “samp0.accdb”中已建立表对象“tTest”,“samp1.accdb”中已建立表对象 “tEmp”和“tSalary”。试按以下要求,完成表的各种操作:

67-1

(1)根据“tSalary”表的结构,判断并设置主键;将“tSalary”表中的“ 工号”字段的字段大小设置为8。

(2)将“tSalary”表中的“年月”字段的有效性规则设置为只能输入本年 度10月1日以前(不含10月1日)的日期(要求:本年度年号必须用函 数获取); 将表的有效性规则设置为输入的水电房租费小于输入的工

资。

(3)在“tSalary”表中增加一个字段,字段名为“百分比”,字段值为: 百分比 = 水电房租费 / 工资,计算结果的“结果类型”为“双精 度型”,“格式”为“百分比”,“小数位数”为2。

(4)将表“tEmp”中“聘用时间”字段改名为“聘用日期”;将“性别” 字段值的输入设置为“男”、“女”列表选择;将“姓名”和“年龄 ”两个字段的显示宽度设置为20;将善于交际的职工记录从有关表中 删除;隐藏“简历”字段列。

(5)完成上述操作后,建立表对象“tEmp”和“tSalary”的表间一对多 关系,并实施参照完整。

(6)将考生文件夹下“samp0.accdb”数据库文件中的表对象“tTest” 链接到“samp1.accdb”数据库文件中,要求链接表对象重命名为 tTemp。

********************************************************************** 考生文件夹下存在一个数据库文件“samp2.accdb”,里面已经设计好三个 关联表对象“tCourse”、“tGrade”、“tStudent”和一个空表“tSinfo”, 同时还有两个窗体“tStudent”和“tGrade 子窗体”,试按以下要求完成设计:

67-2

(1)创建一个查询,查找年龄小于所有学生平均年龄的男学生,并显示其“姓 名”,所建查询名为“qT1”。

(2)创建一个查询,计算“北京五中”每名学生的总成绩和所占全部学生总成 绩的百分比,并显示“姓名”、“成绩合计”和“所占百分比”,所建查 询命名为“qT2”。

注意:“成绩合计”和“所占百分比”为计算得到。

要求:将计算出的“所占百分比”设置为百分比显示格式,小数位数为2。 (3)创建一个查询,将所有学生的“班级编号”、“学号”、“课程名”和“ 成绩”等值填入“tSinfo”表相应字段中,其中“班级编号”值是 “tStudent”表中“学号”字段的前6位,所建查询名为“qT3”。

(4)窗体“tStudent”和“tGrade 子窗体”中各有一个文本框控件,名称分别 为“tCountZ”和“tCount”。对两个文本框进行设置,能够在“tCountZ” 文本框中显示出每名学生的所选课程数。

注意:不允许修改窗体对象“tStudent”和“tGrade 子窗体”中未涉及 的控件和属性。

********************************************************************** 考生文件夹下存在一个数据库文件“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”。

※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※ 第21套:

考生文件夹下存在一个数据库文件“samp1.accdb”,里面已经设计好表对 象“tStud”和“tScore”,窗体对象“fTest”和宏对象 mTest。并按照以下 要求完成操作:

62-1

(1)将表“tStud”中“学号”字段的字段大小改为7;将“性别”字段的输入 设置为“男”或“女”列表选择;将“入校时间”字段的默认值设置为本 年度的1月1日(要求:本年度年号必须用函数获取)。

(2)将表“tStud”中1995年入校的学生记录删除;根据“所属院系”字段的值 修改学号,“所属院系”为“01”,将原学号前加“1”;“所属院系”为 “02”,将原学号前加“2”,依次类推。

(3)将“tStud”表的“所属院系”字段的显示宽度设置为15;将“简历”字段 隐藏起来。

(4)将“tScore”表的“课程号”字段的输入掩码设置为只能输入5位数字或字 形母式;将“成绩”字段的有效性规则设置为只能输入0~100(包含0和 100)之间的数字。

(5)分析并建立表“tStud”与表“tScore”之间的关系。

(6)将窗体“fTest”中显示标题为“Button1”的命令按钮改为显示“按钮”, 同时将其设置为灰色无效状态。

********************************************************************* 考生文件夹下存在一个数据库文件“samp2.accdb”,里面已经设计好表对 象“tStud”、“tCourse”、“tScore”和“tTemp”。试按以下要求完成设计:

62-2

(1)创建一个查询,当运行该查询时,应显示参数提示信息“请输入爱好”, 输入爱好后,在简历字段中查找具有指定爱好的学生,显示“姓名”、 “性别”、“年龄”、“课程名”和“成绩”五个字段内容,所建查询命 名为“qT1”。

(2)创建一个查询,查找平均成绩低于所有学生平均成绩的学生信息,并显 示“学号”、“平均成绩”和“相差分数”三列内容,其中“平均成绩” 和“相差分数”两列数据由计算得到,所建查询命名为“qT2”。

(3)创建一个查询,查找“04”院系没有任何选课信息的学生,并显示其“姓 名”字段的内容,所建查询命名为“qT3”。

(4)创建一个查询,将表“tStud”中组织能力强、年龄最小的3个女学生的信 息追加到“tTemp”表对应的字段中,所建查询命名为“qT4”。

********************************************************************** 考生文件夹下存在一个数据库文件“samp3.accdb”,里面已经设计好表对 象“产品”、“供应商”、查询对象“按供应商查询”,窗体对象“characterS ”和宏对象“打开产品表”、“运行查询”、“关闭窗口”。试按以下要求完成 设计:

(62-3)

1. 创建一个名为“menu”的窗体,要求如下:

(1)对窗体进行如下设置:在距窗体左边1厘米、距上边0.6厘米处依次水平放 置三个命令按钮“显示产品表”(名为“bt1”)、“查询”(名为“bt2 ”)和“退出”(名为“bt3”),命令按钮的宽度均为2厘米,高度为1.5 厘米,每个命令按钮相隔1厘米。 (2)设置窗体标题为“主菜单”。

(3)当单击“显示产品表”命令按钮时,运行宏“打开产品表”,就可以浏览 “产品”表;当单击“查询”命令按钮时,运行宏“运行查询”,即可启 动查询“按供应商查询”;当单击“退出”命令按钮时,运行宏“关闭窗 口”,关闭“menu”窗体。

2. 窗体“characterS”中有两个文本框,名称分别为“bTxt1”和“bTxt2”, 还有一个命令按钮,名称为“bC”。窗体功能为:单击“bC”按钮将“

bTxt1”文本框中已输入的字符串反向显示在“bTxt2”文本框中。请按照 VBA代码中的指示将代码补充完整。

注意:不允许修改数据库中的表对象“产品”、“供应商”、查询对象“ 按供应商查询”和宏对象“打开产品表”、“运行查询”、“关闭 窗口”;不允许修改窗体对象“characterS”中未涉及的控件和属 性。程序代码只允许在“*******Add******”与“*******Add**** **”之间的空行内补充一行语句、完成设计,不允许增删和修改其 它位置已存在的语句。

※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※ 第22套:

考生文件夹下存在一个数据库文件“samp1.accdb”,里面已经设计好表对 象“tEmployee”和窗体对象“fList”。试按以下要求完成编辑:

63-1

(1) 根据“tEmployee”表的结构,判断并设置主键;将“编号”字段的字段 大小改为7;删除“照片”字段。

(2) 设置“性别”字段的“有效性规则”属性为只能输入“男”或“女”; 设置“年龄”字段的“输入掩码”为只能输入两位数字,并设置其默认 值为19;设置“工作时间”的“有效性规则”属性为只能输入当前时间 之前的时间(含当前时间)。

(3) 设置“职务”字段的输入为“职员”、“主管”或“经理”列表选择。 (4) 删除有“摄影”爱好的员工记录。

(5) 根据“所属部门”字段的值修改“编号”,“所属部门”为“01”,将 原“编号”前加“1”;“所属部门”为“02”,将原“编号”前加“2 ”,依次类推。

(6) 设置“fList”窗体中“Txt”文本框的相关属性,使其在窗体打开时输 出“tEmployee”表里员工张娜的“简历”内容。

********************************************************************** 考生文件夹下存在一个数据库文件“samp2.accdb”,里面已经设计好表对象“tEmployee”、“tOrder”、“tDetail”和“tBook”,试按以下要求完成 设计:

63-2

(1)创建一个查询,查找7月出生的雇员,并显示姓名、书籍名称、数量, 所建查询名为“qT1”。

(2)创建一个查询,计算每名雇员的奖金,并显示“姓名”和“奖金额”, 所建查询名为“qT2”。

注意:奖金额=每名雇员的销售金额合计数×0.08 销售金额=数量*售出单价

要求:使用相关函数实现奖金额按2位小数显示。

(3)创建一个查询,统计并显示该公司没有销售业绩的雇员人数,显示标题 为“没有销售业绩的雇员人数”,所建查询名为“qT3”。 要求:使用关联表的主键或外键进行相关统计操作。

(4)创建一个查询,计算并显示每名雇员各月售书的总金额,显示时行标题 为“月份”,列标题为“姓名”,所建查询名为“qT4”。 注意:金额=数量*售出单价

要求:使用相关函数,使计算出的总金额按整数显示。

********************************************************************** 考生文件夹下存在一个数据库文件“samp3.accdb”,里面已经设计好表对象“tBand”和“tLine”,同时还设计出以“tBand”和“tLine”为数据源的 报表对象“rBand”。试在此基础上按照以下要求补充报表设计:

(69-3)( (1)在报表的报表页眉节区位置添加一个标签控件,其名称为“bTitle” ,标题显示为“旅游线路信息表”,字体名称为“宋体”,字体大小 为22,字体粗细为“加粗”,倾斜字体为“是”。

(2)预览报表时,报表标题显示为:“**月#######”,请按照VBA代码中 的指示将代码补充完整。

注意:①显示标题中的月为本年度当月,“#######”为标签控件“

63-3)

bTitle”的内容;②如果月份小于10,按实际位数显示。 要求:本年度当月的时间必须使用函数获取。

(3)在“导游姓名”字段标题对应的报表主体区位置添加一个控件,显 示出“导游姓名”字段值,并命名为“tName”。

(4)在报表适当位置添加一个文本框控件,计算并显示每个导游带团的 平均费用,文本框控件名称为tAvg。

注意:报表适当位置是指报表页脚、页面页脚或组页脚。

注意:不允许改动数据库文件中的表对象“tBand”和“tLine”,同时 也不允许修改报表对象“rBand”中已有的控件和属性。程序代码 只允许在“*******Add******”与“*******Add******”之间的 空行内补充一行语句、完成设计,不允许增删和修改其它位置已 存在的语句。

※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※ 第23套:

在考生文件夹下,“samp1.accdb”数据库文件中已建立两个表对象(名为 “员工表”和“部门表”)和一个窗体对象(名为“fEmp”)。试按以下要求顺 序,完成表及窗体的各种操作:

64-1

(1)设置“员工表”职务字段值的输入方式为从下拉列表中选择“经理”、“ 主管”或“职员”选项值。

(2)分析员工的聘用时间,将截止到2013年聘用期超过30年(含30年)的员工 其“说明”字段的值设置为“老职工”。

要求:判断员工的聘用期,不考虑月日因素。比如,聘用时间在2007年的 员工,其聘用期为6年。

(3)将“员工表”姓名字段中的所有“小”字改为“晓”。

(4)将“员工表”中男职工的前四列信息(编号,姓名,性别,年龄)导出到 考生文件夹下,以文本文件形式保存,命名为Test.txt。 要求:各数据项间以逗号分隔,第一行包含字段名称。

(5)建立“员工表”和“部门表”的表间关系,并实施参照完整。

(6)将窗体对象“fEmp”的记录源设置为表对象“员工表”;设置系统相关属 性,实现窗体对象“fEmp”打开时以重叠窗口形式显示。

********************************************************************** 考生文件夹下存在一个数据库文件“samp2.accdb”,里面已经设计好表对 象“tEmployee”、“tSell”和“tBook”,试按以下要求完成设计:

64-2

(1)创建一个查询,查找并显示单价高于平均单价的图书“书名”和“出版社 名称”二个字段内容,所建查询名为“qT1”。

(2)创建一个查询,按输入的售出日期查找某日期的售书情况,并按数量降序 显示“姓名”、“书名”、“数量”三个字段的内容,所建查询名为

“qT2”;当运行该查询时,应显示参数提示信息:“请输入售出日期”。 (3)创建一个查询,查找双子星座出生雇员的图书销售信息,显示“姓名”、 “售出日期”和“书名”三个字段的内容,所建查询名为“qT3”。 说明:双子星座是指5月21日(含)到6月21日(含)的日期段。

(4)创建一个查询,统计图书销售额超过2500(含)的雇员信息,并显示“姓 名”和“销售额”两个字段的内容,所建查询名为“qT4”。

********************************************************************** 考生文件夹下存在一个数据库文件“samp3.accdb”,里面已经设计好表对 象“tStudent” 和“tGrade”,同时还设计出窗体对象“fGrade”和“ fStudent”。请在此基础上按照以下要求补充“fStudent”窗体的设计:

64-3

(1)将“fStudent”窗体标题改为“团员信息显示”, 边框改为“对话框边 框”样式,取消窗体中的水平和垂直滚动条。

(2)将名称为“标签15”的标签控件名称改为“tStud”,标题改为“团员成绩”。 (3)在“fStudent”窗体装载事件中,代码设置相关属性完成团员信息输出。 (4)在“fStudent”窗体打开事件中,代码设置“子对象”控件的源对象属 性为“fGrade”窗体,并取消其“导航按钮”。

(5)单击“fStudent”窗体的“退出”命令按钮(名称为bQuit),应关闭窗 体。系统已提供了部分VBA代码,请按照VBA代码中的指示将代码补充完 整。

注意:不允许修改窗体对象“fGrade”和“fStudent”中未涉及的控件、 ;属性不允许修改表对象“tStudent” 和“tGrade”。

程序代码只允许在“*****Add*****”与“*****Add*****”之间的 空行内补充一条代码语句、不允许增删和修改其它位置已存在的语 句。

※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※ 第24套:

在考生文件夹下,“samp1.accdb”数据库文件中已建立好表对象“tStud” 和“tScore”、宏对象“mTest”和窗体“fTest”。试按以下要求,完成各种 操作:

(42-1)

(1)分析表对象“tScore”的字段构成、判断并设置其主键。

(2)删除 “tStud” 表结构的“照片”字段列、在“简历”字段之前增添一 个新字段(字段名称:团员否 数据类型:“是/否”型)。

(3)隐藏“tStud”中的“所属院系”字段列;将年龄字段的默认值设置为现 有记录中人数最多的学生年龄值。

(4)将考生文件夹下文本文件Test.txt中的数据导入到当前数据库中。其中, 第一行数据是字段名,导入的数据以“tTest”数据表命名保存。

(5)将窗体“fTest”中名为“bt2”的命令按钮,其高度设置为1厘米、左边 界设置为左边对齐“bt1”命令按钮;设置相关属性,当打开窗体“fTest ”时使“bt2” 命令按钮处于不可用状态。 (6)将宏“mTest”重命名为自动运行的宏。

********************************************************************** 考生文件夹下存在一个数据库文件“samp2.accdb”,里面已经设计好三个 关联表对象“tStud”、“tCourse”和“tScore”。此外,还提供窗体“fTest ”,试按以下要求完成设计:

(68-2)

(1)创建一个查询,查找第三季度入校的学生信息,输出其“姓名”、“年龄 ”和“性别”三个字段内容,所建查询命名为“qT1”。

(2)创建一个查询,查找年龄在所有学生平均年龄上下2岁(含)范围内的信 息,输出其“姓名”、“课程名”和“成绩”三个字段内容,所建查询命 名为“qT2” 。

(3)创建生成表查询,组成字段是没有任何爱好学生的“学号”、“姓名”和 “入校年”三列内容(其中“入校年”数据由“入校时间”字段计算得到 ,显示为四位数字年的形式),生成的数据表命名为“tTemp”,所建查询 命名为“qT3”。

(4)补充窗体“fTest”上“test1”按钮(名为“bt1”)的单击事件代码, 实现以下功能:

当单击按钮“test1”,将文本框中输入的内容与文本串“等级考试测试” 连接并消除连接串的前导和尾随空白字符,用标签“bTitle”显示连接结 果。

注意:不允许修改窗体对象“fTest”中未涉及的控件和属性;只允许在“ *****Add1*****”与“*****Add1*****”之间的空行内补充语句、 完成设计。

********************************************************************** 考生文件夹下存在一个数据库文件“samp3.accdb”,里面已经设计好表对 象“tEmployee”和查询对象“qEmployee”,同时还设计出以“qEmployee”为 数据源的报表对象“rEmployee”。试在此基础上按照以下要求补充报表设计:

68-3

(1)在报表的合适页脚区域添加一个计算控件,以输出页码。计算控件放 置在距上边0.3厘米、距左侧7厘米位置,并命名为“tPage”。规定 页码显示格式为“当前页/总页数”,如1/20、2/20、...、20/20等。

(2)报表的报表页眉节区位置添加一个标签控件,其标题显示为 “Employee基本信息”,字号为24,并命名为“bTitle”。

(3)在相关事件代码中,设置报表标题为引用标签“bTitle”的值。同时, 将其中的英文内容部分大写输出。

(4)在相关事件代码中,依据报表“聘用时间”字段值情况,设置报 表文本框“tStatus”的输出内容。具体规定是:截止2012年,聘用 期在30年(含)以上的员工,输出“老员工”标示信息;否则,输出 “普通员工”标示信息。

注意:不允许修改数据库中的表对象“tEmployee”和查询对象“

qEmployee”;不允许修改报表对象“rEmployee”中未涉及的控件 和属性;代码只允许在“*****Add*****”与“*****Add*****”之 间的空行内补充一条语句、完成设计。

※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※ 第25套:

在考生文件夹下,“samp1.accdb”数据库文件中已建立两个表对象(名为 “员工表”和“部门表”)。试按以下要求,顺序完成表的各种操作:

(65-1)

(1)将“员工表”的行高设为15。

(2)设置表对象“员工表”的年龄字段有效性规则为:大于17且小于65(不含 17和65);同时设置相应有效性文本为“请输入有效年龄”。

(3)在表对象“员工表”的年龄和职务两字段之间新增一个字段,字段名称为 “密码”,数据类型为文本,字段大小为6,同时,要求设置输入掩码使 其以密码方式显示。

(4)查找年龄在平均年龄上下1岁(含)范围内的员工,其简历信息后追加“ (平均)”文字标示信息。

(5)设置表对象“员工表”的聘用时间字段默认值为:系统日期当前年当前 月的1号;冻结表对象“员工表”的姓名字段。

(6)建立表对象“员工表”和“部门表”的表间关系,实施参照完整性。

********************************************************************** 考生文件夹下存在一个数据库文件“samp2.accdb”,里面已经设计好三个 关联表对象“tStud”、“tCourse” 和“tScore”及一个临时表对象“tTemp” 。试按以下要求完成设计:65-2

(1)创建一个查询,查找并显示入校时间非空且年龄最大的男同学信息,输出 其“学号”、“姓名”和“所属院系”三个字段内容,所建查询命名为“ qT1” 。

(2)创建一个查询,查找姓名由三个或三个以上字符构成的学生信息,输出其 “姓名”和“课程名”两个字段内容,所建查询命名为“qT2” 。

(3)创建一个查询,行标题显示学生性别,列标题显示所属院系,统计出男女 学生在各院系的平均年龄,所建查询命名为“qT3”。

(4)创建一个查询,将临时表对象“tTemp”中年龄为偶数的主管人员的“简 历”字段清空,所建查询命名为“qT4”。

********************************************************************** 考生文件夹下存在一个数据库文件“samp3.accdb”,里面已经设计了表对 象“tEmp”、窗体对象“fEmp”、宏对象“mEmp”和报表对象“rEmp”。同时, 给出窗体对象“fEmp”的“加载”事件和“预览”及“打印”两个命令按钮的 单击事件代码,试按以下功能要求补充设计。

(65-3)(19-3)

(1)将窗体“fEmp”上标签“bTitle”以特殊效果:阴影显示。

(2)已知窗体“fEmp”的三个命令按钮中,按钮“bt1” 和“bt3”的大小一 致、且左对齐。现要求在不更改“bt1” 和“bt3”大小位置的基础上, 调整按钮“bt2”的大小和位置,使其大小与“bt1” 和“bt3”相同, 水平方向左对齐“bt1” 和“bt3”,竖直方向在“bt1” 和“bt3”之 间的位置。

(3)设置系统相关属性,实现窗体对象“fEmp”打开时以重叠窗口形式显示;

设置报表对象“rEmp”的记录源属性为表对象“tEmp”。

(4)在窗体“fEmp”的“加载”事件中设置标签“bTitle”以红色文本显示; 单击“预览”按钮(名为“bt1”)或“打印”按钮(名为“bt2”), 事件过程传递参数调用同一个用户自定义代码(mdPnt)过程,实现报表 预览或打印输出;单击“退出”按钮(名为“bt3”),调用设计好的宏 “mEmp”来关闭窗体。

注意:不允许修改数据库中的表对象“tEmp”和宏对象“mEmp”;不允许 修改窗体对象“fEmp”和报表对象“rEmp”中未涉及的控件和属性。 程序代码只允许在“*****Add*****”与“*****Add*****”之间的 空行内补充一行语句、完成设计,不允许增删和修改其它位置已存 在的语句。

※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※ 第26套:

在考生文件夹下,“samp1.accdb”数据库文件中已建立两个表对象(名为 “员工表”和“部门表”)和一个窗体对象(名为“fTest”)及一个宏对象( 名为“mTest”)。试按以下要求,按顺序完成对象的各种操作:

(像20-1)

(1)删除表对象“员工表”的照片字段。

(2)设置表对象“员工表”的年龄字段有效性规则为:非空且不低于16;同时 设置相应有效性文本为“请输入合适年龄”。

(3)设置表对象“员工表”的聘用时间字段的默认值为:系统当前日期次年的 同月同日。

(4)查找出“员工表”的各个部门中年龄最大的男员工和女员工,在其对应简 历字段值后追加“***”标记字符。

(5)设置窗体对象(名为“fTest”)相关属性,实现不允许在窗体上添加新 记录的操作。

(6)删除表对象“员工表”和“部门表”之间已建立的错误表间关系,重新建 立正确关系;将宏对象(名为“mTest”)重命名为可自动运行的宏。 ********************************************************************** 考生文件夹下存在一个数据库文件“samp2.accdb”,里面已经设计好三个 关联表对象“tCourse”、“tGrade”、“tStudent”和一个空表“tTemp”,试 按以下要求完成设计:

(无)

(1)创建一个查询,查找并显示所选课程均不及格的学生信息,输出其“学号” 字段内容,所建查询命名为“qT1”。

(2)创建一个查询,统计没有选课的学生人数,输出标题为“未选数”,所建 查询命名为“qT2”。

要求用“学号”字段进行计数计算。

(3)创建一个查询,统计每班每门课程的平均成绩。要求结果用round函数取整, 显示结果如下图所示,所建查询命名为“qT3”。

(4)创建一个查询,将下半年出生男学生的“班级”、“姓名”、“性别”、 “课程名”和“成绩”等信息追加到“tTemp” 表的对应字段中,所建查 询命名为“qT4”。

********************************************************************** 考生文件夹下存在一个数据库文件“samp3.accdb”,里面已经设计了表对 象“tEmp”、窗体对象“fEmp”、报表对象“rEmp”和宏对象“mEmp”。同时, 给出窗体对象“fEmp”的若干事件代码,试按以下功能要求补充设计:

(66-3)

(1)设置系统相关属性,实现打开的窗体以重叠窗口形式显示;设置窗体对象 “fEmp”上两个命令按钮的Tab键索引顺序(即Tab键焦点移动顺序)为从 “报表输出”按钮(名为“bt1”)到“退出”按钮(名为“bt2”)。 (2)调整窗体对象“fEmp”上“退出”按钮(名为“bt2”)的大小和位置, 要求大小与“报表输出”按钮(名为“bt1”)一致,且上边对齐“报表 输出”按钮,左边距离“报表输出”按钮1厘米(即“bt2”钮的左边距 离“bt1”钮的右边1厘米)。

(3)将报表记录数据按照先姓名升序再年龄降序排列显示;设置相关属性,将 页面页脚区域内名为“tPage”的文本框控件实现以下格式的页码输出: \。

(4)加载窗体时,代码将“bTitle”标签的标题重置为“员工最大年龄差为 XXX”,其中“XXX”是从“tEmp”表中获取计算得到;单击“报表输出” 按钮,事件代码会弹出下图显示的消息框,以选择是否进行预览报表“ rEmp”;单击“退出”按钮,调用设计好的宏“mEmp”来关闭窗体。根 据以上描述,将VBA代码补充完整。

注意:不允许修改数据库中的表对象“tEmp”和宏对象“mEmp”;不允许 修改窗体对象“fEmp”和报表对象“rEmp”中未涉及的控件和属性。 程序代码只允许在“*****Add*****”与“*****Add*****”之间的 空行内补充一行语句、完成设计,不允许增删和修改其它位置已存 在的语句。

※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※ 第27套:

在考生文件夹下,存在一个数据库文件“samp1.accdb” 、一个Excel文件 “tScore.xls”和一个图像文件“photo.bmp”。在数据库文件中已经建立了一 个表对象“tStud”。试按以下操作要求,完成各种操作:

(69-1)

(1)设置“ID”字段为主键;设置“ID”字段的相应属性,使该字段在数据表 视图中的显示标题为“学号”。

(2)将“年龄”字段的默认值属性设置为表中现有记录学生的平均年龄值(四 舍五入取整),“入校时间”字段的格式属性设置为“长日期”。

(3)设置“入校时间”字段的有效性规则和有效性文本。有效性规则为:输入 的入校时间必须为9月;有效性文本内容为“输入的月份有误,请重新输 入”。

(4)将学号为“20041002”学生的“照片”字段值设置为考生文件夹下的“ photo.bmp”图像文件(要求使用“由文件创建”方式)。

(5)将“政治面目”字段改为下拉列表选择,选项为“团员”、“党员”和“ 其他”三项。

(6)将考生文件夹下的“tScore.xlsx”文件导入到“samp1.mdb”数据库文件 中,第一行包含列标题,表名同excel文档主文件名,主键为表中的“ID” 字段。

********************************************************************** 考生文件夹下存在一个数据库文件“samp2.accdb”,里面已经设计好表对 象“tStud”、“tScore”和“tCourse”,试按以下要求完成设计:

(69-2)

(1)创建一个查询,查找年龄低于所有学生平均年龄的学生党员信息,输出其 “姓名”、“性别”和“入校时间”。所建查询命名为“qT1”。

(2)创建一个查询,按学生姓氏查找学生的信息,并显示“姓名”、“课程名 ”和“成绩”。当运行该查询时,应显示提示信息:“请输入学生姓氏” 。所建查询命名为“qT2”。 说明:这里不用考虑复姓情况。

(3)创建一个查询,第一列显示学生性别,第一行显示课程名称,以统计并显 示各门课程男女生的平均成绩。要求计算结果用round函数取整,所建查 询命名为“qT3”。

(4)创建一个查询,运行该查询后生成一个新表,表名为“tTemp”,表结构 包括“学号”和“平均成绩”两个字段,表内容为选课平均成绩及格的 学生记录。所建查询命名为“qT4”。要求创建此查询后,运行该查询, 并查看运行结果。

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

像46-3

(1)在窗体的“窗体页眉”中距左边0.4厘米、距上边1.2厘米处添加一个直线 控件,控件宽度为10.5厘米,控件命名为“tLine”。

(2)将窗体中名称为“lTalbel”的标签控件上的文字颜色改为“蓝色\( 蓝色 代码为#0072BC)、字体名称改为“华文行楷”、字体大小改为22。 (3)将窗体边框改为“细边框”样式,取消窗体中的水平和垂直滚动条、记录 选择器、导航按钮和分隔线,并且只保留窗体的关闭按钮。

(4)假设“tStud”表中,“学号”字段的第5位和6位编码代表该生的专业信息 ,当这两位编码为“10”时表示“信息”专业,为其他值时表示“管理” 专业。设置窗体中名称为“tSub”的文本框控件的相应属性,使其根据“ 学号”字段的第5位和第6位编码显示对应的专业名称。

(5)在窗体相关事件中,代码重置窗体标题为“XXXX年度党员学生信息”,这 里XXXX为系统日期四位当前年;代码设置窗体的记录源为表对象“tStud” 中的党员信息。请按照VBA代码中的指示将实现此功能的代码填入指定的 位置中。

(6)在窗体中有一个“退出”命令按钮,名称为“CmdQuit”,其功能为关闭“ fStud”窗体。请按照VBA代码中的指示将实现此功能的代码填入指定的位 置中。

注意:不允许修改窗体对象“fStud”中未涉及的控件、属性和任何VBA代 码;不允许修改表对象“tStud”;

程序代码只允许在“*****Add*****”与“*****Add*****”之间的 空行内补充一行语句、完成设计,不允许增删和修改其它位置已存 在的语句。

※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※ 第28套:

在考生文件夹下,“samp1.accdb”数据库文件中已建立两个表对象(名为 “员工表”和“部门表”)和一个窗体对象(名为“fTest”)及一个宏对象( 名为“mTest”)。试按以下要求,按顺序完成对象的各种操作:

(像56-1)

(1)将编号为“000002”员工的“照片”字段值设置为考生文件夹下的“ photo.bmp”图像文件(要求使用“由文件创建”方式)。

(2)设置表对象“员工表”的有效性规则为:员工聘用时必须年满16岁;同时 设置相应有效性文本为“请合法聘用员工”。 说明:一年的天数=365.24天

(3)设置表对象“员工表”的聘用时间字段的默认值为:系统当前日期次年的 同月1日。

(4)查找出“员工表”中聘用时年龄最小和最大的男女员工,在其对应简历字 段值后追加“***”标记字符。

(5)设置窗体对象“fTest”的“筛选”属性,实现窗体男员工信息输出;设 置相关属性,实现窗体对象(名为“fTest”)上的记录数据不允许编辑 的操作。

(6)删除表对象“员工表”和“部门表”之间已建立的错误表间关系,重新建 立正确关系;将宏对象(名为“mTest”)重命名为可自动运行的宏。 ********************************************************************** 考生文件夹下存在一个数据库文件“samp2.accdb”,里面已经设计好表对 象“tQuota”和“tStock”,试按以下要求完成设计:

(1)创建一个查询,查找库存数量高于所有产品平均库存数的产品,输出其“ 产品名称”、“规格”、“库存数量”和“最高储备”等字段内容,查询 名为qT1。

(2)创建一个查询,统计某类产品的库存情况,并显示“产品类别”、“产品 名称”和“库存数量”三列内容,所建查询名为“qT2”;当运行该查询 时,提示框中应显示“请输入产品类别”。 说明:产品类别为“产品ID”字段值的第1位。

(3)创建一个查询,查找库存数量不在合理储备范围内的产品,并显示“产品 名称”、“规格”、“库存数量”、 “最低储备”和“最高储备”四个 字段内容。所建查询名为“qT3”。

(4)创建一个查询,统计每类产品不同单位的库存金额总计。要求,行标题显 “产品名称”,列标题显示“单位”。所建查询名为“qT4”。 示说明:库存金额=单价×库存数量。

********************************************************************** 考生文件夹下存在一个数据库文件“samp3.accdb”,里面已经设计好表对 象“tStud”、窗体对象“fSys”和报表对象“rStud”。请在此基础上按照以 下要求补充“fSys”窗体和“rStud”报表的设计:

(1)在“rStud”报表的报表页眉节区位置添加一个标签控件,其名称为“ rTitle”,其显示文本为“非团员基本信息表”;将报表标题栏上的显 示文本设置为“非团员信息”;将名称为“tSex”的文本框控件的输出 内容设置为“性别”字段值。在报表页脚节区添加一个计算控件,其名 称为“tCount”,显示报表学生人数。

(2)将“fSys”窗体的边框样式设置为“细边框”,取消窗体中的水平和垂 直滚动条、导航按钮、记录选择器、分隔线、最大化按钮和最小化按钮。 (3)将“fSys”窗体中“用户名称”(名称为“lUser”)和“用户口令” (名称为“lPass”)两个标签上的文字颜色改为红色(红色代码为 #FF0000)、字体粗细改为“加粗”。

(4)将“fSys”窗体中名称为“tPass”的文本框控件的内容以密码形式显 示;将名称为“cmdEnter”的命令按钮从灰色状态设为可用;将控件的 Tab移动次序设置为:“tUser”→“tPass” →“cmdEnter” → “cmdQuit”。

(5)试根据以下窗体功能和报表输出要求,补充已给事件代码,并运行调试。 在窗体中有“用户名称”和“用户密码”两个文本框,名称分别为“ tUser”和“tPass”,还有“确定”和“退出”两个命令按钮,名称分别为“ cmdEnter”和“cmdQuit”。 窗体加载时,重置“bTitle”标签的标题为“非 团员人数为XX”,这里XX为从表查询计算得到;在输入用户名称和用户密码后 ,单击“确定”按钮,程序将判断输入的值是否正确,如果输入的用户名称为 “csy”,用户密码为“1129”,则显示提示框,提示框标题为“欢迎”,显 示内容为“密码输入正确,打开报表!”,单击“确定”按钮关闭提示框后, 打开“rStud”报表,代码设置其数据源输出非团员学生信息;如果输入不正 确,则提示框显示“密码错误!”,同时清除“tUser”和“tPass”两个文本 框中的内容,并将光标移至“tUser”文本框中。当单击窗体上的“退出”按 钮后,关闭当前窗体。

以上涉及计数操作统一要求用“*”进行。

注意:不允许修改报表对象“rStud”中已有的控件和属性;不允许修改 表对象“tStud”。不允许修改窗体对象“fSys”中未涉及的控件、属性和任 何VBA代码;只允许在“*****Add*****”与“*****Add*****”之间的空行内 补充一条代码语句、不允许增删和修改其它位置已存在的语句。

※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※ 第29套:

在考生文件夹下,存在一个数据库文件“samp1.accdb”。在数据库文件中 已经建立了两个表对象“tStock”和“tQuota”。试按以下操作要求,完成各 种操作:

(像48-1)

(1)在“tStock”表的“产品名称”和“规格”字段之间增加“单位”字段, 该字段的数据类型为文本,字段大小为1;将新添加到“tStock”表中的 记录的“单位”字段默认值设置为“只”。

(2)设置“tStock”表的“规格”字段的输入掩码属性,输入掩码的格式为: “220V- W”。其中,“-”与“W”之间为两位,且只能输入0~9之间 的数字。

(3)设置“tQuota”表的有效性规则为:产品最高储备是最低储备的10倍或 10倍以上;对应有效性文本为“请合理设置产品最高最低储备值”。 (4)分析产品的库存金额(库存金额=出厂价*库存数量),查出最大值和最小 值金额产品,在其“说明”字段中输入“***”标记字符。

(5)将“tQuota”表的单元格效果改为“凹陷”,字体改为“黑体” (6)建立“tQuota”表与“tStock”表之间的关系,并实施参照完整性。

********************************************************************** 考生文件夹下存在一个数据库文件“samp2.accdb”,里面已经设计好表对 象“tQuota”和“tStock”,试按以下要求完成设计:

48-2

(1)创建一个查询,查找库存数量距离对应最高和最低储备中间值最近的产品 信息,输出其“产品名称”、“规格”、“库存数量”、“最高储备”和 “最低储备”等字段内容,查询名为qT1。

(2)创建一个查询,计算每类产品库存金额合计,并显示“产品名称”和“库 存金额”两列数据。所建查询名为“qT2”。 说明:库存金额=单价×库存数量。

(3)创建一个查询,查找单价低于平均单价的产品,并按“产品名称”升序和 “单价”降序显示“产品名称”、“规格”、“单价”和“库存数量”等 字段内容。所建查询名为“qT3”。

(4)创建一个查询,运行该查询后可将“tStock”表中所有记录的“单位”字 段值设为“只”。所建查询名为“qT4”。要求创建此查询后,运行该查 询,并查看运行结果。

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

67-3

(1)在报表“rReader”的报表页眉节区内添加一个标签控件,其名称为“ bTitle”,标题显示为“高级读者借阅情况”,字体名称为“黑体”,字 体大小为22,同时将其安排在距上边0.5厘米、距左侧2厘米的位置。

(2)设计报表“rReader”的主体节区为“tSex”文本框控件设置数据来源显示 性别信息,并要求按“借书日期”字段升序显示,“借书日期”的显示格 式为“长日期”的形式。

(3)设置窗体“bList”按钮的标题为“高级读者信息”;单击该按钮,其事件 代码预览方式打开“rReader”报表,条件输出高级读者(职称为“教授” 和“副教授”的读者)借阅信息。

(4)窗体加载时设置窗体标题属性为系统当前日期,设置“fTitle”标签的标 题为“读者借阅信息”。

注意:不允许修改窗体对象“fReader”和报表对象“rReader”中未涉及

的控件和属性;不允许修改表对象“tBorrow”、“tReader”和“ tBook”及查询对象“qT”的内容;

程序代码只允许在“*****Add*****”与“*****Add*****”之间的 空行内补充一行语句、完成设计,不允许增删和修改其它位置已存 在的语句。

※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※ 第30套:

在考生文件夹下,“samp1.accdb”数据库文件中已建立两个表对象(名为 “员工表”和“部门表”)和一个窗体对象(名为“fTest”)及一个宏对象( 名为“mTest”)。试按以下要求,按顺序完成对象的各种操作:

(像20-1)

(1)删除表对象“员工表”的照片字段。

(2)设置表对象“员工表”的年龄字段有效性规则为:非空且不高于60;同时 设置相应有效性文本为“请输入合适年龄”。

(3)设置表对象“员工表”的聘用时间字段的默认值为:系统当前日期当年当 月的最后一天。

(4)查找出“员工表”的各个部门中年龄最小的男员工和女员工,在其对应简 历字段值后追加“***”标记字符。

(5)设置相关属性,实现窗体对象(名为“fTest”)上的记录数据不允许删 除的操作。

(6)删除表对象“员工表”和“部门表”之间已建立的错误表间关系,重新建 立正确关系;将宏对象(名为“mTest”)重命名为可自动运行的宏。 ********************************************************************** 考生文件夹下存在一个数据库文件“samp2.accdb”,里面已经设计好表 对象“tQuota”和“tStock”,试按以下要求完成设计:

(59-2)

(1)创建一个查询,按照产品名称统计库存总数超过10万箱的产品总库存 数量,并显示“产品名称”和“库存数量合计”。所建查询名为“ qT1”。

(2)创建一个查询,查找各类产品中平均单价最高的产品,并显示其“产 品名称”。所建查询名为“qT2”。

(3)创建一个查询,查找“最高储备”和“最低储备”相差值低于所有产 品最高最低储备差平均值的产品,显示其“产品名称”和“规格”两 个字段内容。所建查询名为“qT3”。

(4)创建一个查询,运行该查询后生成一张新表,表名为“tNew”,表结 构为“产品ID”、“产品名称”、“单价”、“库存数量”、“最高 储备”和“最低储备”等六个字段,表内容为库存数高于最高储备数 量或低于最低储备数量的所有产品记录。所建查询名为“qT4”。 要求:

1. 所建新表中的记录按照“产品ID”升序保存。 2. 创建此查询后,运行该查询,并查看运行结果。

********************************************************************** 考生文件夹下存在一个数据库文件“samp3.accdb”,里面已经设计好表 对象“tStud”、窗体对象“fSys”和报表对象“rStud”。请在此基础上按 照以下要求补充“fSys”窗体和“rStud”报表的设计:

59-3

(1)在“rStud”报表的报表页眉节区位置添加一个标签控件,其名称为 “bTitle”,其显示文本为“团员基本信息报表”;将报表标题栏上 的显示文本设置为“团员基本信息”;将名称为“tSex”的文本框控 件的输出内容设置为“性别”字段值。在报表页脚节区添加一个计算 控件,其名称为“tAvg”,显示学生的平均年龄。

(2)将“fSys”窗体的边框样式设置为“对话框边框”,取消窗体中的水 平和垂直滚动条、导航按钮、记录选择器、分隔线、控制框、关闭按 钮、最大化按钮和最小化按钮。

(3)将“fSys”窗体中“用户名称”(名称为“lUser”)和“用户口令

”(名称为“lPass”)两个标签上的文字颜色改为蓝色(蓝色代码 为#0072BC)、字体粗细改为“加粗”。

(4)将“fSys”窗体中名称为“tPass”的文本框控件的内容以密码形式 显示;将名称为“cmdEnter”的命令按钮从灰色状态设为可用;将 控件的Tab移动次序设置为:“tUser”→“tPass” →“cmdEnter” → “cmdQuit”。

(5)试根据以下窗体功能和报表输出要求,补充已给事件代码,并运行 调试。

在窗体中有“用户名称”和“用户密码”两个文本框,名称分别为“ tUser”和“tPass”,还有“确定”和“退出”两个命令按钮,名称分别 为“cmdEnter”和“cmdQuit”。 窗体加载时,重置窗体标题为“系统登 录”;在输入用户名称和用户密码后,单击“确定”按钮,程序将判断输 入的值是否正确,如果输入的用户名称为“cueb”,用户密码为“1234”, 则显示提示框,提示框标题为“欢迎”,显示内容为“密码输入正确,打 开报表!”,单击“确定”按钮关闭提示框后,打开“rStud”报表输出团 员学生信息;如果输入不正确,则提示框显示“密码错误!”,同时清除 “tUser”和“tPass”两个文本框中的内容,并将光标移至“tUser”文 本框中。当单击窗体上的“退出”按钮后,关闭当前窗体。

注意:不允许修改报表对象“rStud”中已有的控件和属性;不允许修 改表对象“tStud”。不允许修改窗体对象“fSys”中未涉及的控件、属性 和任何VBA代码;只允许在“*****Add*****”与“*****Add*****”之间的 空行内补充一条代码语句、不允许增删和修改其它位置已存在的语句。

※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※ 第31套:

考生文件夹下存在一个数据库文件“samp1.mdb”,里面已经设计好表对象 “tStud”。请按照以下要求,完成对表的修改:

(71-1)

(1)将“年龄”字段的字段大小改为“整型”;将“简历”字段的说明设置 为“自上大学起的简历信息”;将“备注”字段删除。

(2)设置表对象的有效性规则为:学生的出生年份应早于(不含)入校年 份;同时设置相应有效性文本为“请输入合适的年龄和入校时间”。 要求:使用函数返回有关年份。

(3)设置“性别”字段的默认值为“女”;设置“性别”字段值的输入方式 为从下拉列表中选择“男”或“女”选项值。

(4)设置数据表显示的字体大小为12、行高为18,设置数据表中显示所有字 段。

(5)将学号为“20011001”学生的照片信息换成考生文件夹下的“

photo.bmp”图像文件;将姓名中的“青”改为“菁”;在党员学生的简 历文字的句号前加“,在校入党”等文字。 (6)将宏“打开表”重命名为自动执行的宏。

********************************************************************** 考生文件夹下存在一个数据库文件“samp2.mdb”,里面已经设计好三个关 联表对象“tStud”、“tCourse” 、“tScore”和一个临时表对象“tTemp”。 试按以下要求完成设计:

(71-2)

(1)创建一个查询,按所属院系统计学生的平均年龄,字段显示标题为“院系 ”和“平均年龄”,所建查询命名为“qT1” 。 要求:平均年龄四舍五入取整处理。

(2)创建一个查询,查找上半年入学的学生,并显示“姓名”、“性别”、“ 课程名”和“成绩”等字段内容,所建查询命名为“qT2”。

(3)创建一个查询,查找没有选课的同学,并显示其“学号”和“姓名”两个 字段内容,所建查询命名为“qT3”。

(4)创建删除查询,将表对象“tTemp”中年龄值高于平均年龄(不含平均年 龄)的学生记录删除,所建查询命名为“qT4”。

**********************************************************************

考生文件夹下存在一个数据库文件“samp3.mdb”,里面已经设计好表对象 “tStud”,同时还设计出窗体对象“fStud”。请在此基础上按照以下要求补 充“fStud”窗体的设计:

(71-3)

(1)在窗体的“窗体页眉”中距左边0.4厘米、距上边1.2厘米处添加一个直线 控件,控件宽度为10.5厘米,控件命名为“tLine”;将窗体中标签控件“ lTalbel”上的文字改为“隶书”,字号改为18。

(2)打开窗体时,窗体标题自动显示为标签控件“lTalbel”的内容,并且自动 将该控件上的文字颜色改为“蓝色\,请按照VBA代码中的指示将代码补充 完整。

(3)将窗体边框改为“细边框”样式,取消窗体中的水平和垂直滚动条、记录 选择器、导航按钮和分隔线;并且只保留窗体的关闭按钮。

(4)假设“tStud”表中“学号”字段的第5位和第6位编码代表该生的专业信 息,当这两位编码为“10”时表示“信息”专业,为其他值时表示“管理 ”专业。设置窗体中名称为“tSub”文本框控件的相应属性,使其根据“ 学号”字段的第5位和第6位编码显示对应的专业名称。

(5)在窗体中有一个“退出”命令按钮,名称为“CmdQuit”,其功能为关闭“ fStud”窗体。请按照VBA代码中的指示将实现此功能的代码补充完整。 注意:不允许修改窗体对象“fStud”中未涉及的控件、属性和任何VBA代 码;不允许修改表对象“tStud”;

程序代码只允许在“*****Add*****”与“*****Add*****”之间的 空行内补充一行语句完成设计,不允许增删和修改其它位置已存在 的语句。

※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※ 第32套:

在考生文件夹下,存在一个数据库文件“samp1.mdb”。在数据库文件中已 经建立了一个表对象“学生基本情况”。试按以下操作要求,完成各种操作:

(72-1)

(1)在数据表视图中,将“学生基本情况”表中的所有字段显示出来。

(2)将“学生基本情况”表名称更改为“tStud”,并设置表的主键字段,使其 能够唯一标识表中记录;设置“身份ID”字段的相应属性,使该字段在数 据表视图中的显示标题为“身份证”。

(3)在“家长身份证号”和“语文”两字段之间增加一个字段,名称为“电 话”,类型为文本,大小为12;设置该字段输入掩码为:前四位固定为“ 010-”,后八位为数字。将“姓名”字段设置为有重复索引,且必须有 值。

(4)在“tStud”表中增加一个字段,字段名为“总成绩”,字段值为: 总成绩 = 语文 + 数学 + 外语。

计算结果的“结果类型”为“整型”,“格式”为“标准”,“小数位 数”为0。

(5)将“tStud”表拆分为两个新表,表名分别为“tStudent”和“tScore”。 其中“tStudent”表结构为:编号、身份ID,姓名,家长姓名,家长身份 证号,电话;“tScore”表结构为:编号、语文、数学、外语、总成绩。 要求:保留“tStud”表。

(6)设置“tStudent”和“tScore”表之间的关系。

********************************************************************** 考生文件夹下存在一个数据库文件“samp2.mdb”,里面已经设计好表对象 “tCourse”、“tScore”和“tStud”,试按以下要求完成设计:

(72-2)

(1)创建一个查询,查找2005年入学的党员学生选课成绩,并显示“姓名”、 “性别”、“入校时间”、“课程名”和“成绩”五列信息,所建查询命 名为“qT1” 。

要求:使用函数获取入校年份。

(2)创建一个查询,按输入的分数查找选课成绩平均值大于所输入分数的学生

信息,并显示“学号”和“平均成绩”。当运行该查询时,应显示提示信 息:“请输入要比较的分数:”,所建查询命名为“qT2”。

(3)创建一个查询,统计并显示各班每门课程的平均成绩,统计显示结果如下 图所示,所建查询命名为“qT3” 。

说明:“学号”字段的前8位为班级编号。 要求:使用Round函数获取平均成绩的整数值。

(4)创建一个查询,统计2门以上(含2门)课程不及格的学生,并将其“姓 名”和统计的“不及格门次”放到一个新表中,表名为“tNew”,表结 构为“姓名”和 “不及格门次”,所建查询命名为“qT4”。 要求:①使用“成绩”字段统计不及格课程的门次。 ②创建此查询后,运行该查询,并查看运行结果。 ************************************************

考生文件夹下存在一个数据库文件“samp3.mdb”,里面已经设计好表对象 “tStud”、查询对象“qStud”和“fTimer”窗体对象,同时还设计出以

“qStud”为数据源的报表对象“rStud”。试在此基础上按照以下要求补充报 表和窗体设计:

(72-3)

(1)在报表的报表页眉节区添加一个标签控件,其名称为“bTitle”,显示内 容为“学生信息表”;预览报表时,报表标题显示内容为“ ****年度#####”,请按照VBA代码中的指示将代码补充完整。

说明:①显示标题中,“****”为本年度年份,要求使用函数获取。 ②显示标题中,“#####”为标签控件“bTitle”中的内容。 要求:标题显示内容中间和前后不允许出现空格。

(2)在报表的主体节区添加一个文本框控件,显示“姓名”字段值。该控件放 置在距上边0.1厘米、距左边3.2厘米,并命名为“tName”。

(3)按“编号”字段前四位分组统计每组记录的平均年龄,并将统计结果显示 在组页脚节区。计算控件命名为“tAvg”。 要求:使用分组表达式进行分组。

(4)有一个名为“fTimer”的计时器窗体。运行窗体后,窗体标题自动显示为 “计时器”;单击“设置”按钮(名称为“cmdSet”),在弹出的输入框 中输入计时秒数(10以内的数);单击“开始”按钮(名称为“cmdStar”) 开始计时,同时在文本框(名称为“txtList”)中显示计时的秒数。计时 时间到时,停止计时并响铃,同时将文本框清零。根据以上描述,按照VBA 代码中的指示将代码补充完整。

注意:不允许改动数据库中的表对象“tStud”和查询对象“qStud”,同 时也不允许修改报表对象“rStud”和窗体对象“fTimer”中已有的 以及未涉及的控件和属性。程序代码只允许在“*******Add******” 与 “*******Add******”之间的空行内补充一行语句、完成设计, 不允许增删和修改其它位置已存在的语句。

※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※ 第33套:

考生文件夹下存在一个数据库文件“samp1.mdb”,里面已经设计好表对象 “tStud”、窗体对象“fTimer”和宏对象“mTimer”。请按照以下要求,完成 对表的修改:

(73-1)

(1)根据“tStud”表的字段构成,判断并设置主键;删除“备注”字段。 (2)将“年龄”字段的默认值属性设置为出现次数最多的年龄值。

(3)将“入校时间”字段的显示设置为“××月××日××××年”形式(注 意:要求月日为两位显示、年为四位显示,如“12月15日2005年”);将 其默认值设置为下一年度的9月1日(要求:本年度的年号必须用函数获 取)。

(4)根据表“tStud”中“所属院系”字段的值修改“学号”,“所属院系” 为“01”,将“学号”的第5位改为“1”;“所属院系”为“02”,将“ 学号”的第5位改为“2”,依次类推。

(5)设置数据表显示的字体大小为14、行高为18;将第(4)步操作完成后, 学号为“20011001”学生的“照片”字段数据设置成考生文件夹下的“ photo.bmp”图像文件;将冻结的“姓名”字段解冻;将有“摄影”好 爱的记录全部删除。

(6)将宏“mTimer”重命名保存为自动执行的宏。

********************************************************************** 考生文件夹下存在一个数据库文件“samp2.mdb”,里面已经设计好两个表 对象“tStud”和“tScore”。试按以下要求完成设计:

(73-2)

(1)创建一个查询,计算并输出学生最大年龄与最小年龄的差值,显示 标题为“s_data”,所建查询命名为“qT1”;

(2)创建一个查询,查找与所有学生平均年龄相差1岁的学生信息,并 显示“姓名”、“性别”和“入校日期”三个字段内容,所建查询 命名为“qT2”。

要求:对平均年龄取整,并且使用Round函数取平均年龄的整数值。 (3)创建一个查询,按输入的出生地查找具有指定地名的学生信息,并 显示“姓名”、“性别”、“年龄”和“计算机”四个字段内容。 当运行该查询时,应显示提示信息“请输入出生地”。所建查询命 命名为“qT3”。

说明:出生地信息从“简历”字段获取。

(4)创建一个查询,将“tStud”表中年龄最大的2名女生团员学生的信 息保存到新建表中,新建表名为“tTemp”表,表中字段为“学号” 、“姓名”、“性别”和“年龄”,所建查询命名为“qT4”。 要求:创建查询后,运行查询并查看结果。

********************************************************************** 考生文件夹下存在一个数据库文件“samp3.accdb”,里面已经设计了表对 象“tEmp”、窗体对象“fEmp”、报表对象“rEmp”和宏对象“mEmp”。同时, 给出窗体对象“fEmp”上一个按钮的单击事件代码,试按以下功能要求补充设计:

(45-3)

(1)打开窗体时设置窗体标题为“XXXX年信息输出”显示,其中“XXXX”为系统 当前年份(要求用相关函数获取),例如,2013年信息输出。窗体“打开” 事件代码已提供,请补充完整。

(2)调整窗体对象“fEmp”上“退出”按钮(名为“bt2”)的大小和位置,要 求大小与“报表输出”按钮(名为“bt1”)一致,且左边对齐“报表输出 ”按钮,上边距离“报表输出”按钮1厘米(即“bt2”钮的上边距离“bt1 ”钮的下边1厘米)。

(3)利用表达式将报表记录数据按照姓氏分组升序排列,同时要求在相关组页 眉区域添加一个文本框控件(命名为“tm”),设置属性显示出姓氏信息 来,如“陈”、“刘”、...等。

注意,这里不用考虑复姓等特殊情况。所有姓名的第一个字符视为其姓氏 信息。

(4)单击窗体“报表输出”按钮(名为“bt1”),调用事件代码实现以预览方 式打开报表“rEmp”;单击“退出”按钮(名为“bt2”),调用设计好的 宏“mEmp”来关闭窗体。

注意:不允许修改数据库中的表对象“tEmp”和宏对象“mEmp”;不允许

修改窗体对象“fEmp”和报表对象“rEmp”中未涉及的控件和属性。 程序代码只允许在“*****Add*****”与“*****Add*****”之间的 空行内补充一行语句、完成设计,不允许增删和修改其它位置已存 在的语句。

※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※ 第34套:

在考生文件夹下,已有“samp1.mdb”数据库文件和“tCourse.xlsx”文件 ,“samp1.mdb”中已建立表对象“tStud”和“tGrade”,试按以下要求,完 成表的各种操作:

(74-1)

(1) 将考生文件夹下的“tCourse.xlsx”文件导入到“samp1.mdb”数据库 中,表名不变;按下图所示内容修改“tCourse”表的结构;根据“ tCourse”表字段构成,判断并设置主键。

(2) 设置“tCourse”表“学时”字段的有效性规则为:必须输入非空且大 于等于0的数据;设置“开课日期”字段的默认值为本年度九月一日( 要求:本年度年号必须由函数获取)。设置表的格式为:浏览数据表 时,“课程名称”字段列不能移出屏幕,且网格线颜色为黑色。

(3) 设置“tStud”表“性别”字段的输入方式为从下拉列表中选择“男” 或“女”选项值;设置“学号”字段的相关属性为:只允许输入8位 的0-9数字;将姓名中的“小”改为“晓”。

(4) 将“tStud”表中“善于表现自己”的学生记录删除;设置表的有效性 规则为:学生的出生年份应早于(不含)入校年份;设置表的有效性 文本为:请输入合适的年龄和入校时间。 要求:使用函数获取有关年份。

(5) 在“tGrade”表中增加一个字段,字段名为“总评成绩”,字段值为: 总评成绩 = 平时成绩*40% + 考试成绩*60%

计算结果的“结果类型”为“整型”,“格式”为“标准”,“小数 位数”为0。

(6) 建立三表之间的关系。

********************************************************************** 考生文件夹下存在一个数据库文件“samp2.accdb”,里面已经设计好表对象 “tOrder”、“tDetail”、“tEmployee”和“tBook”,试按以下要求完成设 计:

(49-2)

(1)创建一个查询,查找清华大学出版社出版的图书中定价大于等于20且小于 等于30的图书,并按定价从大到小顺序显示“书籍名称”、“作者名”和 “出版社名称”。所建查询名为“qT1”。

(2)创建一个查询,查找某月出生雇员的售书信息,并显示“姓名”、“书籍 名称”、“订购日期”、“数量”和“单价”。当运行该查询时,提示框 中应显示“请输入月份:”。所建查询名为“qT2” 。

(3)创建一个查询,计算每名雇员的奖金,显示标题为“雇员号”和“奖金” 。所建查询名为“qT3” 。 说明:销售金额 = 单价*数量。

奖金 = 销售金额合计数×5%。

(4)创建一个查询,查找单价低于定价的图书,并显示“书籍名称”、“类别 ”、“作者名”、“出版社名称”。所建查询名为“qT4”。

********************************************************************** 考生文件夹下存在一个数据库文件“samp3.mdb”。“samp3.mdb”数据库里 面已经设计了表对象“tEmp”和“tGroup”、窗体对象“fEmp”、报表对象“ rEmp”和宏对象“mEmp”。试在此基础上按照以下要求补充设计:

(74-3)

(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*****”之间的空行内补充一条语 句、完成设计,不允许增删和修改其它位置已存在的语句。