学生选课管理系统资料

1、学生(xu sheng)选课管理系统共二十四页 系统背景和意义介绍(jisho) 系统开发平台 系统总体设计 系统详细设计 总结 目 录共二十四页 随着我国经济的迅速发展，教育机构的管理水平也在不断的提高，在学校内部利用计算机进行管理已成为一种必然。目前计算机的迅猛发展突破了时间、空间的局限性，给学校管理带来了极大的方便。为了适应社会的发展，提高学校的管理效率，学校必须改变以前的传统管理方式，利用计算机管理软件逐步淘汰落后的手工管理方式。本课程设计学生(xu sheng)选课管理系统就是为一个学校选课系统而开发的管理软件，可以利用计算机方便的实现学生信息、课程信息、选课等诸多环节的管理。 项目

2、(xingm)背景共二十四页系统(xtng)开发的软件平台主要有：1.操作系统(co zu x tn)：Windows XP/ Windows 72.数据库：Microsoft SQL Server 20003.VB:Microsoft Visual Basic 6.0共二十四页系统(xtng)界面设计系统登录 该部分主要实现登陆限制(xinzh)功能及退出系统。学生信息 该部分主要实现四个功能：查询学生信息，添加学生信息，修改学生信息，删除学生信息。课程信息 该部分主要实现四个功能：查询课程信息，添加课程信息，修改课程信息，删除课程信息。学生选课 该部分主要实现两大部分功能：学生选课操作，所

3、选课程查询及删除。共二十四页系统(xtng)详细结构图如下所示 ：共二十四页 学生选课管理系统主要实现从学生、课程到选课的一体化管理，涉及学生信息、课程信息、学生选课三个实体。下面简单介绍几个关键的实体和系统的综合E-R图。 学生实体属性(shxng)图 学生实体包括：学号、姓名、性别和所在系属性，如图1所示。学生学号性别姓名所在系图1 学生(xu sheng)选课管理系统学生(xu sheng)实体属性E-R分图共二十四页 课程实体属性图 课程实体包括(boku)：课程号、课程名、学分和学期属性。如图2所示。课程学期学分课程名课程号 图2 学生(xu sheng)选课管理系统课程实体属性E-

4、R分图共二十四页 选课实体属性图 选课实体包括：学号、姓名(xngmng)和课程名属性。如图3所示。选课课程名学号姓名 图3 学生选课管理系统选课实体(sht)属性E-R分图共二十四页学生选课管理系统实体关系(gun x)E-R图 学生选课管理系统各个实体之间的关系如图4所示。学生课程选课图4 视图(sht)关系E-R图共二十四页 由于本系统是由VB+SQL server联合开发的，所以需要设计(shj)相关的信息表，将信息导入表内，通过数据源ODBC将VB与SQL Server连接起来。本系统涉及到三个表：studentcoursechoose 将数据库建好后，成功连接数据源ODBC，就可以

5、实现系统的开发了。下面我将一一介绍我所做系统的各个界面以及相关代码。共二十四页登录(dn l)界面 通过左图所示界面可以登录系统，只有输入(shr)了正确的用户名和密码才能进入系统，否则提示“请输入(shr)正确的用户名和密码！”三次登录失败，将会退出系统。 点击“注销”按钮，出现确认注销提示，选择“是”退出系统，选择”否“继续留在当前页面。 共二十四页登录相关(xinggun)代码如下所示用户名及密码设置的代码(di m)：Private Sub Command7_Click()If Text1 = “* And Text2 = “* Then LoginSucceeded = True F

6、orm2.Show Text1.Text = Text2.Text = Else MsgBox 请输入正确的用户名和密码！“End If Text1.Text = Text2.Text = “ cnt = cnt + 1If cnt = 3 Then MsgBox 三次登录失败，请明天再试吧！“Unload MeEnd IfEnd Sub点回车键可以进入系统的代码：Private Sub Text2_KeyPress(KeyAscii As Integer)If KeyAscii = 13 Then Command7_ClickEnd IfEnd Sub初始化及密码为*的代码：Private

7、Sub Form_load()cnt = 0Text1.Text = Text2.Text = Text2.PasswordChar = *End Sub共二十四页 通过正确输入(shr)，进入到学生选课管理系统的界面共二十四页学生(xu sheng)信息管理 此界面可以实现学生信息的查询、修改、添加、删除等操作，通过(tnggu)点击“第一条”等的按钮，实现信息的翻页功能。共二十四页查找代码(di m)：Private Sub Command1_Click()If Len(Text1.Text) 0 Then Adodcstudent.CommandType = adCmdText Adod

8、cstudent.RecordSource = select sno,sname,ssex,sdept from student where sno= & Trim(Text1.Text) & Adodcstudent.RefreshElse MsgBox (请输入要查找的学号)End IfEnd Sub删除代码Private Sub CmdDel_Click()Dim res As Integerres = MsgBox(确定(qudng)要删除此行记录吗?, vbExclamation + vbYesNo + vbDefaultButton2)If res = vbYes ThenAdod

9、cstudent.Recordset.DeleteAdodcstudent.Recordset.MoveNext End IfEnd Sub添加代码Private Sub CmdAdd_Click()Adodcstudent.Recordset.AddNewCmdAdd.Enabled = FalseCmdDel.Enabled = FalseCmdUpdate.Enabled = TrueEnd Sub共二十四页课程(kchng)信息管理界面 此界面与学生信息管理界面相似，实现的功能一样(yyng)，都为查找、修改、添加及删除，还有翻页的按钮，代码与学生信息管理的代码相同。共二十四页学生(x

10、u sheng)选课界面 共二十四页选课操作(cozu)部分(b fen)代码如下所示：Private Sub Form_load() Dim strselect As String strselect = select * from course Adodccourse.CommandType = adCmdText Adodccourse.RecordSource = strselect Adodccourse.Refresh Set dtgcond.DataSource = Adodccourse Call initgrid Text1.Text = Text2.Text = Text3

11、.Text = End Sub 此界面可以实现学生选课的操作，通过AdodcGrid控件与数据库的连接，界面上会显示所有可选课程的信息。共二十四页查询(chxn)选课操作 本界面的查询和删除操作的代码与学生信息管理的查询和删除大致相同，差异之处在于此界面初始化时删除操作不可(bk)用，只有当查询完以后，删除操作才可以进行。共二十四页结论(jiln) 本管理系统通过对信息的采集、存储、加工、维护和使用等,并随着管理科学和技术科学的发展而形成的。学生选课管理系统能为用户提供充足的信息，对学生来说可以轻松(qn sn)使用。通过这段时间的具体应用和不断完善，显示出良好的效果。整个管理系统提高了工作效

12、率，也对学生工作管理的科学化、正规化起到了重要的作用。 这是我第一次做一个系统出来，同时完成了一篇课程设计的论文。从刚开始的一片茫然，一步一步地摸索、修改，到现在终于做出了一个成品，虽然过程很辛苦，但现在回想起来也很充实。可能我做的还不够好，有很多的不足，比如功能不是很强大，系统不够完善，但我还是有一种小小的成就感。在这份课程设计即将完成之际，我的心情特别激动，无法平静。共二十四页致谢(zh xi) 虽然对VB掌握的不够彻底，对相关知识了解的也不是很多，但从开始做系统到论文的顺利完成，有很多老师、朋友都给了我很大的帮助和鼓励，使我增强了信心(xnxn)，最终坚持了下来。在此我要感谢*老师，*老师和*老师，感谢他们对我的指导以及帮助，也感谢所有帮助过我、鼓励过我的朋友们，衷心地对你们说声谢谢！共二十四页谢谢(xi xie)！共二十四页内容摘要学生选课管理系统。项目背景。学生实体包括：学号、姓名、性别和所在系属性，如图1所示。图2 学生选课管理系