VFP课程设计报告范例

1、课 程 设 计 报 告课程名称 VFP数据库管理系统 课题名称 班级学生成绩管理系统 专 业 统计学 班 级 统计学120X 班 学 号 完整学号 姓 名 指导教师 黄晓宇 吴得健 罗敬 2014年 1 月 6 日湖南工程学院课 程 设 计 任 务 书课程名称 VFP数据库管理系统 课 题 班级学生成绩管理系统 专业班级 统计学120X班 学生姓名 学 号 指导老师 黄晓宇 吴得健 罗敬 审 批 任务书下达日期 2013年 12 月 26日任务完成日期 2014年 1 月 6 日一、设计内容与设计要求1设计内容：课题一：班级学生成绩管理系统在我学院每学期都要进行学生的考试成绩管理，学生成绩信息

2、是学生在校学习是否合格的重要依据。以往，学生成绩都是由老师手工登记、计算、统计完成。既消耗老师的大量精力，而且登记、计算和统计的过程中容易出错。实现学生成绩的计算机管理，能提高效率及准确率，并且为成绩信息的查询带来极大的方便和快捷。1、学生的成绩管理系统应具有以下功能： （1） 学生基本信息管理，主要完成学生基本信息的添加、修改、删除和浏览；（2） 学生成绩管理，主要完成各门课程成绩的添加、修改、删除和浏览；（3） 信息查询，能够查询每个学生多种成绩信息、排名情况等；（4） 实现个人成绩、课程成绩、班级成绩等的统计。2、数据库结构设计按照系统不同的功能模块，需要不同的表来存储信息，数据库设计如

3、下：（1） 学生基本信息表STUINFO名称字段名称数据类型主键非空学号XHChar（3）YesYes姓名XMChar（8）NoYes性别XBrChar（2）No（2） 学生成绩信息表SCORE名称字段名称数据类型主键非空学号XHChar（3）YesYes语文YUWENNumeric（3,0）NOYes数学SHUXUENumeric（3,0）NOYes英语YINGYUNumeric（3,0）NOYes平均分PINGJUNFENNumeric（5,1）NO2设计要求：掌握结构化程序设计和面向对象程序设计的主体思想，以自顶向下逐步求精的方法编制程序解决一些实际的问题，为将来编写软件积累一些典型的案

4、例处理经验。(1)按学号顺序选课题号，并在规定的时间内独自完成相关课题的项目开发、VFP源程序编写、调整和运行。源程序及编译生成各文件均保存；(2)按本任务书的要求，编写课程设计报告（Word文档格式）。并用A4的复印纸打印并装订； (3)在2014年1月6日之前，请各班学习委员收齐课程设计报告交黄晓宇老师 ，联系电话：。附：课程设计报告内容要求如下：一、 封面 二、 课程设计任务书三、 课程设计主文档内容如下：1、 课程设计题目 2、 课程设计目的3、 课程设计主要任务4、 设计环境5、 总体设计方案的选定（主控模块和各子模块的设计方法及框图）6、 源程序清单7、 收获及体会参考资料四、报告

5、内容要求用宋体五号字，主标题用黑三号、一级标题用黑四号字，二级标题用宋体小四号字加粗，要求用A4纸张打印出来。课程设计说明书装订顺序：封面、任务书、正文、附件（A4大小的图纸及程序清单）。 二、进度安排第18周，具体安排如下：星期时间班级内容地点第18周星期一下午任务布置D-600第18周星期三8:00-12:001101/02第一次上机机房第18周星期四2:30-18:201101/02第二次上机机房第18周星期五8:00-12:001101/02第三次上机与答辩机房湖南工程学院计算机与通信学院2013年12月 26 日班级学生成绩管理系统一、引言1、开发背景班级学生成绩管理，通常是使用人工

6、方式，效率低且容易出现错误。通过班级学生成绩管理软件来进行成绩管理，高效、准确无误，查询、统计方便易行，给班级成员带来了很大的方便。2、实现目标根据实际需要，编写班级学生成绩管理系统，解决传统手工方式的成绩管理，达到减少工作量、方便进行成绩查询、实现自动的成绩统计，提高效率的目的。具体如下：（1） 班级学生基本信息维护：包括班级学生基本信息的录入、修改、删除、查询等（2） 班级学生成绩信息维护：包括班级学生成绩信息的录入、修改、删除等（3） 成绩查询：包括按学号、姓名两种方式进行成绩查询（4） 成绩统计：包括个人成绩、课程成绩、班级成绩统计二、需求分析1、功能需求根据上述的目标，我们确定系统应

7、该有如下的功能：（1） 学生成绩信息输入：输入（2） 学生成绩信息维护：对成绩信息进行维护（3） 学生信息维护：对学生基本信息进行维护（4） 成绩查询：根据指定查询条件查找符合条件的信息（5） 统计：进行个人成绩、课程成绩、班级成绩的统计2、性能需求系统运行对运行环境的一些要求：（1） 硬件环境 处理器：80586/500MHz及以上处理器内存：不低于512MB硬盘空间：10GB以上（2） 软件环境操作系统：Windows XP数据库：Visual FoxPro 6.0开发平台：Visual FoxPro 6.0三、总体设计1、软件结构设计 本系统设计了一个简单的数据库，学生基本信息、学生成绩

8、信息，即能基本满足班级成绩管理的要求。系统主要分为五个模块：（1） 学生基本信息维护模块：在此模块中，班级成绩管理员可以对学生基本信息如学号、姓名、性别等进行维护，可以新增、修改、删除或查询学生基本信息。（2） 成绩录入模块：在此模块中，班级成绩管理员可以进行班级学生成绩的录入。（3） 成绩查询模块：每个学生可以在此模块中通过学号或姓名来进行个人成绩的查询。（4） 成绩修改模块：班级成绩管理员可以在此模块中进行学生成绩的修改。（5） 成绩删除模块：班级成绩管理员在此模块中删除学生成绩信息。（6） 成绩统计模块：每个学生可以在此模块中查看个人成绩、课程成绩、班级成绩的统计结果。2、系统模块设计系

9、统总体结构如图所示：班级学生成绩管理系统学生基本信息维护成绩录入成绩查询成绩修改成绩删除成绩统计按学号查询按姓名查询按学号修改按姓名修改按学号删除按姓名删除个人成绩统计课程成绩统计班级成绩统计3、数据库结构设计按照系统不同的功能模块，需要不同的表来存储信息，数据库设计如下：（1）学生基本信息表STUINFO.DBF名称字段名称数据类型主键非空学号XHChar（3）YesYes姓名XMChar（8）NoYes性别XBChar（2）No（2）学生成绩信息表SCORE.DBF名称字段名称数据类型主键非空学号XHChar（3）YesYes语文YUWENNumeric（3,0）NOYes数学SHUXUE

10、Numeric（3,0）NOYes英语YINGYUNumeric（3,0）NOYes平均分PINGJUNFENNumeric（5,1）NO四、详细设计1、主界面模块2、学生基本信息维护该模块实现学生基本信息的维护，包括增加、删除、修改等维护数据的操作。由于学生的基本信息仅仅是成绩管理系统中的辅助数据，信息内容简单，数据变动不大，维护操作较简单，故直接使用VFP中的表单向导生成该表单，运行界面如下：3、成绩录入该模块实现班级学生成绩的录入。一个学生一条成绩记录。已录入成绩的学生不能再进行成绩的录入，只能做修改等其它操作。所以在录入成绩时，只能在学号下拉框中进行未曾录入成绩的学生学号的选择，同时在

11、姓名文本框中确认是否待录入成绩的学生。确认该生后，录入其成绩数据。运行界面如下：程序代码：Frmsr的Load事件代码：public dimension no(100)for i=1 to 100 no(i)=.f.endforopen data studentselect 1use stuinfoselect 2use scoreselect 1i=1scan select 2 locate for xh=a.xh if not found() no(i)=a.xh i=i+1 endif select 1endscanFrmsr的Init事件代码：bo1.clear

12、i=1do while type(no(i)!=L bo1.additem(no(i) i=i+1enddoFrmsr的Release事件代码：select 1useselect 2useclose databaseCmdok的Click事件代码：select 2append blankreplace xh with bo1.valueif len(alltrim(thisform.text3.value)0 replace yuwen with val(thisform.text3.value)else replace yuwen with 0

13、endifif len(alltrim(thisform.text4.value)0 replace shuxue with val(thisform.text4.value)else replace shuxue with 0endifif len(alltrim(thisform.text5.value)0 replace yingyu with val(thisform.text5.value)else replace yingyu with 0endifreplace pingjunfen with (yuwen+shuxue+yingyu)/3thisform.releaseCmdc

14、ancel的Click事件代码：thisform.release4、成绩查询该模块实现班级学生各门课程成绩的查询。可以按学号、姓名两种方式来进行查询。查询结果是不允许修改的，所有显示查询结果的文本框的ReadOnly属性均为.T.。运行界面如下：程序代码：Frmxhcx1：Cmdok的Click事件代码：cxxh=alltrim(thisform.text1.value)open data studentselect 1 use scoreloca for alltrim(xh)=cxxhif found() do form newcx1 thisform.releaseelse messag

15、ebox(没有此学号！,0+48+0,错误) thisform.text1.setfocusendifCmdcancel的Click事件代码：thisform.releaseFrmxhcx2：Text1到Text5的ControlSource属性要修改为相应数据表的字段名，将相应数据与文本框绑定在一起，可以在运行期间显示数据的值，修改文本框的值也会反应到数据表中。如：Text1.ControlSource=score.xh。Frmxhcx2的Load事件代码：select 2use stuinfolocate for xh=a.xhCmdok的Click事件代码：select 1usesele

16、ct 2useclose datathisform.release程序代码：Frmxmcx1：Cmdok的Click事件代码：cxxm=alltrim(thisform.text1.value)open data studentselect 1 use stuinfoloca for alltrim(xm)=cxxmif found() do form newcx2 thisform.releaseelse messagebox(没有此姓名！,0+48+0,错误) thisform.text1.setfocusendifCmdcancel的Click事件代码：thisform.releaseF

17、rmxmcx2：Text1到Text5的ControlSource属性同样要修改为相应数据表的字段名。Frmxmcx2的Load事件代码：select 2use scorelocate for xh=a.xhCmdok的Click事件代码：select 1useselect 2useclose datathisform.release5、成绩修改该模块实现班级学生各门课程成绩数据的修改。可以按学号、姓名两种方式来进行修改，两种方式类似。以按学号进行修改为例，运行界面如下：Frmxhxg1：Cmdok的Click事件代码：cxxh=alltrim(thisform.text1.value)ope

18、n data studentselect 1 use scoreloca for alltrim(xh)=cxxhif found() do form newxg1 thisform.releaseelse messagebox(没有此学号！,0+48+0,错误) thisform.text1.setfocusendifCmdcancel的Click事件代码：thisform.releaseFrmxhxg2：Frmxmsc2的Load事件代码：由于进行了数据绑定，对文本框内容的修改会直接反应到数据表中。确认修改无需做特别工作，但是取消修改需要恢复修改前的原值。故在此使用了数组a来保存修改前的原

19、始值。在恢复修改中，使用gather from a恢复原值。select 2use stuinfolocate for xh=a.xhpublic declare a(4)select 1scatter to aCmdok的Click事件代码：select 1replace pingjunfen with (yuwen+shuxue+yingyu)/3useselect 2useclose datathisform.releaseCmdcancel的Click事件代码：select 1gather from auseselect 2useclose datathisform.release6、

20、成绩删除该模块实现班级学生各门课程成绩数据的删除。可以按学号、姓名两种方式来进行删除，两种方式类似。以按姓名进行删除为例，运行界面如下：Frmxmsc1：Cmdok的Click事件代码：cxxm=alltrim(thisform.text1.value)open data studentselect 1 use stuinfoloca for alltrim(xm)=cxxmif found() do form newsc2 thisform.releaseelse messagebox(没有此姓名！,0+48+0,错误) thisform.text1.setfocusendifCmdcanc

21、el的Click事件代码：thisform.releaseFrmxmsc2：Frmxmsc2的Load事件代码：select 2use scorelocate for xh=a.xhCmdok的Click事件代码：select 2delepackuseselect 1useclose datathisform.releaseCmdcancel的Click事件代码：select 1useselect 2useclose datathisform.release7、成绩统计个人成绩统计中，使用了四个视图：YW、SX、YY、PJF，以取该生的语文、数学、英语及总分在班级中的排名次序。Frmgrtj1

22、：Cmdok的Click事件代码：xhxm=alltrim(thisform.text1.value)open data studentselect 2use studscoreloca for alltrim(xh)=xhxmif found() do form newgrtj2 thisform.releaseelse loca for alltrim(xm)=xhxm if found() do form newgrtj2 thisform.release else messagebox(没有此学号或姓名！,0+48+0,错误) thisform.text1.setfocus endif

23、endifCmdcancel的Click事件代码：thisform.releaseFrmgrtj2：Frmgrtj2的Activate事件代码：set talk offselect 2xuehao=studscore.xhthisform.text6.value=alltrim(studscore.xh)thisform.text7.value=alltrim(studscore.xm)thisform.text8.value=alltrim(str(studscore.yuwen)thisform.text9.value=alltrim(str(studscore.shuxue)thisfo

24、rm.text10.value=alltrim(str(studscore.yingyu)thisform.text4.value=alltrim(str(studscore.pingjunfen)select 3use ywloca for xh=xuehaomc1=recno()thisform.text1.value=mc1select 4use sxloca for xh=xuehaomc2=recno()thisform.text2.value=mc2select 5use yyloca for xh=xuehaomc3=recno()thisform.text3.value=mc3

25、select 6use pjfloca for xh=xuehaothisform.text5.value=recno()Cmdok的Click事件代码：select 1useselect 2useselect 3useselect 4useselect 5useselect 6useclose dataset talk onthisform.releaseFrmkctj1：Cmdok的Click事件代码：public kcmkcm=alltrim(bo1.value)do form newkctj2thisform.releaseCmdcancel的Click事件代码：thisform.releaseFrmkctj2：Frmkctj2的Activate事件代码：set talk offdo case case kcm=语文 kc=yuwen case kcm=数学 kc=shuxue case kcm=英语 kc=yingyuendcaseopen data studentuse scorecount all to zrscount for &kc60 to bjg1count for &kc=60 to jg1count for &kc=70 to zhong1count for &kc=80 to liang1count for &kc=90