计算机二操作必考题（操作题题库）

第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页，共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的报表主体节区中名为“性别”的文本框显示内

本文来源：https://www.bwwdw.com/article/ho1o.html