学生学籍管理系统设计报告.docx

1、学生学籍管理系统设计报告学生成绩管理程序设计作者：于维国摘 要 用时三个礼拜，我和我的组员编写了一个具查询、编辑、更新、统计、删除于一身的简单学生成绩管理程序。此程序用户界面良好，操作简便，内存使用量小，数据处理高效，符合了现代软件的发展方向。关键词学生；成绩管理；程序1 需求分析随着学校学生人数规模的不断扩大，学生信息管理量也相应的增加，有关学生的各种信息量也成倍增加，面对着庞大的信息量，传统的人工方式管理会导人力与物力过多浪费，从而使学生信息管理的负担过重，影响整个学生信息的运作和控制管理，因此，必须制定一套合理、有效，规范和实用的学生信息管理系统，对学生资料进行集中统一的管理。另一方面，

2、IT产业和Internet获得了飞速发展，计算机应用已渗透到了各个领域，引起信息管理的革命，实现了信息的自动化处理，提高了处理的及时性和正确性。2 概要设计考虑到学生成绩管理程序要求界面友好、操作方便、效率高等特点，本程序主要设计了三大模块：学生信息模块、课程安排模块和用户管理模块。（如图1所示）图13 详细设计3.1 数据库的设计数据库名：学籍管理.dbc表1名：成绩表.dbf字段如下字段名类型宽度小数位数索引学号字符10升序毛邓三数值52大学英语数值52管理运筹学数值52数据库原理及应用数值52形式与政策数值52大学生素质教育数值52大学体育数值52管理学数值52 表2名：课程安排表.db

3、f 字段如下字段名类型宽度小数位数索引星期一字符55星期二字符55星期三字符55星期四字符55星期五字符55星期六字符55星期天字符55 表3名：课外活动哦信息表.dbf 字段如下字段名类型宽度小数位数索引学号备注4升序大运会备注4寝室文化节备注4科技文化月备注4其他备注4 表4名：陕西理工学院07级学生名单.dbf 字段如下字段名类型宽度小数位数索引学号字符10升序姓名字符8性别字符2身份证字符18院（系）字符8专业字符22班级字符12校区字符2 表5名：用户表.dbf字段如下字段名类型宽度小数位数索引用户名字符10升序密码字符16flagL逻辑23.1.1数据库中的表间关系如图3图33.1

4、.2 数据表之间的参照完整性关系更新规则、删除规则、插入规则如图4图43.2 表单的设计3.2.1登陆表单的设计 如图5如图5其中包含了三个标签，两个文本框，两个命令按钮。在lable1的caption属性里输入“学生学籍管理系统”，fontname属性里选择“叶更友特色简体升级版”fontsize 设置为 22，fontcolor 设置为“0，128，198”，其他标签的属性根据需要做相关设置，这里不再赘述。在command1的caption属性里输入“确定”，在init event属性里写入如下代码public nn=1在 click event属性里写入if(n2) messagebox

5、(密码输入超过三次，不能使用本系统！) thisform.release else use 用户表.dbf exclusive temp1=alltrim(thisform.TEXT1.value) temp2=alltrim(thisform.TEXT2.value) locate for alltrim(用户名)=TEMP1.and.alltrim(密码)=TEMP2 if found() do form 主表单 thisform.release else messagebox(密码或用户名输入错误，重新输入！) thisform.TEXT1.value= thisform.TEXT2.v

6、alue= n=n+1 thisform.TEXT1.setfocus endifendif然后保存。3.2.2主界面的设计 如图6 如图6可以看出该表单当中包含了四个命令按钮，一个容器控件。为了界面的美观期间，我们事先用photoshop自制了相关的命令按钮，用的是image控件并改变其中的picture属性。表单的有半部分实际上有四个容器，分别对应按钮的相关信息。现在所看到的是container1当中的信息，该容器中包含了3个标签，和两个timer控件label1的caption属性里输入“学生学籍管理系统”backstyle设置为“0-透明”fontname设置为“黑体”fontsize

7、设置为“24”。Label2的caption中输入“欢迎使用”fontname设置为“叶更友特色简体升级版”fontsize 设置为 48，其他与label1的相同。Label3的caption属性里输入了本程序的开发负责人姓名。Timer1的Click event属性里下代码thisform.container1.label2.visible=not thisform.container1.label2.visiblethisform.container1.label2.forecolor=rgb(rand()*255,rand()*255,rand()*255)interval属性设置为5

8、00。timer2的Click event的属性里写入如下代码 if(thisform.container1.label2.leftthisform.container1.width) thisform.container1.label2.left=thisform.container1.label2.left+5else thisform.container1.label2.left=0-thisform.container1.label2.widthendif interval属性设置为100。运行可看到“欢迎使用”这四个字，不但左右移动，而且颜色不断的变化。四个container的vis

9、ible均设置为“.f.”。“学生信息”按钮的Click event属性里写入 thisform.container2.visible=.t.thisform.container3.visible=.f.thisform.container4.visible=.f.“课程安排”按钮的Click event属性里写入thisform.container3.visible=.t.thisform.container2.visible=.f.thisform.container4.visible=.f.“用户管理”按钮的Click event属性里写入thisform.container4.visi

10、ble=.t.thisform.container2.visible=.f.thisform.container3.visible=.f.“退出系统”按钮的Click event属性里写入 thisform.release3.2.3 学生信息模块的设计接下来就是对按钮所对应的container做详细的设计。其中，container2的界面设置为如下图7所示图7不难发现，当中包含了一个页框，其中page1中有五个按钮两个标签两个表格，一个文本框，一个组合框。为了简便期间，本人只对主要控件当中的主要事件做一些说明，其他的内容不再赘述。“精确查找”的Click event写入如下代码thisform

11、.container2.pageframe1.page1.text1.enabled=.t.mand3.enabled=.t.thisform.container2.pageframe1.page1.grid2.visible=.t.thisform.container2.pageframe1.page1.text1.setfocus“浏览全部”的Click event里写入thisform.container2.pageframe1.page1.grid1.visible=.t.thisform.container2.pageframe1.page1.label2.visible=.t.bo

12、1.visible=.t.mand5.visible=.t.鼠标移动到组合框上面，单击右键选择组合框生成器，在“列表项”选项卡中的“用此填充列表”里选择“手工输入数据”，然后在属性中的数据选项卡中的rowsource里输入各个院系的名称，如图8图8两个表格的recordsource里均填入“陕西理工学院07级学生名单.dbf”readonly属性设置为“.t.”文本框后面的“确定”按钮的Click event里写入use 陕西理工学院07级学生名单.dbf t=alltrim(thisform.container2.pageframe1.page1.text1.value)locate for

13、 alltrim(学号)=tif found() go top set filter to 陕西理工学院07级学生名单.院（系）=telse messagebox(查无此人，请输入正确的学号) thisform.container2.pageframe1.page1.text1.value= thisform.container2.pageframe1.page1.text1.setfocusendif组合框后面的“确定”按钮的Click event里写入do casecase bo1.value=经法学院 go top set filter to 陕西理工学院07级学生名单.院（系）=经法学

14、院case bo1.value=经贸系 go top set filter to 陕西理工学院07级学生名单.院（系）=经贸系case bo1.value=教科系 go top set filter to 陕西理工学院07级学生名单.院（系）=教科系case bo1.value=体育学院 go top set filter to 陕西理工学院07级学生名单.院（系）=体育学院case bo1.value=文学院 go top set filter to 陕西理工学院07级学生名单.院（系）=文学院case bo1.value=外语系 go top set filter to 陕西理工学院07级

15、学生名单.院（系）=外语系case bo1.value=历史系 go top set filter to 陕西理工学院07级学生名单.院（系）=历史系case bo1.value=艺术学院 go top set filter to 陕西理工学院07级学生名单.院（系）=艺术学院case bo1.value=数学系 go top set filter to 陕西理工学院07级学生名单.院（系）=数学系case bo1.value=物理系 go top set filter to 陕西理工学院07级学生名单.院（系）=物理系case bo1.value=化学学院 go top set filter

16、 to 陕西理工学院07级学生名单.院（系）=化学学院case bo1.value=生物学院 go top set filter to 陕西理工学院07级学生名单.院（系）=生物学院case bo1.value=土建系 go top set filter to 陕西理工学院07级学生名单.院（系）=土建系case bo1.value=电信系 go top set filter to 陕西理工学院07级学生名单.院（系）=电信系case bo1.value=材料学院 go top set filter to 陕西理工学院07级学生名单.院（系）=材料学院case bo1.value=机械学院 g

17、o top set filter to 陕西理工学院07级学生名单.院（系）=机械学院case bo1.value=电气系 go top set filter to 陕西理工学院07级学生名单.院（系）=电气系case bo1.value=计算机系 go top set filter to 陕西理工学院07级学生名单.院（系）=计算机系case bo1.value=管理系 go top set filter to 陕西理工学院07级学生名单.院（系）=管理系endcase右下角的“返回”按钮的Click event里写入if k=0 thisform.container2.pageframe1

18、.page1.grid1.visible=.f. thisform.container2.pageframe1.page1.label2.visible=.f. bo1.visible=.f. mand5.visible=.f. k=k+1 else k=1 thisform.container2.visible=.f. k=0endifpage2的界面如图9图9实际上在这个页面上还有两个容器，visible均为“.f.”。现在所看到的是container1里的信息，container2里的信息如图10图10“总体查询”按钮的Click event里写入： thisform.container

19、2.pageframe1.page2.container1.visible=.t.thisform.container2.pageframe1.page2.container2.visible=.f.“个体查询”按钮的Click event里写入：thisform.container2.pageframe1.page2.container1.visible=.f.thisform.container2.pageframe1.page2.container2.visible=.t.“输入数据”按钮的Click event里写入：DO FORM seletect_class“整理成绩”按钮的Cli

20、ck event里写入：& 计算所有的总成绩USE DMD_G.DBFREPLACE CHJ1 WITH 0,CHJ2 WITH 0USEI=1FOR i=1 TO 6BJ_DAIMA= DO CASE CASE I=1 BJ_DAIMA=电商071 CASE I=2 BJ_DAIMA=电商072 CASE I=3 BJ_DAIMA=会计071 CASE I=4 BJ_DAIMA=会计072 CASE I=5 BJ_DAIMA=财管071 CASE I=6 BJ_DAIMA=财管072 ENDCASE USE BJ_DAIMA REPLACE YW WITH YW1+YW2,SX WITH S

21、X1+SX2,YY WITH YY1+YY2 ALL GOTO 1 REPLACE WL WITH WL1+WL2,HX WITH HX1+HX2,SW WITH SW1+SW2 ALL GOTO 1 REPLACE ZF WITH YW+SX+YY+WL+HX+SW ALLENDFORMESSAGEBOX(数据整理完毕！)“大平均分”按钮的Click event里写入：CLOSE ALLCLEAR MEMORY SET TALK OFFUSE DPJ.DBFDELETE ALLPACKUSEUSE DPJBB.DBFDELETE ALLPACKUSEFOR I=1 TO 6 DO CASE

22、CASE I=1 BJ_NAME=电商071 BJ_MCH=BJ_NAME CASE I=2 BJ_NAME=电商072 BJ_MCH=BJ_NAME CASE I=3 BJ_NAME=会计071 BJ_MCH=BJ_NAME CASE I=4 BJ_NAME=会计072 BJ_MCH=BJ_NAME CASE I=5 BJ_NAME=财管071 BJ_MCH=BJ_NAME CASE I=6 BJ_NAME=财管072 BJ_MCH=BJ_NAME ENDCASE FOR J=1 TO 6 &计算一个班中的六科成绩的平均分 DO CASE CASE J=1 KM_NAME=语文 KM_DAI

23、MA=YW CASE J=2 KM_NAME=数学 KM_DAIMA=SX CASE J=3 KM_NAME=英语 KM_DAIMA=YY CASE J=4 KM_NAME=物理 KM_DAIMA=WL CASE J=5 KM_NAME=化学 KM_DAIMA=HX CASE J=6 KM_NAME=生物 KM_DAIMA=SW ENDCASE USE &BJ_NAME &打开相应的班级库文件 AVERAGE &KM_DAIMA TO DKPJF &计算单科平均分 USE USE TEACHER.DBF LOCATE FOR NAME=&BJ_MCH .AND. KM=&KM_NAME RKJ

24、SH=T_NAME USE USE DPJ.DBF APPEND BLANK REPLACE BJ WITH BJ_MCH,KM WITH KM_NAME,RK WITH RKJSH,PJF WITH DKPJF USE ENDFORENDFORMESSAGEBOX(数据处理完毕！)DO FORM SHOW_DPJ“离均差”按钮的Click event里写入：&-*& 项目名称：成绩处理程序 *& 开发日期：2008-11-12 *& 开发环境：Vfp6.0 *& 基本功能：1 计算p值 *& 2 计算离均差 *& 3 可比离均差 *& 4 起始离均差 *& 5 离均差涨幅 *& 开发人：愚人码头 于维国 *&-*SET TALK OFFCLOSE ALLUSE LJC.DBF &清空离均差表REPLACE ALL PZH WITH 0REPLACE LJC WITH 0USE&-*& p值计算方法：1 按单科成绩降序排序 *& 2 计算三个段平均分，分别为： *& (1) A1=1至1名单科成绩的平均分 *& (2) A2=2至2名单科成绩的平均分 *& (3) A3=3至3名单科成绩的平均分 *& 3 p=A1*0.5+A2*0.35+A3*0.15 *&-