72 

一、基本操作

在考生文件夹下,存在一个数据库文件"samp1.mdb",在数据库文件中已经建立了一个
表对象"学生基本情况",试按以下操作要求,完成各种操作
(1)在数据表视图中，将"学生基本情况"表中的所有字段显示出来
(2)将"学生基本情况"表名称更改为"tStud",并设置表的主键字段,使其能够唯一标识表中记录,设置"身份ID"
字段的相应属性,使该字段在数据表视图中的显示标题为"身份证"
(3)在"家长身份证号"和"语文"两个字段之间增加一个字段,名称为"电话",类型为文本,大小为12，设置该字段
输入掩码为:前四位固定为"010-",后八位为数字,将"姓名"字段设置为有重复索引,且必须有值
(4)在"tStud"表中增加一个字段,字段名为"总成绩".字段值为:总成绩=语文+数学+外语,计算结果的"结果类型"
为"整型","格式"为"标准"，"小数位数"为0.
(5)将tStud表拆分为两个新表,表名分别为"tStudent"和"tScore",其中"tStudent"表结构为:编号，
身份ID,姓名，家长姓名,家长身份证号,电话;"tScore"表结果为:编号，语文，数学，外语，总成绩
要求:保留"tStud"表
(6)设置"tStudent"和"tScore"表之间的关系

2简单应用.

在考生文件夹下存在一个数据库文件"samp2.mdb",里面已经设计好表对象"tCoure",
"tScore","tStud",试按以下要求完成设计:
(1)创建一个查询,查找2005年入学的党员学生选课成绩,并显示"姓名"，"性别","入学时间",
"课程名"和"成绩"五列信息，所建查询命名为"qT1"
(2)创建一个查询，按输入的分数查找选课成绩平均值大于所输入分数的学生信息,并显示"学号"和
"平均成绩"当运行该查询时,应显示提示信息:"请输入要比较的分数:",所建查询命名为"qT2"
(3)创建一个查询,统计并显示各班每门课程的平均成绩,统计显示结果如下图所示,缩减查询命名为"qT3"
说明:"学号"字段的前8位为班级编号
要求:使用Round函数获取平均成绩的整数值

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

3.综合应用

在考生文件夹下存在一个数据库文件"samp3.mdb",里面已经设计好表对象"tStud",查询对象
"qstud"和"fTimer"窗体对象,同时还设计出以"qStud"为数据源的报表对象"rStud"
试在次基础上按照如下要求补充报表和窗体设计
(1)在报表的报表也没节去添加一个标签控件,其名称为"bTitle",显示内容为"学生信息表";预览报表时,报表
标题显示内容为"****年度#####",请按照VBA代码中的指示将代码补充完整
说明:显示标题中,"****"为本年度年份,要求使用函数获取
      显示标题中,"#####"为标签控件"bTitle"中的内容
（2）在报表的主体节去添加一个文本框控件,显示"姓名"字段值。该控件放置在距上边0.1厘米,距左边
3.2厘米,并命名为"tName"
 (3)按"编号"字段前四位分组统计每组记录的平均年龄,并将统计结果显示在组页脚节去,计算控件命名
为"tAvg"
要求:使用分组表达式进行分组
(4)有一个名为"fTimer"的计时器窗体,运行窗体后,窗体标题自动显示为"计时器",单击"设置"按钮
(名称为"cmdSet"),在弹出的输入框中输入计时秒数(10以内的数),单击"开始"按钮(名称为"cmdstart")
开始计时,同时在文本框(名称为"txtList")中显示计时的秒数,计时时间到时,停止计时并响铃,同时将
文本框清零,根据以上描述,按照VBA代码中的指示将代码补充完整

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