VB学生成绩管理系统
摘 要
本系统全称为学生成绩管理系统。根据开发要求，它主要应用于教育系统，完成对日常的教学、教务、教师以及学生的计算机化的管理。开发学生成绩管理系统可使学院教职员工减轻工作压力，比较系统地对教务、教学上的各项服务和信息进行管理，同时，可以减少劳动力的使用，加快查询速度、加强管理，以及国家各部门关于信息化的步伐，使各项管理更加规范化。目前，学校工作繁杂、资料重多。目前，管理信息系统已进入高校，但还未普及，而对于学生成绩管理来说，目前还没有一套完整的、统一的系统。因此，开发一套适和大众的、兼容性好的系统是很有必要的。 本系统管理内容广泛，其操作起来比较简单，这也包括学生成绩管理，其中有学生成绩管理；管理员对学生成绩管理等等。在开发过程中，注意使其符合操作的业务流程，并力求系统的全面性、通用性，使得本系统不只适用于一家教育机构。在开发方法的选择上，选择了生命周期法与原型法相结合的方法，遵循系统调查研究、系统分析、系统设计和系统实施四个主要阶段进行设计，而在具体的设计上，采取了演化式原型法，随着用户的使用及对系统了解的不断加深，对某一部分或几部分进行重新分析、设计、实施。在开发工具的选择上，主要利用Visual basic6.0编程语言进行开发，使用其自带的数据库，从而保证了数据的完整性与一致性。本论文主要从系统分析、系统设计、系统实施与使用等几个方面进行介绍。
【关键词】信息化 成绩管理 数据库 Visual basic6.0
Abstract
The name of our system is grade Management System.According to the requirements of developing, the system is mainly applied to education system which manageas the daily teaching educational administration and computeration of teachers and students. Developing grade Management System can not only ruduce the presure of the staff and systematically manage the service and information, but also decrease the use of labour force, accelerate the requiring speed, improve management, speed the pace of concernad national department autumated information retrieval to standardize the managements. Nowdays, the universities work are miscellaneous,especially in private ones.It's important to put the teachers' management on the table. Up to now, mamagement has come into universities but not popularized. As for the teaching management, there is not a set of complete and unified system, so it's very necessary to develop a common,compatible one. The system is wide and comprehensive in including most of the service items of teaching plans, such as grade management which refers to teaching plans, grade management, students management and so on. In developing procedure, we pursure the comprehensiveness and commomality of the system, so that it the life sycle approach and the prototype-based approach, approach in four main steps: system investigation, system analysis, system design and system implementation. AS to data design, evolutionary prototype-based approach is partialy adof its self-sustaining. to ensure the integratedness and consistency. This thesis mainly introduce the ideas of the analysizing ,designing ,implementing and application of this system.
【KeyWords】the Student result management system, function, characteristics, Visual basic6.0
目 录
目 录... 4
第一章 引 言... 5
1.1 项目开发背景... 5
1.2 项目开发的目标... 5
1.3 项目提出的意义... 5
1.4 系统开发所用的技术准备... 6
第二章 系统分析... 7
2.1系统需求分析... 7
2.1.1系统调查... 9
2.1.2组织机构设置... 9
2.1.3用户需求... 10
2.1.4系统业务流程图... 10
2.1.5系统设计思想... 10
2.1.6系统设计分析... 10
2.1.7系统功能分析... 11
第三章 学生成绩管理的设计... 12
3.1学生成绩查询系统功能需求简介... 12
3.2功能需求描述... 12
3.3系统目标要求... 12
3.4系统平台选择... 13
3.5数据库设计... 14
3.5.1数据库需求分析... 14
3.5.2数据库概念结构设计... 15
3.5.3 逻辑结构设计... 16
第四章 学生成绩管理系统的实现... 17
4.1登陆界面编码设计... 17
4.2 软件测试的目的和原则... 28
第五章 结 论... 29
致 谢42... 42
VB学生成绩管理系统
第一章 引 言
1.1 项目开发背景
几年前，各个学校的学生成绩管理基本上都是靠手工进行，随着各个大学，有关学生成绩管理工作所涉及的数据量越来越大，有的学校不得不靠增加人力、物力来进行学生成绩管理。但手工管理具有效率底、易出错、检索信息慢、对学校的管理提供决策信息较为困难等缺点。我校尽管部分学院或系已开出学生成绩管理系统，但开发的系统不具有通用性，所以我想借本次毕业设计之际，开发一个不仅适用本校各系而且适用于其它各校的通用学生成绩管理系统。
我选择母校来设计这个系统主要有两个原因：
一是：我熟悉学校的学生成绩管理工作，进行需求分析时比较方便。；
二是：在我校学习的几年里，我受到了很多老师的关怀，若开发的系统能投入使用并发挥作用，使有关人员从繁重的工作中解脱出来，也算是对母校的一点回报。
1.2 项目开发的目标
建立学生成绩管理系统，采用计算机对学生成绩进行管理，进一步提高办学效益和现代化水平。帮助广大教师提高工作效率，实现学生成绩信息管理工作流程的系统化、规范化和自动化。
1.3 项目提出的意义
现在我国的大中专院校的学生成绩管理水平普遍不高，有的还停留在纸介质基础上，这种管理手段已不能适应时代的发展，因为它浪费了了许多的人力和物力。在当今信息时代这种传统的管理方法必然被计算机为基础的信息管理系统所代替。如果本系统能被学校所采用，将会改变以前靠手工管理学生成绩的状况，可以树立良好的办学形象，提高工作效率。
1.4 系统开发所用的技术准备
数据库是60年代末出现的一门计算机软件技术，到现在虽然只有三十多年的历史，但在理论和时间上都已经经历了很多年的考验 VB是微软公司推出的一个集成开发环境，她是微软VISUAL STUDIO系列的产品之一。VISUAL BASIC继承了早期BASIC语言的优点，采用面象的程序设计技术，提供了开发WINDOWS应用程序最迅速哦，最简捷的方法，她具有比较鲜明的特点：
1，容易学习
2，容易使用，面向对象
3，数据处理能力强
4，语法简单，程序可维护性
这些特点使VISUAL BASIC 成为当前流行的计算机编程语言之一，因特网上关于他的讨论区或个人网页随处可见，足见其普及之广，影响之大。
VB学生成绩管理系统
第二章 系统分析
2.1系统需求分析
在开发方法的选择上，选择了演绎式原型法与生命周期法相结合的方法。具体来说，就是在系统开发之前对系统有一个总体框架设想，各功能单元的结构和功能也比较清楚，但是还没有具体实现。系统完成什么功能，分成哪几个部分，各个部分又有哪几个模块，都已理解掌握，且以后不需要做更大的变动，只是具体到每个模块，还没有全部实现。具体地设计可能是完全实现一个模块，也可能是用一个效率高地模块代替一个旧模块。信息系统的开发是一项比较复杂的工作，我们必须选用科学的有效的开发方法。近年来，国内外已逐步总结出一些开发信息系统的方法和技术，但是，从目前的情况来看，系统的开发技术仍是一个比较薄弱的环节。那么根据本系统开发的要求，本系统选择了生命周期法和原型法相结合的方法。现具体介绍如下：
生命周期这个概念源于系统工程方法。广义地说，任何系统均有其发生、发展、成熟、消亡或更新换代的过程，这个过程称为系统的生命周期。主要包括系统调查阶段、系统分析、系统设计、系统实施及系统维护与评价五个部分。根据系统设计而对整个系统实施，包括物理实施，程序设计，调试等。实施是最后的一步，关系着最后的成功。
系统实施的任务主要包括：
1程序设计
2物理实施
3使用说明书
4编译
在建筑学和机械设计学中，“原型”指的是其结构、大小和功能都与某个物体相类似的模拟该物体的原始模型。在管理信息系统开发中，用“原型”来形象地表示系统的一个早期可运行版本，它能反映新系统的部分重要功能和特征。“原型方法”则是利用原型辅助开发系统的一种新方法。 原型方法要求在获得一组基本的用户需求后，快速地实现新系统的一个“原型”，用户、开发者及其他有关人员在试用原型的过程中，加强通信和反馈，通过反复评价和反复修改原型系统，逐步确定各种需求的细节，适应需求的变化，从而最终提高新系统的质量。因此可以认为原型方法确定用户需求的策略，它对用户需求的定义采用启发的方式，引导用户在对系统逐渐加深理解的过程中作出响应。
原型法主要包括确定系统基本需求阶段、构造初始原型阶段、原型的使用评价阶段、修改原型阶段和确定模型后的处理阶段。
原型法的基本思想是：凭借着系统分析人员对用户要求的理解，在强有力的软件环境支持下，快速地给出一个实实在在的模型（或称原型、雏形），然后与用户反复协商修改,最终形成实际系统。
在本系统中选择了演化型(Evolutionary Prototying)原型法， 其目的不在于改进规格说明和用户需求,而是将系统改造得易于变化，在改进原型的过程中将原型演化成最终系统。它将原型方法的思想贯穿到系统开发全过程，对满足需求的改动较为适合。
先根据用户提出的建立新系统的要求，进行初步调查和初步可行性分析，提出系统总体规划。再对原系统进行深入的调查，彻底掌握原系统的模型，并在此基础上提出新系统的逻辑模型。 a.系统目标
学院在教学这一部分主要是由教务处对课程、对学生、对学生成绩进行合理地安排以及统筹计划，使用本系统对学生的成绩进行合理管理，实现学生成绩的录入、编辑、删除等功能，也可以实现成绩的排序、检索等。它将成为教务处老师的一个很好的帮手。
b.系统功能
总体来说，学生成绩管理系统完成以下功能：
1 学生管理
2 成绩管理
3 成绩打印
系统设计
根据系统分析确定的逻辑模型，确定新系统的物理模型，即计算机化信息系统应用软件的总体结构和数据库设计，并提出系统配置方案，继而对物理模型进行详细的设计。主要内容有：代码设计，用户界面设计，处理过程设计，编写系统设计说明书。
系统设计是以系统分析为基础，而系统设计又是系统实施的基础，系统设计的主要任务是代码设计、物理设计、数据库设计、功能结构图设计。
系统设计的任务主要包括：
1代码设计
2系统物理设计
3数据库设计
按照物理模型实现应用软件的编写和测试，系统试运行，编写技术文件，系统转换，系统交付使用，以及运行后的系统维护和评价等工作。
生命周期法要求信息系统的开发研制工作要按照规定步骤，使用一定的图表工具，在结构化和模块化的基础上进行。结构化的思想是把整个系统的功能看作是一个大模块，根据系统分析和设计的不同要求，按照由顶向下，逐步求精的原则进行模块的分解和组合，这种方法贯穿于系统分析、系统设计和程序设计的各个过程中。生命周期法主要有以下几个特点：
1. 建立面向用户的观点
2. 加强调查研究与系统分
3. 逻辑设计与物理设计分别进行
4. 使用结构化、模块化方法
5. 严格按照阶段进行
6. 工作文件标准化和文献化
调试维护
系统程序和数据的维护又包括程序的维护，数据文件的维护，代码的维护等等。维护是系统在使用中应对系统注意，并加以维护，维护包括：
1系统运行的日常维护
2系统运行情况的记录
3系统程序和数据的维护。
2.1.1系统调查
学生成绩管理是学校管理中异常重要的一个环节，作为学校，除了育人，就是育知，学生成绩管理的计算机化是整个学校教务管理中的重要一部分，能否实现这一步关系到学校办学整体效率的高低，介与它的重要性，学生成绩管理系统的开发与应用就逐渐提入议程，并占着越来越重要的份量。
运用学生成绩管理系统可以减轻学院教学人员的工作量，缩小开支，提高工作效率与准确率，能够合理安排时间，能够尽快的知道自己的考试成绩，投入新的课程的学习或复习这次没有考过的课程。而学生成绩管理系统的应用也为今天的民办教育在未来市场的竞争力有所提高。从大的方向说，就是为了加速我国四化建设的发展，实现全部的自动化，使我国发展成为通讯网络化，决策科学化，办公自动化的国家。
在现代，高科技的飞跃发展，人们工作习惯的改变，特别是电脑的大量普及，人们生活节奏越来越快，怎样提高工作效率是人们首先考虑的问题。学生成绩管理是一个非常繁琐与复杂的一项工作，一个原因就是工作量大，不好管。对于一个学校而言，更应该运用一些本地资源，提高管理的力度，对学生负责，对国家负责。
2.1.2组织机构设置
教学组织机构主要是由：学生查询，成绩管理，管理员修改等组成。图2-1为组织机构图。
图2-1组织机构图若图片无法显示请联系QQ3710167,本论文免费,转发请注明源于www.lwfree.cn
职责：
学生管理：管理一些学生的档案，具体是学生的学号、姓名、家庭地址、家庭电话等。
成绩管理：管理学生的成绩核算、录入、删除、排序、查询、检索等。
管理员管理：管理学生的成绩报表及信息的整理、维护、保存等。
2.1.3用户需求
在学生成绩管理系统中，主要从对项目的经济上进行分析评价，一方面是学生可以进行成绩查询，管理员对系统进行管理和维护、对学生成绩进行及时的修改和维护等，另一个是取得的收益。这是个超小型的管理系统，从投入的人力，财力与物力来讲是非常之小的，只要一台电脑，一个管理员，这个系统就可以搞起来，考虑到学校里有电脑，现只要购置一台服务器就可以了。从节省人力方面，可以让管理人员从繁忙与复杂的工作中解脱出来，做更多的工作，可以给教学管理提高一个层次。
2.1.4系统业务流程图
图2-2系统业务流程图若图片无法显示请联系QQ3710167,本论文免费,转发请注明源于www.lwfree.cn
在学生成绩管理系统中，学生可以对自己的成绩以及其他同学的成绩可以进行很好的查询，管理员可以对学生成绩进行及时的修改和补充。可以让学生及老师很好的对学生的成绩进行了解，从而进行更好的学习。
2.1.5系统设计思想
民办教育正在迅猛发展，学院从硬件到软件都投入了大量的人力、物力、财力，在教务上，给各个办公室配置了计算机，并能联接到互联网，并且，学院领导对这方面比较重视，在教务上配置了一定数目的能够训练操作计算机的干事，可以快速、方便、高效地使用计算机进行日常工作。学院开展了计算机及其维修专业，可让学生以实践方式对系统进行维护。
使此系统在实践上具备了可行性。由此可知，开发学生成绩管理系统在学校中具有可行性。
2.1.6系统设计分析
根据系统分析确定的逻辑模型，确定新系统的物理模型，即计算机化信息系统应用软件的总体结构和数据库设计，并提出系统配置方案，继而对物理模型进行详 细的设计。主要内容有：代码设计，用户界面设计，处理过程设计，编写系统设计说明书。
系统设计是以系统分析为基础，而系统设计又是系统实施的基础，系统设计的主要任务是代码设计、物理设计、数据库设计、功能结构图设计。
VB学生成绩管理系统
系统设计的任务主要包括：
1代码设计
2系统物理设计
3数据库设计
2.1.7系统功能分析
本系统在管理员的正确操作下，可以很好的完成所要求的任务，而学生可以在系统上进行很好的查询，从而知道自己的成绩，学生才能很好的改正自己的学习方法，而老师可以知道还有哪些同学的功课不行，可以额外的对这些同学进行补课，或提高自己的教学水平，让学生的成绩可以尽快的提高起来.
第三章 学生成绩管理的设计
3.1学生成绩查询系统功能需求简介
学生成绩查询系统对学校加强学生成绩管理有着极其重要的作用。由于各个大学都在持续扩招，学生的数量日益庞大，传统的手工成绩管理不仅工作量大，而且容易出现问题。
3.2功能需求描述
1、用户管理功能
用户分为管理员、学生用户两类。管理员必须凭借用户名及密码才能进入系统，不然不可以对系统的信息进行修改和添加，学生或老师不需要用用户名和密码进行登陆，便可以对信息进行查询。但不可以进行修改。
按学生角度管理教师可以看到学生的成绩信息，学生信息包括学号、姓名、成绩。教师用鼠标双击某一学生成绩时，可以自动显示出该课程的这个学生所有课程的学习成绩，并同时自动计算出这个学生的总分和平均分。在成绩信息中，教师可以对学习成绩进行增加、修改和删除。
2、学生对成绩的查看功能可以自动显示出该课程的这个学生所有课程的学习成绩，并同时自动计算出这个学生的总分和平均分。在成绩信息中，教师可以对学习成绩进行增加、修改和删除。
3、学生对成绩的查看功能
学生用户登录后，学生可以看到自己的成绩信息，和自己成绩的总分以及该同学在总成绩中的排列名次，这中间包括该学生的姓名，学号等。
4、“管理员信息”的实体E－R图3.2若图片无法显示请联系QQ3710167,本论文免费,转发请注明源于www.lwfree.cn
3.3系统目标要求
根据需求分析，确定系统由学生查询，管理员管理，学生成绩数据表等组成，各个功能如下：
1，学生查询
学生可以随时登陆系统进行成绩查询，学生登陆不需要用户名及密码可直接进行查找并及时知道你自己的成绩和在学生中成绩排列名次，及时知道自己的不足，和老师联系，改正自己的学习态度，从而更好的提高自己的学习成绩
2，管理员管理
管理是系统的一个中心人物，所以他必须通过用户名及密码才能进入系统，如果管理员将密码丢失，他将靠系统提示才能进入系统。管理员在学生成绩管理系统中的任务是修改和更新学生的成绩信息及排列名次，让老师及学生能够及时了解学生的成绩情况。
3，学生成绩数据表
这是由管理员制作的一份学生成绩名单，老师和学生可以通过学生成绩管理系统查到自己的成绩从而改变自己的学习或教学方法，让自己的学生或自己的学习成绩有所提高。
3.4系统平台选择
系统由软件平台和硬件平台这两个平台组成。
1，系统硬件的组成
系统硬件已经建设完毕，硬件组成结构图如下3。3所示若图片无法显示请联系QQ3710167,本论文免费,转发请注明源于www.lwfree.cn
硬件平台要求整个网络机构应具有一定的开放性，开放性是通过以下两个方面反映的：
1）本处室通过中心交换机可以随时同局域网进行通信，完成数据共享，数据传 及其他数据服务工作。
2）本处室通过应用服务器与INTERNET连接。从而可与外部进行各种信息交流。是为了从各种外部信息资源获取多种多样的信息，网络结构在这里不作为讨论重点。
2．系统软件的组成
整个系统由三个部分的组成，分别为：管理员子系统、学生子系统和成绩管理子系统。
3.5数据库设计
3.5.1数据库需求分析
数据库管理系统（DBMS）是指数据库系统中管理数据的软件系统。DBMS是数据库系统的核心组成部分。对数据库的一切操作，包括定义、更新及各种控制,都是通过DBMS进行的。DBMS总是基于某种数据模型，可以把DBMS看成是某种数据模型在计算机系统上的具体实现。根据数据模型的不同，DBMS可以分成层次型、网状型、关系型、面向对象型等。MS SQL Server2000就是一种关系型数据库管理系统。 关系模型。关系模型主要是用二维表格结构表达实体集，用外键表示实体间联系。关系模型是由若干个关系模式组成的集合。关系模式相当于前面提到的记录类型，它的实例称为关系，每个关系实际上是一张二维表格。 关系模型和层次、网状模型的最大判别是用关键码而不是用指针导航数据，表格简单用户易懂，编程时并不涉及存储结构，访问技术等细节。关系模型是数学化模型。SQL语言是关系数据库的标准化语言，已得到了广泛的应用。
DBMS的特点和功能可以分为三个子系统：设计工具子系统、运行子系统和DBMS引擎。 设计子系统有一个方便数据库及其应用创建的工具集。它典型地包含产生表、窗体、查询和报表的工具。DBMS产品还提供编程语言和对编程语言的接口。运行子系统处理用设计子系统开发的应用组件。它所包含的运行处理器用来处理窗体和数据库的数据交互，以及回答查询和打印报表等。 DBMS引擎从其他两个组件接受请求，并把它们翻译成对操作系统的命令，以便读写物理介质上的数据。DBMS引擎还涉及事务管理、锁、备份和恢复。 数据库模式定义了数据库的结构、表、关系、域和业务规则。数据库模式是一种设计，数据库和应用正是建立在此基础上的。 域是一列可能拥有的值的集合。必须为每一个表的每一列确定域。除了数据的物理格式外，还需要确定是否有些域对表来说是唯一的。 数据库模式的最后一个要素是业务规则，它是对需要反映在数据库和数据库应用程序中的业务活动的约束。业务规则是模式的一个重要部分，因为他们指定了无论什么数据变化到达DBMS引擎，允许的数据值必须满足的约束。不管无效的数据变化请求是来自窗体的用户、查询/修改请求还是应用程序，DBMS都应该拒绝。 遗憾的是，不同的DBMS产品用不同的方法实施业务规则。在某些情况下，DBMS产品不具备实施必要业务规则的能力，必须以代码形式把它们编入应用程序。
admin表若图片无法显示请联系QQ3710167,本论文免费,转发请注明源于www.lwfree.cn
3.5.2数据库概念结构设计
数据库设计的步骤是：（1） 数据库结构定义：目前的数据库管理系统（DBMS）有的是支持联机事务处理CLTP（负责对事务数据进行采集、处理、存储）的操作型DBMS，有的可支持数据仓库、有联机分析处理CLAP（指为支持决策的制定对数据的一种加工操作）功能的大型DBMS，有的数据库是关系型的、有的可支持面向对象数据库。针对选择的DBMS，进行数据库结构定义。（2） 数据表定义：数据表定义指定义数据库中数据表的结构，数据表的逻辑结构包括：属性名称、类型、表示形式、缺省值、校验规则、是否关键字、可否为空等。关系型数据库要尽量按关系规范化要求进行数据库设计，但为使效率高，规范化程度应根据应用环境和条件来决定。数据表设计不仅要满足数据存储的要求，还要增加一些如反映有关信息、操作责任、中间数据的字段或临时数据表。
（3） 存储设备和存储空间组织：确定数据的存放地点、存储路径、存储设备等，备份方案，对多版本如何保证一致性和数据的完整性。（4） 数据使用权限设置：针对用户的不同使用要求，确定数据的用户使用权限，确保数据安全。
（5） 数据字典设计：用数据字典描述数据库的设计，便于维护和修改为了更好地组织数.
据和设计出实际应用数据库，应该注意如下问题：
规范化地重组数据结构：对数据进行规范化表达，这在后面将会具体讨论。
关系数据结构的建立：在进行了数据基本结构的规范化重组后，还必须建立整体数据的关系结构。这一步设计完成后数据库和数据结构设计工作基本完成，只待系统实现时将数据分析和数据字典的内容代入到所设计的数据整体关系结构中，一个规范化数据库系统结构就建立起来了。
建立关系数据结构涉及三方面内容：确定关联的关键指标项并建立关联表；确定单一的父系记录结构；建立整个数据库的关系结构。
VB学生成绩管理系统
若图片无法显示请联系QQ3710167,本论文免费,转发请注明源于www.lwfree.cn
3.5.3 逻辑结构设计
数据库设计主要是进行数据库的逻辑设计，即将数据按一定的分类、分组系统和逻辑层次组织起来，是面向用户的。数据库设计时需要综合企业各个部门的存档数据和数据需求，分析各个数据之间的关系，按照DBMS提供的功能和描述工具，设计出规模适当、正确反映数据关系、数据冗余少、存取效率高、能满足多种查询要求的数据模型。
第四章 学生成绩管理系统的实现
下面给出系统开发出来的详细界面以阐述学生成绩管理系统的具体功能
4.1登陆界面编码设计
程图
Sub pingbi3()
Form10.Command4.Visible = False
End Sub
Form2.删除.Visible = False
End Sub
Sub pingbi2()
Form9.Show
pingbi3
End Sub
Private Sub 帮助_Click()
r = MsgBox("用户名提示：123....密码提示：123...", 64, "帮助")
Form1.Show
End Sub
若图片无法显示请联系QQ3710167,本论文免费,转发请注明源于www.lwfree.cn
登陆界面：
管理员密码登入：
Option Explicit
Const username As String = "123456"
Const password As String = "123456"
Private Sub cmdCancel_Click()
txtUsername.Text = ""
txtPassword.Text = ""
txtUsername.SetFocus
End Sub
Form2.Show
Unload Form1
Unload Me
Else
n = n + 1
If n < 3 Then
i = MsgBox("用户名或密码错误，请重新输入！", vbCritical + vbRetryCancel + vbDefaultButton1, "登录失败")
If i = vbRetry Then
txtUsername.Text = ""
txtPassword.Text = ""
txtUsername.SetFocus
Else
End
End If
Else
MsgBox "三次错误，请退出！", vbOKOnly + vbExclamation, "登录失败"
End
End If
End If
End Sub
Private Sub Command1_Click()
Unload Me
Form1.Show
End Sub
添加学生成绩 ：
若图片无法显示请联系QQ3710167,本论文免费,转发请注明源于www.lwfree.cn
Sub paixu()
For n = 1 To recordnumer - 1
For m = 1 To recordnumer
Get #1, m, recordvar1
Get #1, m + 1, recordvar2
If recordvar2.average > recordvar1.average Then
recordvar.cyuyan = recordvar1.cyuyan
recordvar.jisuanji = recordvar1.jisuanji
Put #1, m, recordvar2
Put #1, m + 1, recordvar
End If
Next m
Next n
End Sub
VB学生成绩管理系统
Private Sub 确定_Click()
If (Text3.Text < 0 Or Text3.Text > 100) Then
MsgBox "输入有误，请重新输入"
Text3.SetFocus
GoTo chonglai
End If
If (Text4.Text < 0 Or Text4.Text > 100) Then
MsgBox "输入有误，请重新输入"
Text4.SetFocus
GoTo chonglai
End If
MsgBox "输入有误，请重新输入"
Text5.SetFocus
GoTo chonglai
End If
If (Text6.Text < 0 Or Text6.Text > 100) Then
MsgBox "输入有误，请重新输入"
Text6.SetFocus
GoTo chonglai
End If
If (Text7.Text < 0 Or Text7.Text > 100) Then
MsgBox "输入有误，请重新输入"
Text7.SetFocus
GoTo chonglai
End If
Open "cj.dat" For Random As #1 Len = Len(recordvar)
recordnumer = LOF(1) / Len(recordvar)
recordvar.stnum = Text1.Text
recordvar.stname = Text2.Text
recordvar.gaoshu = Text3.Text
recordvar.yingyu = Text4.Text
recordvar.wuli = Text5.Text
recordvar.cyuyan = Text6.Text
recordnumer = recordnumer + 1
Put #1, recordnumer, recordvar
paixu
Close #1
Visible = False
Form2.Visible = True
Unload Form5
chonglai:
End Sub若图片无法显示请联系QQ3710167,本论文免费,转发请注明源于www.lwfree.cn
信息的修改：
Private Sub 确定_Click()
If (Text3.Text < 0 Or Text3.Text > 100) Then
MsgBox "输入有误，请重新输入"
Text3.SetFocus
GoTo chonglai
End If
If (Text4.Text < 0 Or Text4.Text > 100) Then
MsgBox "输入有误，请重新输入"
Text4.SetFocus
GoTo chonglai
End If
Text5.SetFocus
GoTo chonglai
End If
If (Text6.Text < 0 Or Text6.Text > 100) Then
MsgBox "输入有误，请重新输入"
Text6.SetFocus
GoTo chonglai
End If
If (Text7.Text < 0 Or Text7.Text > 100) Then
MsgBox "输入有误，请重新输入"
Text7.SetFocus
GoTo chonglai
End If
Open "cj.dat" For Random As #1 Len = Len(recordvar)
recordvar.stnum = Text1.Text
recordvar.stname = Text2.Text
recordvar.gaoshu = Text3.Text
recordvar.yingyu = Text4.Text
recordvar.wuli = Text5.Text
recordvar.cyuyan = Text6.Text
recordvar.jisuanji = Text7.Text
paixu
Close #1
Text1.Text = ""
Text2.Text = ""
Text3.Text = ""
Text4.Text = ""
Text5.Text = ""
Text6.Text = ""
Text7.Text = ""
Visible = False
Form2.Visible = True
Unload Form7
chonglai:
End Sub
删除学生成绩：
Private Sub 确定_Click()
If (Text3.Text < 0 Or Text3.Text > 100 Or Text3.Text = "") Then
MsgBox "输入有误，请重新输入"
Text3.SetFocus
GoTo chonglai
End If
If (Text4.Text < 0 Or Text4.Text > 100) Then
MsgBox "输入有误，请重新输入"
Text4.SetFocus
Text5.SetFocus
GoTo chonglai
End If
If (Text6.Text < 0 Or Text6.Text > 100) Then
MsgBox "输入有误，请重新输入"
Text6.SetFocus
GoTo chonglai
End If
If (Text7.Text < 0 Or Text7.Text > 100) Then
VB学生成绩管理系统
MsgBox "输入有误，请重新输入"
Text7.SetFocus
GoTo chonglai
End If
Open "cj.dat" For Random As #1 Len = Len(recordvar)
repeat:
Get #1, position + 1, recordvar
If Loc(1) > recordnumer Then GoTo finish
Put #1, position, recordvar
position = position + 1
GoTo repeat
finish:
recordnumer = recordnumer - 1
Put #2, i, recordvar
Next i
Close #1
Close #2
Kill "cj.dat"
Name "cj1.dat" As "cj.dat"
Visible = False
Form2.Visible = True
Unload Form6
chonglai:
End Sub
查找学生成绩：
若图片无法显示请联系QQ3710167,本论文免费,转发请注明源于www.lwfree.cn
Private Sub Command1_Click()
Dim h As Integer
Dim n As Integer
Dim Comp2 As String
Text1.Text = "学号" + " " + "姓名" + " " + "高数" + " " + "英语" + " " + "物理" + " " + "c语言" + " " + "计算机文化基础" + " " + "平均分" + Chr(13) + Chr(10)
F = 0
h = 1
Open "cj.dat" For Random As #1 Len = Len(recordvar)
recordnumer = LOF(1) / Len(recordvar)
For n = 1 To recordnumer
Get #1, n, recordvar
Comp1 = Trim(textfindNum.Text)
temptext.Text = recordvar.stnum
Comp2 = Trim(temptext.Text)
If StrComp(Comp1, Comp2) = 0 Then
h = n
F = F + 1
Get #1, h, recordvar
With recordvar
End If
Next n
Close #1
Label1.Caption = "一共找到" + Str(F) + "条记录"
If F = 0 Then
MsgBox "没有该记录", vbInformation, "提示"
End If
End Sub
4.2 软件测试的目的和原则
学生成绩管理是学校管理中异常重要的一个环节，作为学校，除了育人，就是育知，学生成绩管理的计算机化是整个学校教务管理中的重要一部分，能否实现这一步关系到学校办学整体效率的高低，介与它的重要性，学生成绩管理系统的开发与应用就逐渐提入议程，并占着越来越重要的份量。 运用学生成绩管理系统可以减轻学院教学人员的工作量，缩小开支，提高工作效率与准确率，能够合理安排时间，能够尽快的知道自己的考试成绩，投入新的课程的学习或复习这次没有考过的课程。而学生成绩管理系统的应用也为今天的民办教育在未来市场的竞争力有所提高。从大的方向说，就是为了加速我国四化建设的发展，实现全部的自动化，使我国发展成为通讯网络化，决策科学化，办公自动化的国家。 在现代，高科技的飞跃发展，人们工作习惯的改变，特别是电脑的大量普及，人们生活节奏越来越快，怎样提高工作效率是人们首先考虑的问题。学生成绩管理是一个非常繁琐与复杂的一项工作，一个原因就是工作量大，不好管。对于一个学校而言，更应该运用一些本地资源，提高管理的力度，对学生负责，对国家负责。
VB学生成绩管理系统
第五章 结 论
随着社会的发展和经济时代的到来，管理信息系统在各行各业都越来越重要，特别是教育事业。在经济发达的国家，许多教育机构（如公办、私立、培训机构等），都投入了大量的资金开发MIS系统，以求在将来激烈的竞争中立于不败之地。在我国，民办教育是新兴的一个行业，是随着改革开放和市场经济的发展根据中国特有的国情发展起来的，特别是中国民办教育促进法的出台，从一定的程度上规范和促进了中国民办教育的发展，这是一个很有发展前途的新兴产业，但是同发达国家相比，我国的民办教育行业的信息技术的应用程度还很低，只有在大城市中发展较早、规模较大的民办院校中才使用计算机进行大规模操作，从各方面提高工作效率，取得良好的社会和经济效益，而一些新兴的、规模较小的民办机构还没有全部具备这种功能。因此可见，随着我国民办教育的迅速发展，信息技术在其上的应用会更加地广泛和深入。
致 谢
在这即将离开这所大学的日子里，我开始想起我们刚到学校时的样子，什么都是那么的好奇，转眼间我们就毕业了，呵呵，在我这篇论文中我感谢我的所有任科老师，是他们在我的学习上细心的帮助我，鼓励我，我感谢我的导师周长虹老师，是她在工作之余对我的毕业设计很论文进行了认真的修改，我也感谢为我们毕业对我们进行的答辩小组，是他们在对我们的知识进行一次综合的测评。
参考文献：
[1] Visual Basic 6.0 使用指南
作者：Bob Reselman , Richard Peasley , Wayne Pruchniak.
出版社：电子工业出版社
[2] Visual Basic 6.0 中文版控件大全
作者：Microsoft
出版社；电子工业出版社
[4] 中文Access 2000 24学时教程
作者：Craig Eddy ，Timothy Buchanan
出版社：机械工业出版社
