在考生文件夹下，存在一个数据库文件“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”和宏对象“