数据库课程设计学生成绩管理系统

精品文档---下载后可任意编辑 学 号： 课 程 设 计 题 目 学生成绩管理系统 教 学 院 计算机学院 专 业 计算机科学与技术 班 级 05级二班 姓 名 指导老师 2024 年 1 月 18 日 目 录 一．概述2 二．总体方案设计3 三．详细设计5 四．程序的调试与运行结果说明19 五．课程设计总结20 参考文献21 一 概述 VisualBasic+Access数据库+SQL数据查询语言编写.系统管理员,老师,学生只需通过简单的操作,用户都可以了解本系统软件的基本工作原理.用户只需进行输入一些简单的汉字,数字,或用鼠标点击即可达到自己想要的目标. 1. 课程设计的目的 (1) 加深对数据库系统、软件工程、程序设计语言的理论知识的理解和应用水平； (2) 在理论和实验教学基础上进一步巩固已学基本理论及应用知识并加以综合提高； (3) 学会将知识应用于实际的方法，提高分析和解决问题的能力，增强动手能力； (4) 为毕业设计和以后工作打下必要基础。 (5)理解和掌握该课程中的有关基本概念，程序设计思想和方法。 (6)培育综合运用所学知识独立完成课题的能力。 (7)培育勇于探究、严谨推理、实事求是、有错必改，用实践来检验理论，全方位考虑问题等科学技术人员应具有的素养。 (8)掌握从资料文献、科学实验中获得知识的能力，提高学生从别人经验中找到解决问题的新途径的悟性，初步培育工程意识和创新能力。 2. 课程设计的要求 运用数据库基本理论与应用知识，在微机 SQL server的环境上建立一个数据库应用系统。要求把现实世界的事物及事物之间的复杂关系抽象为信息世界的实体及实体之间联系的信息模型，再转换为机器世界的数据模型和数据文件，并对数据文件实施检索、更新和控制等操作。 1. 用e-r图设计指定题目的信息模型； 2. 设计相应的关系模型，确定数据库结构； 3. 分析关系模式各属于第几范式，阐明理由； 4. 设计应用系统的系统结构图，确定系统功能； 5.通过设计关系的主码约束、外码约束实现完整性控制； 6. 实现应用程序设计、编程、优化功能； 7. 对系统的各个应用程序进行集成和调试，进一步优化系统功能、改善系统用户界面完成实验内容所指定的各项要求； 8. 分析遇到的问题，总结并写出课程设计报告； 9. 自我评价 二 总体方案设计 一学生成绩管理系统设计的目标的分析 1,管理员能够实现对整个学生信息的添加,修改,删除,查询等操作,对老师用户的添加,删除,修改等操作,对留言信息的添加,删除,修改查询等操作. 2,可以将学生成绩的数据库发布到网上,老师的信息发布的网上,方便学生老师进行查询,达到资源共享的目的. 3,老师能够在一定的权限内对所有学生成绩的查询,所有老师信息的查询,留言信息的添加,删除,修改是,查看等,对的自己的联系信息进行更新,登录密码的修改. 4,学生可以在自己的权限内对对自己成绩的查询,以及个人信息的查询,登录密码的修改,留言的查看,提交留言信息的相关操作. 二 学生成绩管理系统的功能需求分析 学生成绩管理系统主要提供成绩查询,方便管理的网上的信息查阅平台,学生可以通过该系统查阅与自己相关信息实现以上的所有功能,还有对学生的添加,删除,修改,老师的添加,删除,修改,数据库的备份,数据库的还原等相关操作. 三 系统的功能分析 该学生成绩管理系统是用Visual Basic+Access数据库+SQL查询语言编句,系统是基于网络在线的学生成绩管理系统,在系统中分为大的二个方面:一是老师登录页面,二是学生登录页面. (1)系统管理员进入学生成绩管理系统的主要功能是:实现老师添加,老师修改,老师删除,老师查询,数据库的恢复,数据库的备份,学生的添加,学生的修改,学生的查询,学生成绩的录入,学生成绩的添加,学生成绩的修改,学生成绩的删除,留言的查询,留言的提交,留言的删除,留言的修改等基本功能. (2)老师进入学生成绩管理系统的主要功能是:实现学生的查询,学生成绩的查询,留言的删除,留言的查询,留言的查询,密码的修改,老师的查询,老师登陆密码的更改,老师个人信息的修改等基本功能. (3)学生进行学生成绩管量系统的主要功能是:实现学生自己怕成绩查询,自己登录密码的修改,个人信息的查询,留言的查看,提交留言的基本功能. 图1 主流程图 承担部分： 学生基本信息查询 要求可通过输入学生学号或姓名对学生基本信息的查询，可对学生基本信息进行修改和删除。 三 详细设计 学生管理模块：学生基本信息查询 图2 学生基本信息查询界面 1.代码： Private Sub find_Click() Dim sql As String sql = ““ If Trim(NoEdit.Text) = ““ And Trim(NameEdit.Text) = ““ Then MsgBox “请输入你要查询的内容！“, vbOKOnly + vbExclamation, “警告“ Exit Sub Else If NoEdit.Text ““ And NameEdit.Text ““ Then sql = “select Student.Sno,Sname,Cname,Grade from Student,Course,Sc where Student.Sno = “ & Trim(NoEdit.Text) & “ and Sname like %“ & Trim(NameEdit.Text) & “% and Sc.Sno=Student.Sno and Course.Cno=Sc.Cno“ Set rs = TransactSQL(sql) ElseIf NoEdit.Text ““ And NameEdit.Text = ““ Then sql = “select Student.Sno,Sname,Cname,Grade from Student,Course,Sc where Student.Sno = “ & Trim(NoEdit.Text) & “ and Sname like %“ & Trim(NameEdit.Text) & “% and Sc.Sno=Student.Sno and Course.Cno=Sc.Cno“ Set rs = TransactSQL(sql) ElseIf NoEdit.Text = ““ And NameEdit.Text ““ Then sql = “select Student.Sno,Sname,Cname,Grade from Student,Course,Sc where