搜索
学生选课管理系统系统背景和意义介绍系统开发平台系统总体设计系统详细设计总结●●●●●随着我国经济的迅速发展，教育机构的管理水平也在不断的提高，在学校内部利用计算机进行管理已成为一种必然。目前计算机的迅猛发展突破了时间、空间的局限性，给学校管理带来了极大的方便。为了适应社会的发展，提高学校的管理效率，学校必须改变以前的传统管理方式，利用计算机管理软件逐步淘汰落后的手工管理方式。本课程设计《学生选课管理系统》就是为一个学校选课系统而开发的管理软件，可以利用计算机方便的实现学生信息、课程信息、选课等诸多环节的管理。项目背景——系统开发的软件平台主要有：1.操作系统：WindowsXP/Windows72.数据库：MicrosoftSQLServer20003.VB:MicrosoftVisualBasic6.0系统界面设计系统登录该部分主要实现登陆限制功能及退出系统。学生信息该部分主要实现四个功能：查询学生信息，添加学生信息，修改学生信息，删除学生信息。课程信息该部分主要实现四个功能：查询课程信息，添加课程信息，修改课程信息，删除课程信息。学生选课该部分主要实现两大部分功能：学生选课操作，所选课程查询及删除。学生选课管理系统学生信息课程信息学生选课查询学生信息修改学生信息添加学生信息删除学生信息查询课程信息修改课程信息添加课程信息删除课程信息选课操作查询及删除所选课程系统详细结构图如下所示：学生选课管理系统主要实现从学生、课程到选课的一体化管理，涉及学生信息、课程信息、学生选课三个实体。下面简单介绍几个关键的实体和系统的综合E-R图。●学生实体属性图学生实体包括：学号、姓名、性别和所在系属性，如图1所示。学生学号性别姓名所在系图1学生选课管理系统学生实体属性E-R分图●课程实体属性图课程实体包括：课程号、课程名、学分和学期属性。如图2所示。课程学期学分课程名课程号图2学生选课管理系统课程实体属性E-R分图●选课实体属性图选课实体包括：学号、姓名和课程名属性。如图3所示。选课课程名学号姓名图3学生选课管理系统选课实体属性E-R分图学生选课管理系统实体关系E-R图学生选课管理系统各个实体之间的关系如图4所示。学生课程选课图4视图关系E-R图由于本系统是由VB+SQLserver联合开发的，所以需要设计相关的信息表，将信息导入表内，通过数据源ODBC将VB与SQLServer连接起来。本系统涉及到三个表：studentcoursechoose将数据库建好后，成功连接数据源ODBC，就可以实现系统的开发了。下面我将一一介绍我所做系统的各个界面以及相关代码。登录界面——通过左图所示界面可以登录系统，只有输入了正确的用户名和密码才能进入系统，否则提示“请输入正确的用户名和密码！”三次登录失败，将会退出系统。点击“注销”按钮，出现确认注销提示，选择“是”退出系统，选择”否“继续留在当前页面。登录相关代码如下所示用户名及密码设置的代码：PrivateSubCommand7_Click()IfText1=“**AndText2=“***ThenLoginSucceeded=TrueForm2.ShowText1.Text=Text2.Text=ElseMsgBox请输入正确的用户名和密码！“EndIfText1.Text=Text2.Text=“cnt=cnt+1Ifcnt=3ThenMsgBox三次登录失败，请明天再试吧！“UnloadMeEndIfEndSub点回车键可以进入系统的代码：PrivateSubText2_KeyPress(KeyAsciiAsInteger)IfKeyAscii=13ThenCommand7_ClickEndIfEndSub初始化及密码为*的代码：PrivateSubForm_load()cnt=0Text1.Text=Text2.Text=Text2.PasswordChar=*EndSub通过正确输入，进入到学生选课管理系统的界面——学生信息管理——此界面可以实现学生信息的查询、修改、添加、删除等操作，通过点击“第一条”等的按钮，实现信息的翻页功能。☆查找代码：PrivateSubCommand1_Click()IfLen(Text1.Text)0ThenAdodcstudent.CommandType=adCmdTextAdodcstudent.RecordSource=selectsno,sname,ssex,sdeptfromstudentwheresno='&Trim(Text1.Text)&'Adodcstudent.RefreshElseMsgBox(请输入要查找的学号)EndIfEndSub删除代码PrivateSubCmdDel_Click()DimresAsIntegerres=MsgBox(确定要删除此行记录吗?,vbExclamation+vbYesNo+vbDefaultButton2)Ifres=vbYesThenAdodcstudent.Recordset.DeleteAdodcstudent.Recordset.MoveNextEndIfEndSub添加代码PrivateSubCmdAdd_Click()Adodcstudent.Recordset.AddNewCmdAdd.Enabled=FalseCmdDel.Enabled=FalseCmdUpdate.Enabled=TrueEndSub课程信息管理界面——◆此界面与学生信息管理界面相似，实现的功能一样，都为查找、修改、添加及删除，还有翻页的按钮，代码与学生信息管理的代码相同。学生选课界面选课操作部分代码如下所示：PrivateSubForm_load()DimstrselectAsStringstrselect=select*fromcourseAdodccourse.CommandType=adCmdTextAdodccourse.RecordSource=strselectAdodccourse.RefreshSetdtgcond.DataSource=AdodccourseCallinitgridText1.Text=Text2.Text=Text3.Text=EndSub此界面可以实现学生选课的操作，通过AdodcGrid控件与数据库的连接，界面上会显示所有可选课程的信息。查询选课操作本界面的查询和删除操作的代码与学生信息管理的查询和删除大致相同，差异之处在于此界面初始化时删除操作不可用，只有当查询完以后，删除操作才可以进行。结论本管理系统通过对信息的采集、存储、加工、维护和使用等,并随着管理科学和技术科学的发展而形成的。学生选课管理系统能为用户提供充足的信息，对学生来说可以轻松使用。通过这段时间的具体应用和不断完善，显示出良好的效果。整个管理系统提高了工作效率，也对学生工作管理的科学化、正规化起到了重要的作用。这是我第一次做一个系统出来，同时完成了一篇课程设计的论文。从刚开始的一片茫然，一步一步地摸索、修改，到现在终于做出了一个成品，虽然过程很辛苦，但现在回想起来也很充实。可能我做的还不够好，有很多的不足，比如功能不是很强大，系统不够完善，但我还是有一种小小的成就感。在这份课程设计即将完成之际，我的心情特别激动，无法平静。致谢虽然对VB掌握的不够彻底，对相关知识了解的也不是很多，但从开始做系统到论文的顺利完成，有很多老师、朋友都给了我很大的帮助和鼓励，使我增强了信心，最终坚持了下来。在此我要感谢***老师，***老师和***老师，感谢他们对我的指导以及帮助，也感谢所有帮助过我、鼓励过我的朋友们，衷心地对你们说声谢谢！谢谢！