基于PB的高校学生信息管理系统

作者：用户投稿来源：网络发布时间： 13/05/11

【编者按】网学网PB毕业设计频道为大家收集整理了“基于PB的高校学生信息管理系统“提供大家参考，希望对大家有所帮助!

客服咨询，网学网竭诚为您服务，本站永久域名：myeducs.cn

§ 3.3 模块划分

学生信息管理系统是高校对学生所有信息管理和操作的总和，系统中的一系列操作都是基于学生的，根据对学生信息操作的用户对象不同可以分为教务员、教师以及学生，各角色用户的授权是不同的，操作的内容也有所区别，按照用户角色的不同把学生信息管理系统可以分为3个子系统：教务员管理系统、教师管理系统和学生管理系统。分别对应不同角色的操作对象（教务员、教师、学生），所以总的来说学生信息管理系统大体划分

§ 3.3.2教师管理系统模块详细介绍

教师管理模块是实现教师信息管理及相应操作的模块，主要实现对学生成绩进行管理的功能以及教师个人基本信息操作功能，以下对各功能进行详细介绍。

教师信息模块：教师信息管理模块实现教师对自己基本信息的修改，查询其他老师基本信息等

成绩录入模块：成绩录入模块主要实现教师对学生成绩的录入。比如：1、当某教师授某课程结束后，对学生考试成绩进行提交存入数据库，录入成绩就必须由教师完成，由于本作者需求分析阶段对专业课程和素质选修课程有不同的规定，所以教师成绩录入分为站业课程成绩录入和素质课程成绩录入，录入的操作基本相同。2、由于有的学生重修课程，所以原来数据库中存在此学生的不及格成绩信息，当重修及格以后，教师还得修改此学生的成绩为及格，实现对学生成绩的修改功能。

为教务员管理模块、教师管理模块和学生管理模块，以下对各个模块功能进行详细的说明和介绍。

§ 4.3.2学生选课功能的实现

本系统在学生管理模块实现学生网上选课功能，由于对课程开课安排和性质的规定，学生选课分为专业课程选课、素质选修课程选课以及学生重修选课^[9]。

首先介绍专业课程选课功能的实现过程：当学生登陆学生信息管理系统时，系统定义的全局变量user将保存学生登陆系统的学号，通过学生的学号,用函数left()提取学号前4为数字可以判断出此学生所属年级；然后在学期选择窗口选择要选课的学期，并将学期保存到全局变量getterm中；最后在学生基本信息表中提取该学生所属的学院，通过开课年级、开课学期和开课学院可以准确的把此学生所有能选择的课程显示出来供选择参考。

具体代码实现如下：

integer inde=1

string com,num,name,grade,tnum,tname,zhouci,time2,cha,users,schools

double cent

int time1,sump,subp

users=left(user,4)

select std_Sname

into :schools

from std_Info

where std_Num=:user;

schools=trim(schools)

lv_1.InsertColumn(1,"选课" , Left! , 200)

lv_1.InsertColumn(2,"授课学院" , Left! , 600)

lv_1.InsertColumn(3,"课程号" , Left! , 300)

lv_1.InsertColumn(4,"课程名" , Left! , 600)

lv_1.InsertColumn(5,"开课年级" , Left! , 400)

lv_1.InsertColumn(6,"学分" , Left! , 200)

lv_1.InsertColumn(7,"总学时" , Left! , 300)

lv_1.InsertColumn(8,"教师号" , Left! , 300)

lv_1.InsertColumn(9,"教师名" , Left! , 400)

lv_1.InsertColumn(10,"周次" , Left! , 300)

lv_1.InsertColumn(11,"上课时间" , Left! , 400)

lv_1.InsertColumn(12,"总人数" , Left! , 300)

lv_1.InsertColumn(13,"已选人数" , Left! , 400)

lv_1.InsertColumn(14,"课程性质" , Left! , 400)

lv_1.deleteitems()

declare codecur cursor for

select course_Com,course_Num,course_Name,course_Grade,course_cent,course_Time,course_Tnum,course_Tname,course_Zhouci,course_Times,course_Sump,course_Subp,course_cha

from course_Info

where course_Grade=:users and course_Term=:getterm and course_School=:schools;

open codecur;

fetch codecur into:com,:num,:name,:grade,:cent,:time1,:tnum,:tname,:zhouci,:time2,:sump,:subp,:cha;

do while Sqlca.Sqlcode=0

lv_1.insertItem (inde,trim("选课"),1)

lv_1.setitem(inde,2,trim(com))

lv_1.setitem(inde,3,trim(num))

lv_1.setitem(inde,4,trim(name))

lv_1.setitem(inde,5,trim(grade))

lv_1.setitem(inde,6,trim(string(cent)))

lv_1.setitem(inde,7,trim(string(time1)))