VB课程设计报告简易学生成绩管理系统的研究设计与应用毕业论文.docVIP

一.系统名称: 简易学生成绩管理系统的设计与实现 二.设计目的 1. 熟悉VB 6.0的开发环境,掌握基本的编程方法,熟悉用VB语言完成一个应用程序的设计过程,掌握有关编辑和调试程序的方法和技巧; 2. 主要掌握VB语言中的标准模块的建立﹑数据文件的读出与写入、数组与选择结构的运用，图形操作等内容 3. 了解开发简单应用程序的全过程,包括:分析﹑设计﹑编程﹑调试和编写报告. 三.程序摘要 先在记事本中创建2个文本文档,分别输入本班25名学生在本学期的5门考试课的成绩和课程名及其学分.在主函数中读入两个原始数据文件的内容,保存在对应的结构体数组中,计算出每个学生5门课的加权平均分,并按平均分排列名次.然后显示菜单,调用各个函数,完成以下功能: 根据以上两个文件内容分别计算每个学生N门课程的加权平均分（保留两位小数，四舍五入），按平均分排列名次，平均分相同则名次并列。用VB创建一个数据文件，存放班级的成绩表。 分别统计全班每门课的平均分,并计算各分数段(90分以上;80～89;70～79;60～69;60分以下)的学生数。. 打印每名学生成绩条（并将结果存放到用VB创建的一个新的数据文件中）。 显示所有存在不及格课程的学生的名单(含学号,不及格课程名称,课程的学分及成绩)。 屏幕显示优等生名单及打印每门课程成绩分布图。 优等生条件(只要满足三个中任一个就可以): a) 平均分=90分 b) 名次在本班位于前四名 c) 平均分=85分,并且至少有一门课的成绩=95分 四.系统设计流程图 五.系统实现(见附录列表) 六.相关数据列表 源文件 运行效果 （此处仅以化学为例） 七．小结 综述 通过这次上机实习，我充分运用了自己在课堂中所学到的知识，同时也清楚地认识到自己的不足之处。很多东西自己以为已经掌握了，而实际上没有。正所谓“纸上得来终觉浅，绝知此事要躬行”，通过实习，我对已掌握的知识加深了了解，以往没掌握的知识有了一定的掌握，体会到VB语言编写程序的乐趣。在此,向悉心教导我的胡、江两位老师与耐心帮助我的同学致以诚挚的 出现的主要问题与解决办法 （1）在计算加权平均分前要将数据文件中的数据读出再进行处理，但始终出现“下标越界”的问题。 分析与解决办法：在用split函数将整条数据分开时，由于原始数据存储时的格式问题，有时会将空格作为数据分出并赋值给数组，这样程序在执行时会因数组长度确定而出现下标越界。解决的办法在于修改原始数据的存放，把格式进行调整，将空格数目固定下来。 （2）在按加权平均分排名时出现排名错误。 分析与解决办法：经过仔细检查发现错误原因在于利用选择法排序时最后的顺序交换出错，错误在于交换时中间变量使用有误。解决的办法在于修改交换数据的部分代码，正确使用中间变量。 （3）在“打印优等生名单”中代码中要有一个对成绩大于95分课程数目的统计，试图用一个子过程加以实现，但发现难以实现。 分析与解决办法：子过程在该处使用存在困难，难以达到目的，不妨改变思路，在标准模块中多加一个变量，定义为对成绩大于95分课程数目的统计。这样可以先期将每个同学的情况都算出，再在该处直接引用。 八．附录(主要程序代码) （1）标准模块 Type stuscore xuehao As String name As String chengji(1 To 5) As Integer paiming As Integer jiaquan As Single ks As Integer End Type Type course 编号 As Integer 课程名称 As String 课程学分 As Single End Type Public stu() As stuscore Public kc() As course Public a%, b%, c%, jiaquan!() Private Sub arrange_Click() （2）显示排名 Dim i%, j%, k%, s As stuscore, e% For i = 0 To a - 1 k = i For j = i + 1 To a If stu(j).jiaquan stu(k).jiaquan Then k = j Next j s = stu(i) stu(i) = stu(k) stu(k) = s Next i Picture1.Cls Picture1.Print 学号 姓名 化学