- 1、本文档共22页,可阅读全部内容。
- 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
计算机科学与技术学院
课程设计报告
2010— 2011学年 第 一 学期课程名称 数据库课程设计设计题目 学生成绩管理系统
学生姓名学 号专业班级指导教师2011 年 1 月 7 日目录
摘要 3
一、课题组成员及本人任务 4
1. 系统组成 4
2. 系统功能 4
二、需求分析 4
三、概念结构设计 5
四、逻辑结构设计 5
五、系统功能实现 7
1、登陆界面 7
2、菜单项 8
3、设置专业 8
4、设置班级 9
5、设置课程 11
6、录入学生记录 12
7 、添加学生记录 12
8、 录入学生成绩 13
9、 用户管理 15
10、 数据备份 16
六、设计总结 18
七、参考文献 18
八、附录:主要源代码 19摘要
在现在信息化高速发展的时代,信息只有快,准,精才能发挥其价值。所以机器代替人力是必然的历史发展趋势,人工操作必将被计算机代替。使用计算机进行信息管理,不仅提高了工作效率,而且大大的提高了其安全性.尤其对于复杂的信息管理,计算机能够充分发挥它的优越性.一个教育单位不可缺少的部分,它的内容对于学校的决策者和管理者来说都至关重要。
1. 系统组成 3个:学生表、课程表、成绩表
查询组成:查询学生、按班级查询成绩、按课程查询成绩
菜单组成:主菜单由基本数据管理、学生成绩管理、系统维护组成。
报表组成:学生一览表、课程一览表、成绩一览表(可按课程分类和按学号分类)。
自由表组成:密码表、系统信息表。
2. 系统功能
· 通过
· 通过
· 通过
二、需求分析
1、所使用的工具:microsoft visual foxpro 6.0
2、需要存储的数据和在该模块实现的功能:
专业信息:对专业的添加、修改及退出该表单;
班级信息:根据专业设计班级班号和入学年份,可以对班号进行添加、修改、删除,及退出该表单;
课程信息:针对不同的专业,设置课程号、课程名、课程性质、开课学期、课程学分等,以及实现对课程的添加、插入、修改、删除的功能,及退出该表单;
学生信息:对不同专业不同班级学生信息的录入,基本的学生信息包括学号、姓名、性别、出生日期、民族、备注、照片等,可进行添加、修改,及退出该表单;学生成绩:选定专业、班级和该课程所在的学期,“确定”后,对所选该课程的学生登记分数,录入完成后,“返回”;设置用户:对用户的添加、修改和设置权限,添加的内容包括用户名、密码、级别(管理员和一般用户),“修改”有密码、权限等操作;
三、概念结构设计
E-R图:
四、逻辑结构设计五、系统功能实现
1、登陆界面
确定:
rq=thisform.text2.value
IF (n2)=MESSAGEBOX(口令三次输入错误,不能使用本系统,48,信息提示)flag=.F.THISFORM.RELEASE
ELSESELECT userLOCATE FOR usename=ALLTRIM(bo1.Value) AND usepass=ALLTRIM(thisform.text1.Value)IF FOUND()flag=.T.ulevel=uselevelTHISFORM.RELEASEELSE=MESSAGEBOX(口 令 不 正 确, 重 新 输 入,48,信息提示)THISFORM.combo1.VALUE=n=n+1THISFORM.combo1.SETFOCUSENDIF
ENDIF
取消: thisform.Release2、菜单项3、设置专业
添加:
f=
flag=1 表示添加专业
DO FORM setprof1
修改: f=专业
flag=2 表示修改专业
DO FORM setprof1
退出: thisform.Release
RELEASE f,flag
确定: IF flag=1SELECT profAPPEND BLANK
ENDIF
REPLACE 专业 WITH thisform.text1.Text
thisform.Release
取消: thisform.Release4、设置班级
确定: mand1.Enabled=.T.
thisform.label4.Caption=ALLTRIM(thisform.list1.value)+专业的班号
SELECT classn
SET FILTER TO ALLTRIM(专业)==ALLTRIM(thisform.list1.Value) AND NOT DELETED()
GO TOP
thisform.Refresh
添加: f1=thisform.list1.value
f2=
f3=YEAR(DATE())
flag=1 添加操作
DO FORM setclass1
SELECT classn
文档评论(0)