实验四 成绩查询.docVIP

实验四 成绩查询 一、实验目的 1.熟悉1.建立一个满足对成绩进行各种查询所需的视图； 2.建立一个有多页面页框的表单，使表单运行时通过页面的选择，能分别查询全体学生成绩概况、按班级、按学号、按课程查询学生成绩。 三、实验步骤 （一）进入项目管理器 1.启动Visual Foxpro。 2.打开项目管理器“学生成绩管理系统” 从“文件”→“打开”→找到文件“学生成绩管理系统.PJX”，选中并按“确定”键。 （二）建立成绩查询所需要的视图 ·单击项目管理器“数据”选项卡，展开“数据库”，单击本地视图 → 新建 → 新建视图。 ·添加“班级号名”，再添加“学生”，此时出现图4-1界面，按“确定”按钮。 图4-1 ·再添加“学生选课”，在出现上述类似界面时同样按“确定”按钮。 ·最后添加“课程”，按“确定”按钮，然后关闭“添加表或视图窗口”。 ·在“视图设计器”中双击“可用字段”中的下列字段 学生.学号 学生.姓名 学生.班级编号 学生.出生年月 学生.性别 学生选课.课程编号 学生选课.成绩 课程.课程名称 课程.任课教师 课程.学分 班级号名.班级简称 则上述字段移到右边的可选字段中，如图4-2。 图4-2 ·按Ctrl+W保存视图，取名为“成绩查询”。 （三）建立成绩查询表单 1.进入表单设计界面 ·单击项目管理器上方的“文档”选项卡 ·单击“表单”，再单击右边的“新建”，进入表单设计界面 ·按“Ctrl+S”键保存表单，取名为“成绩查询” ·单击窗口右上角最大化按钮，使“表单设计－成绩查询.SCX”窗口最大化 ·移动鼠标，适当放大表单窗口 2.建立含四个页面的页框 ·在表单控件中单击页框按钮 ，在表单上画页框，然后通过拖动页框边缘的8个小黑方块，放大或缩小页框，使其充满整个表单， 将PageCount的值修改为4，此时表单如图4-3。 ·单击Page1，在属性窗口中将Page1的Caption属性改为“学生成绩概况”；单击Page2，在属性窗口中将Page2的Caption属性改为“按班级查询”；单击Page3，在属性窗口中将Page3的Caption属性改为“按学号查询”；单击Page4，在属性窗口中将Page4的图4-3 Caption属性改为“按课程查询”。然后适当修改每一个Page的FontName, FontSize,ForeColor,使字体、字号、颜色美观。此时表单如图4-4所示。 图4-4 （四）设置数据环境 单击数据环境按钮 ，在数据环境中单击“选定”框中的“视图”，添加“成绩查询”视图，再单击“选定”框中的“表”，添加“学生”、“班级号名”、“课程”，再关闭“添加表或视图”窗口，得到图4-5。 图4-5 （五）设计“学生成绩概况”页面 1.页面组成 “学生成绩概况”的页面如图4-6所示。 在“属性”窗口选择对象“Page1”，然后按图4-6设计页面。 设计“全体学生平均分”、“男生平均分”、“女生平均分”、“会计班各门课总平均分”等使用表单控件“标签” ，只需按图示文字分别将标签的Caption属性修改为“全体学生平均分” “男生平均分”、“女生平均分”等即可；设计Text1～Text6使用表单控件“文本框”，设计“返回”使用表单控件“命令按钮”。各控件的字型、字体、字号、颜色自行设定（以下各页面均同此）。 图4-6 2.事件代码 （1）在“属性”窗口选择对象“Page1”，双击下面的“Activate Event”， 输入如下过程代码： set talk off set filter to calculate avg(成绩) to c1 calculate avg(成绩) for 性别=男 to c2 calculate avg(成绩) for 性别=女 to c3 calculate avg(成绩) for 班级简称=02会计 to c4 calculate avg(成绩) for 班级简称=02工商 to c5 calculate avg(成绩) for 班级简称=02国贸（经纪人） to c6 thisform.pageframe1.page1.text1.value=c1 thisform.pageframe1.page1.text2.value=c2 thisform.pageframe1.page1.text3.value=c3 thisform.pageframe1.page1.text4.value=c4 thisform.pageframe1.page1.text5.value=c5 thisform.pageframe1.page1.text6.value=c6 （2）双击“返回”命令按钮，在其“Click”过程编辑窗口输入下面的代码：