学生信息管理系统

1、浙江师范大学行知学院本科毕业设计(论文)正文目 录摘要11 引言21.1 系统开发背景21.2 系统开发的意义21.3 国内外研究现状21.3.1 国内研究现状21.3.2 国外研究现状21.4 系统开发的目的32 主要开发软件及软件介绍32.1 Visual Basic简介32.1.1 Visual Basic概述32.1.2 Visual Basic的特点32.2 Microsoft Access 2003简介概述52.2.1 Access 2003概述52.2.2 Microsoft Access 特点52.2.3 Microsoft Access的优点63 系统的需求分析63.1 可行

2、性分析63.2 系统所需实现的功能73.2.1 管理员实现的功能73.2.2 普通用户（学生）实现的功能83.3 系统实现的功能分析83.4 数据流图83.5 学生信息管理系统E-R图84 系统设计114.1 学生信息管理系统流程图114.2 数据库表124.3 安全因素144.4 系统的功能模块分析144.4.1 系统设置模块154.4.2 班级管理模块154.4.3 档案管理模块154.4.4 课程管理模块164.4.5 交费管理模块164.4.6 成绩管理模块174.4.7 统计打印模块175 系统主要模块的实现185.1 登录模块的实现185.2 系统主界面的实现195.3 班级管理的

3、实现215.4 档案管理的实现255.5 课程管理的实现265.6 成绩管理的实现275.7 交费管理的实现295.8 打印信息的实现305.9 帮助326 系统性能分析与测试326.1 系统测试目的326.2 系统性能特点326.3 系统测试337 总结33致谢34参考文献34学生信息管理系统学生信息管理系统摘要：学生信息管理系统是典型的管理信息系统(MIS)，其开发主要包括后台数据库的建立和维护以及前端应用程序的开发两个方面。对于前者要求建立起数据一致性和完整性强、数据安全性好的库。而对于后者则要求具备应用程序功能完备，易使用等特点。本系统采用Microsoft的ACCESS来设计数据库，

4、并使用当前优秀的开发工具:Microsoft Visual Basic 6.0，它有着最为灵活的数据库结构，对数据库应用有着良好的支持。此系统分为两大模块：用户模块和管理员模块。对于用户模块来说，只能浏览属于本用户（学生）的相关信息；而管理员模块，则可以添加、查询、修改、删除、查看所有学生的信息，并且可以对学生信息进行简单的管理。关键词: 学生信息管理系统；模块；数据库Student Information Management SystemAbstract：The students' information management system is the typical infor

5、mation management system (MIS). Its development mainly includes two aspects. One is the setting and maintenance of backstage database, and the other is the development of the client application program. The former needs to be established with a consistency of data, a good performance of the integrit

6、y and the database security. For the latter, it needs to be equipped with a complete application program function and be easy to used features. This system adopts the Microsoft's ACCESS to design database and apply the current outstanding tools: Microsoft Visual Basic 6.0, which has the most fle

7、xible database structure and is supported to the database application. The system is divided into two modules: the user module and the administrator module. The user module can only be browsed the relevant information by the users themself (students), while the administrator module can be added, que

8、ried, modified, deleted, viewed all the students information and students information can be also easily managed.Keywords: student information management system； module；database1 引言1.1 系统开发背景随着计算机技术的飞速发展和网络时代的到来，我们已经进入了信息化的时代，有人也称之为数字化的时代。在这个数字化时代里，各个高校在各方面的信息管理工作都受到了极大的挑战。随着各个高校的教育规模不断的发展扩大，学生人数急剧的

9、增加，有关学生的各种信息量也成倍增长。也带来了各个高校教育发展过程中的一个重要的问题，就是学生信息的管理问题。面对庞大的信息量就需要有一个学生信息管理系统来提高学生信息管理工作的效率，做到信息的规范管理、科学统计和快速查询，以减少管理工作方面的工作量。学生信息管理系统就是根据这些因素来设计和开发的。1.2 系统开发的意义现在我国的各大院校的学生成绩管理水平普遍不高，有的甚至还停留在纸介质基础上，这种管理手段已经不能适应时代的发展，因为它浪费了许多的人力和物力。在现在信息时代，这种传统的管理方法必然会被计算机为基础的信息管理系统所代替。如果本系统能被学校所采用，将会改变以前靠手工管理学生成绩的状

10、况，可以树立良好的办学形象，提高工作效率。1.3 国内外研究现状1.3.1 国内研究现状随着我国高等教育的发展，国内高校迫切需要提高教育工作的质量与效率，而学生信息管理工作是高校信息查询工作的重要组成部分，但是从现有高校的学生信息管理系统来看还存在很多的问题，主要是：1. 功能单一。一个系统只为了解决一个具体的问题而开发的。各个相关系统间没有紧密、有效的联系，影响了信息的重用和共享。2. 系统孤立。许多系统还处于单机应用状态，交互性差，造成信息重复采集、重复统计，同时也会在查询信息时查找不完全，不能提供充分的信息。3. 在软件的使用上，学生信息管理系统还存在可扩充性和灵活性差，缺乏强有力后续技

11、术支持，无法不断完善系统，来适应学校的发展需要。1.3.2 国外研究现状随着国外经济的持续发展，学校办学规模的扩大，学生的数量也成倍增长，学生信息查询模式也发生了变革，并随着计算机科学技术的不断发展，使得信息查询系统在各个领域发挥着越来越重要的作用。国外的大中型软件公司也曾做过很多高校的学生的信息管理系统，开发技术也比国内的成熟，在开发过程中遵循了可扩展性和包容性，使得系统能接纳已有的数据结构，在今后扩展时有效地保护已有的资源，在需要变化时，能方便地调整结构，易于扩充功能，升级方便，即满足当前的业务需求，又为今后的扩展留有很大的空间。而在信息标准化和规范化的基础上，对信息进行合理的布局，使得相

12、关人员可以按照各自的权限进行信息查询和维护。1.4 系统开发的目的开发一个能被多所学校通用的学生管理信息系统，本着可重复利用的设计理念，使得各学校都可以经过简单的修改，将此系统变为具有自己学校特色的学生管理系统。具备一般的学生管理系统所需的基本功能，如：档案管理、课程管理、成绩管理、交费管理等。2 主要开发软件及软件介绍服务器和客户端程序的实现技术有很多，本人选用了当前比较流行的编程技术VB6作为主要实现手段。Visual Basic 6.0是用来创建高性能的企业应用程序及基于Web的应用程序的最有效工具。集成进来的可视化数据库工具能大大提高生产效率，而自然代码编译则能生成运行速度更快的应用程

13、序。使用集成在Visual Basic 6.0里的可视化数据库工具和新的数据环境设计Access数据库，创建可重用的数据查询语句、过程，这一切都不必离开Visual Basic环境。本系统选用的数据库语言介绍如下：2.1 Visual Basic简介2.1.1 Visual Basic概述Visual Basic中的“Visual”是指开发图形用户界面的方法。Visual的意思是“可视的”，也就是直观的编程方法。在VB中引入了控件的概念，各种各样的按钮、文本框、选择框等。VB把这些控件模式化，并且每个控件都由若干属性来控制其外观、工作方法。这样，采用Visual方法无需编写大量代码去描述界面元

14、素的外观和位置，而只要把预先建立的控件加到屏幕上即可。就像使用画图之类的绘图程序，通过选择画图工具来画图一样。“Basic”是一种在计算机技术发展史上应用得最为广泛的语言。Visual Basic在原有BASIC语言的基础上进一步发展，至今包含了数百条语句、函数及关键词，其中很多和Windows GUI有直接关系。专业人员可以用VB实现其他任何Windows编程语言功能，而初学者只要掌握几个关键词就可以建立实用的应用程序。2.1.2 Visual Basic的特点Visual Basic是从BASIC发展而来的，对于开发Windows应用程序而言，VB是目前所有开发语言中最简单、最容易使用的语

15、言。总的来说，Visual Basic有以下主要特点：1. 可视化编程传统的编程方法都是通过编写程序代码来设计用户界面，在设计过程中不能看到界面的实际显示效果，必须在编译后运行程序才能观察。一旦对界面的效果不满意，还需要返回到程序中去修改。有时这种编程-编译-修改的操作要反复多次，大大影响了软件的开发效率。而Visual Basic提供了可视化设计工具，可以把Windows界面设计的复杂性“封装”起来，开发人员不再为界面设计而编写大量程序代码。只需按照设计的要求屏幕布局，用系统提供的工具在屏幕上画出各种图形对象，并设置这些图形对象的属性。Visual Basic可以自动产生界面设计代码，开发设

16、计人员只需编写实现程序功能的那部分代码，从而大大的提高程序设计的效率。2. 事件驱动的编程机制VB开发的应用程序时，代码不是按预定的路径执行的，而是在响应不同的事件时执行不同的代码片段。在使用Visual Basic设计应用程序时，不需要建立具有明显开始和结束的程序。事件可以由用户的操作触发，例如单击鼠标、键盘输入等事件，也可由来自操作系统或其它应用程序的消息触发。这些事件的顺序决定了代码执行的顺序。概括地说事件驱动是指应用程序没有预定的执行路径，而是由程序运行过程中的事件决定。3. 面向对象的设计方法面向对象的设计方法应该从应用领域内的问题着手，以直观自然的方式描述客观世界的实体。Visua

17、l Basic作为一种面向对象的编程方法,把程序和数据封装起来作为一个对象,并为每个对象赋予相应的属性。在设计对象时,不必编写建立和描述每个对象的程序代码,而是用工具画在界面上,由Visual Basic自动生成对象的程序代码并封装起来。4. 开放的数据库功能与网络支持 Visual Basic具有很强的数据库管理功能，不仅可以管理MS Access格式的数据库，还能访问其他如FoxPro等格式的数据库。同时VB还提供了开放式数据库连接功能，可以通过直接访问或建立连接的方式使用并操作后台大型网络数据库，如SQL Server等。在应用程序中，可以使用结构化查询语言直接访问Server上的数据库

18、，并提供简单的面向对象的库操作命令、多用户数据库的加锁机制和网络数据库的编程技术，为单机上运行的数据库提供SQL网络接口，以便在分布式环境中快速而有效地实现客户服务器方案。 5. 结构化的设计语言Visual Basic是在BASIC语言基础上发展起来的，具有高级程序设计语言的语句结构，接近与自然语言和人类的逻辑思维方式，其语句简单易懂。其编辑器支持彩色代码，可自动进行语法错误检查，具有功能强且使用灵活的调试器和编译器。在设计Visual Basic程序的过程中，随时可以运行程序，而在整个应用程序设计好之后，可以编译生成.exe可执行文件，可执行文件可脱离Visual Basic环境直接在Wi

19、ndows环境下运行。6. 充分利用Windows资源Visual Basic提供的动态数据交换编程技术，可以在应用程序中实现与其他Windows应用程序建立动态数据交换、在不同的应用程序之间进行通信。对象链接与嵌入技术将程序都看作一个对象，把不同的对象链接起来，嵌入到某应用程序中，从而可以得到具有声音、影像、图像、动画。文字各种信息的集合式文件。动态链接库将CC+或汇编语言编写的程序加入到Visual Basic 的应用程序中，或是调用Windows应用程序接口函数，实现SDK所具有的功能。7. 交互式VB的另一个显著特点是交互式，所谓交互式是指在编写代码过程中出现语法错误时系统会立即获得通

20、知，并在开发过程中可运行程序进2.2 Microsoft Access 2003简介概述2.2.1 Access 2003概述Access 2003是Microsoft公司推出的Office 2003 办公软件中的组件，是数据库程序。利用它可以实现：1. 存储几乎无限多的信息；2. 按照用户的工作方式组织信息；3. 根据指定的选择标准检索信息；4. 创建窗体，使用户输入信息更方便；5. 生成可以合并数据、文本、图片和其他对象的实用直观的报告；6. 方便地通过Web共享信息。如果将地址信息保存在Access数据库中，可以给每条信息分配一个唯一的标识号，以便在每次需要使用或更改该信息时，只引用该标

21、识号即可，这样就做到了每条信息只需输入一次。Access数据库中最基本的组件是“表”，在表中信息排成若干记录（行），每条记录包括多个字段（列）。除了表之外，Access数据库中还包括查询、窗体、报表、数据访问页和模块等组件，功能强大而且使用方便。2.2.2 Microsoft Access 特点Access是一个基于关系型数据库的中小型数据库应用系统，虽然它的“出道”时间比较晚，但由于它的强大的功能和出众的易用性，很快得到了广大数据库应用程序员们的青睐，从而成为当今最通用的数据库软件。作为一种出色的数据库软件，Access可以实现以下的功能：1. 数据库中包含多个表，每个表可以分别表示和存储不

22、同类型的信息。2. 通过建立各个表之间的关联，从而将存储在不同表中的相关数据有机的结合起来。3. 通过创建查询，用户可以在一个或多个数据表中检索、更新和删除记录，并且可以对数据库中的数据执行各种计算。4. 通过创建联机窗体，用户可以直接对数据库中的记录执行查看和编辑操作。5. 通过创建报表，用户可以将数据以特定的方式加以组织，以达到分析和打印的目的6. 利用宏或Visual Basic for Application 语言将各种数据库对象组织起来，形成一个数据库应用系统。2.2.3 Microsoft Access的优点Microsoft Access 2003 主要有以下优点：1. 完善地管

23、理各种数据库对象，提供了很高的系统安全性。2. 通过向导提供的一系列的可视化过程，用户可以方便地生成和操作数据库对象。3. 通过导入和导出操作，用户可以和不同类型的数据库实现数据共享，简便而且快捷。4. 实现与Internet的连接，通过Web检索和发布数据。5. 可以与Office套件中的其他组件，例如Word、Excel等集成。6. 利用OLE特性，在窗体和报表中插入对象。7. 通过宏指令或VBA语句，可以将窗体和报表连接起来，快速地编制数据库应用程序。8.可以根据个人的要求来定制Access数据库环境。3 系统的需求分析3.1 可行性分析1. 技术可行性以Windows XP为操作系统，

24、采用Visual Basics6.0为开发工具，运用ACCESS数据库技术，设计与开发学生信息管理系统。Visual Basics语言设计应用程序时有可视化设计和事件驱动编程两个特点。ACCESS提供了表、查询、窗体、报表、页、宏、模块7种来建立数据库系统的对象，又提供了多种向导、生成器、模板，把数据存储、数据查询、界面设计、报表生成等操作规范化，为建立功能完善的数据库管理系统提供了方便，也使得普通用户不必编写代码就可以完成大部分数据管理的任务。因此，开发本系统在技术上是可行的。2. 经济可行性一方面，系统中有友好的人机界面和强劲的功能支持，使使用者的工作效率进一步提高，从而节省人力、物力，进

25、而提高经济效益；另一方面，系统的开发成本低，在现有的PC机上即可提供该系统开发工作需要的所有硬件设备环境。3. 操作可行性在操作上是对Windows操作系统的引用，简单易操作。当用户使用系统时，通过输入正确的用户名和密码进入系统，就可以进行数据库的维护操作和运用。当用户查询信息时，只需在相应位置输入要查询的内容，即可查到学生信息。3.2 系统所需实现的功能本系统为了实现学校学生、离校学生各项档案资源的查询、统计、添加、删除、维护与管理，方便用户的管理与需求。将学生信息管理系统分为：系统设置，学生班级管理，学生课程管理，学生成绩管理，学生档案管理和学生交费管理等几个功能模块。它主要是对学生的一些

26、信息（包括 基本信息）进行详细的管理，并且对班级、科目和教师信息进行简单管理，最关键的是这些管理功能都必须能够在计算机上实现。具体功能可以从两个方面来介绍：3.2.1 管理员实现的功能1. 系统设置的功能 (1) 用户的管理:包括增加、删除、浏览用户以及修改登陆密码(2) 实现数据库的备份(3) 退出系统2. 班级的管理功能(1) 班级增加：实现对班级基本信息的增加、修改和删除(2) 班级查询：实现对班级基本信息的查询3. 学生档案的管理功能由管理员进行档案收集，经过对档案资料的处理，更新学生信息管理系统中的相关信息。(1) 学生档案增加：实现对档案基本信息的增加、修改和删除(2) 档案查询：

27、实现对档案基本信息的查询4. 课程的管理功能(1) 基本课程设置：实现对课程基本信息的增加、修改和删除(2) 学生课程查询：实现对课程基本信息的查询5. 学生成绩的管理功能(1) 成绩增加：实现对成绩基本信息的增加、修改和删除(2) 成绩查询：实现对成绩基本信息的查询(3) 违规学生管理：实现对考试违规学生信息的增加、修改和删除6. 学生交费的管理功能(1) 学生交费增加：学生交费的信息增加、修改和删除(2) 学生交费的查询7. 打印统计档案信息功能对学生各类信息报表进行打印3.2.2 普通用户（学生）实现的功能1. 在校学生可以通过自己的学号和密码登陆系统对自己的个人信息（包括 个人的档案信

28、息、成绩信息等）进行查询2. 对用户密码的管理3.3 系统实现的功能分析根据该信息管理系统的特点和其功能需求，系统具体功能可以从两个方面来简单介绍：1. 对系统设置的功能：实现权限的管理和添加以及数据的备份2. 对班级的管理功能：实现对班级基本信息的增加；实现对班级基本信息的查询3. 对学生档案的管理功能和更新功能：由管理员进行档案收集，经过对档案资料的处理，更新学生信息管理系统中的相关信息（包括学生基本信息和学生成绩信息）。实现对档案基本信息的增加以及实现对档案基本信息的查询4. 对课程的管理功能：实现对课程基本信息的增加；实现对课程基本信息的查询5. 对学生成绩的管理功能:实现对成绩基本信

29、息的增加；实现对成绩基本信息的查询；实现对考试违规学生的管理6. 对学生交费的管理功能:学生交费的增加;学生交费的查询7. 打印统计档案信息功能3.4 数据流图在设计数据库系统时，应该首先了解用户的各个方面的需求，包括现有的以及将来可能增加的。数据流图如图3-1：图3-1 数据流图3.5 学生信息管理系统E-R图 1. 班级实体具有年级、专业、人数、辅导员等属性，用E-R图表示班级实体及属性，如图3-2：图3-2 班级实体及属性2. 档案实体具有学号、姓名、年级、专业、性别、出生年月、民族、籍贯、政治面貌、家庭住址、邮政编码、联系电话、入学时间等属性，用E-R图表示，如图3-3： 图3-3 档

30、案实体及属性3. 课程实体具有专业、年级、学期、课程名称、教材、任课老师、课时、上课地点、课程性质、考试性质等属性，如图3-4： 图3-4 课程实体及属性4. 成绩具有学号、姓名、年级、专业、学期、考试时间、考试科目、考试地点、课程性质、科目分数等属性，如图3-5：图3-5 成绩实体及属性5. 交费具有年级、学号、姓名、专业、学期、日期、应交费用、实际交费、本次欠费等属性，如图3-6：图3-6 交费实体及属性6. 考试违规具有学号、姓名、年级、专业、学期、考试时间、考试科目、考试地点、违纪类型等属性，如图3-7： 图3-7 考试违规实体及属性经过分析，该系统实体之间的ER图如图3-8：图3-8

31、 学生信息管理系统E-R图4 系统设计4.1 学生信息管理系统流程图1. 班级管理流程图如图4-1：图4-1 班级管理流程图2. 档案管理流程图如图4-2：图4-2 档案管理流程图3. 课程管理流程图如图4-3：图4-3 课程管理流程图4. 成绩管理流程图如图4-4：图4-4 成绩管理流程图5. 交费管理流程图如图4-5：图4-5 交费管理流程图4.2 数据库表数据库设计的好坏，直接关系到整个程序的好坏，数据库的结构是否合理，能不能满足现有的要求，今后系统的升级过程中是不是方便，能不能把数据库的结构直接移植到其它的数据库中使用，比如把ACCESS数据库的结构直接导入SQL Server中能不能

32、直接使用，是不是还要修改程序等等。这些都是非常重要的，本系统的数据库设计比较合理，而不是非常合理，因为每一个程序都可能有错误，有一位程序设计大师说过一句话，没有BUG的程序，那不叫程序！下面列出数据库中的每一个表，包括表中的字段的含意。根据该学生信息管理系统的特点，本系统采用了ACCESS数据库，数据库名称为信息,数据库表的结构如下：1. 班级表：该表存储了学生的年级、专业、人数、辅导员和备注信息，表的结构如表4-1所示。表4-1 班级表字段名年级专业人数辅导员备注数据类型文本文本文本文本文本数据长度5050505050值 约 束无无无无无2. 成绩表：该表存储了学生的学号、姓名、年级、专业、

33、学期、考试时间、考试科目、考试地点、课程性质、科目分数、违纪类型和备注信息。该表的结构如表4-2所示。表4-2 成绩表字段名学号姓名专业学期考试时间考试科目考试地点课程性质科目分数违纪类型备注数据类型文本文本文本日期/时间日期/时间文本文本文本数字文本文本数据长度505050无无505050单精度型5050值 约 束无无无无无无无无无无无3. 交费表：该表存储了学生的年级、学号、姓名、专业、学期、日期、本学期应交学费、实际交费和本次欠费信息。该表的结构如表4-3所示。表4-3 交费表字段名年级学号姓名专业学期日期本学期应交学费实际交费本次欠费数据类型文本文本文本文本日期/时间日期/时间文本文本

34、文本数据长度50505050无无505050值 约 束无无无无无无无无无4. 课程表：该表存储了学生的专业、年级、学期、课程名称、教材、任课老师、课时、上课地点、课程性质和考试性质信息。该表的结构如表4-4所示。表4-4 课程表字段名专业年级学期课程名称教材任课老师课时上课地点课程性质考试性质数据类型文本文本日期/时间文本文本文本数字文本文本文本数据长度5050无505050整型505050值 约 束无无无无无无无无无无5. 学生档案表：该表存储了学生的学号、姓名、年级、专业、性别、出生年月、民族、籍贯、政治面貌、家庭住址、邮政编码、联系电话、入学时间和备注信息。该表的结构如表4-5所示。表4

35、-5 学生档案表字段名学号姓名年级专业性别出生年月民族籍贯政治面貌家庭住址邮政编码联系电话入学时间备注数据类型文本文本文本文本文本日期/时间文本文本文本文本文本文本日期/时间文本数据长度5050505050无505050505050无50值 约 束无无无无无无无无无无无无无无6. 用户资料表：该表存储了用户名、密码和身份信息，该表的结构如表4-6所示。表4-6 用户资料表字段名用户名密码身份数据类型文本文本文本数据长度505050值 约 束无无无4.3 安全因素数据的安全，避免使用不当或计算机病毒攻击，应有数据备份功能，数据备份是把数据库保存在硬盘上，一旦系统破坏或数据丢失，可以及时地从硬盘中

36、读取数据。由于该系统取代了原来的档案管理，数据库中的数据是较为重要的，不是专职人员不能查询、更改，通过用户标识和口令防止非法用户操作，这里有两种用户，管理员可以操作所有提供的功能模块，而学生用户只能操纵有限的功能模块，即查询成绩模块，和帮助模块下的关于模块。管理员为了加强管理，防止数据的非法操作，应单独使用一台机器操作该软件。4.4 系统的功能模块分析学生信息管理的查询模块是各个高校日常信息管理系统重要模块之一，其查询效率的高低直接影响着整个学校的管理工作。学生信息的查询对学校加强学生管理有着极其重要的作用。由于各个大学都在持续扩招，学生的数量日益庞大，传统的手工管理不仅工作量大，而且容易出现

37、问题，其次对于学生信息的管理和查找也不是很方便。根据学校学生管理信息系统的特点，划分系统的总功能模块，如图4-6： 学生信息管理系统登录系统设置班级管理档案管理课程管理成绩管理交费管理打印统计帮助图4-6 学生信息管理系统总功能模块4.4.1 系统设置模块系统登陆包括：登陆身份，用户名，密码。用户可以选择不同身份登陆，可以实现不同的功能。譬如以学生身份登陆，就只能查询成绩，而以管理员身份登陆就可以实现本系统的全部功能，包括档案信息的增加、删除和修改；学生成绩的增加、查询和删除等。还可以增加用户、删除用户和修改密码等。以上模块通过VB编程和Access数据库相连，实现上述功能。系统设置的模块图如

38、图4-7：增加用户修改密码用户管理备份数据库重新登录退出系统浏览用户删除用户系统设置图4-7 系统设置模块图4.4.2 班级管理模块本模块的主要功能就是对班级信息进行管理，包括的功能有：对现有的班级信息进行查询、信息的删除和信息的增加。班级管理模块图如图4-8：增加班级查询班级班级管理图4-8 班级管理模块图4.4.3 档案管理模块本模块的主要功能就是对档案信息进行管理，包括的功能有：对现有的档案信息进行查询、信息的删除和信息的增加。档案管理模块图如图4-9：增加档案查询档案档案管理图4-9 档案管理模块图4.4.4 课程管理模块本模块的主要功能就是对课程信息进行管理，包括的功能有：对现有的课

39、程信息进行查询、信息的删除和信息的增加。课程管理模块图如图4-10：课程设置课程查询课程管理图4-10 课程管理模块图4.4.5 交费管理模块本模块的主要功能就是对交费信息进行管理，包括的功能有：对现有的学生交费信息进行查询、信息的删除和信息的增加。交费管理模块图如图4-11：增加交费交费查询交费管理图4-11 交费管理模块图4.4.6 成绩管理模块本模块的主要功能就是对学生成绩信息进行管理，包括的功能有：对现有的班级的成绩进行查询、删除和增加。成绩管理模块图如图4-12：成绩增加成绩查询成绩管理考生考试违规管理图4-12 成绩管理模块图4.4.7 统计打印模块本模块的主要功能就是对各个信息进

40、行统计打印，包括的功能有：对班级、档案、课程、成绩、交费等信息进行统计打印。统计打印模块图如图4-13：统计打印档案统计打印课程统计打印成绩统计打印交费统计打印班级统计打印图4-13 统计打印模块图5 系统主要模块的实现应用程序是用VB开发的，界面设计的简单明了。根据需求分析和功能设计，系统应用程序分为系统设置，学生班级管理，学生课程管理，学生成绩管理，学生档案管理和学生交费管理等几个功能模块。由于模块较多下面主要说明系统登录，班级管理几个主要模块的设计与实现。5.1 登录模块的实现登录界面是用户最先看到的系统的界面，所以直观上给用户的感觉很重要，所以做一个好的界面，提高软件的亲和力。如图5-

41、1：图5-1 登录界面根据登录模块的功能，管理员和普通用户界面不一起。管理员有所有的权限，普通用户只有检索和改本人的密码权。如果三次登录都出错，系统自动退出。三次登录都出错事件的处理代码如下：Private Sub Command1_Click()Dim sqldl As StringDim sf As StringIf zong = 3 Then '若用户输入的次数超过三次，则自动退出 Unload Me Exit SubEnd If 管理员和普通用户权限实现代码如下：Frm_Main.ShowIf sf = "管理员" Then Frm_Main.Mun_Liu

42、lanUser.Enabled = True admin = 1Else Frm_Main.Mun_LiulanUser.Enabled = False Frm_Main.Mun_DelUser.Enabled = False Frm_Main.Mun_AddUser.Enabled = False Frm_Main.Mun_AddClass.Enabled = False Frm_Main.Mun_AddDangA.Enabled = False Frm_Main.Mun_ShezGrean.Enabled = False Frm_Main.Mun_AddChengJ.Enabled = F

43、alse Frm_Main.Mun_ChengJWeiG.Enabled = False Frm_Main.Mun_AddJiaoF.Enabled = False Frm_Main.Mun_ClassCount.Enabled = False Frm_Main.Mun_DandACount.Enabled = False Frm_Main.Mun_GreanCount.Enabled = False Frm_Main.Mun_ChengJCount.Enabled = False Frm_Main.Mun_JiaoFCount.Enabled = False admin = 0End If&

44、#39;If sf = "管理员" Then 'admin = 1 'Else 'admin = 0 'End IfEnd Sub5.2 系统主界面的实现登录系统后进入主界面如图4-2。在系统功能设计中，系统维护功能主要有系统设置，班级管理，档案管理，课程管理，成绩管理，交费管理，打印等几方面，如图4-3所示。管理员用户和密码都为admin。只有管理员用户才有权限进入本界面，添加、删除用户。用户只能修改密码。系统主界面如图5-2：图5-2 系统主界面系统界面实现的代码如下：Private Sub mnubak_Click()bak.Show

45、vbModalEnd SubPrivate Sub Mun_About_Click() frm_About.Show 1End SubPrivate Sub Mun_AddChengJ_Click() Frm_AddChengJ.Show 1End SubPrivate Sub Mun_AddClass_Click() Frm_AddClass.Show 1End SubPrivate Sub Mun_AddDangA_Click() Frm_AddDangA.Show 1End SubPrivate Sub Mun_AddJiaoF_Click() Frm_AddStruJF.Show 1E

46、nd SubPrivate Sub Mun_AddUser_Click() Frm_AddUser.Show 1End SubPrivate Sub Mun_ChengJCount_Click() Frm_CountChengJ.Show 1End SubPrivate Sub Mun_ChengJWeiG_Click() Frm_StruWeiG.Show 1End SubPrivate Sub Mun_ChenJCount_Click() Frm_CountChengJ.Show 1End SubPrivate Sub Mun_ClassCount_Click() Frm_CountCla

47、ss.Show 1End SubPrivate Sub Mun_Czsm_Click() frm_ShuoMing.Show 1End SubPrivate Sub Mun_DandACount_Click() Frm_CountDangA.Show 1End SubPrivate Sub Mun_DelUser_Click() Frm_DelUser.Show 1End SubPrivate Sub Mun_Exit_Click()Dim anw As Integer anw = MsgBox("确定要退出系统吗？", vbYesNo, "提示！")I

48、f anw = 6 Then Unload MeEnd IfEnd SubPrivate Sub Mun_FindChengJ_Click() Frm_FindChengJ.Show 1End SubPrivate Sub Mun_FindClass_Click() Frm_FindClass.Show 1End SubPrivate Sub Mun_FindDangA_Click() Frm_FindDangA.Show 1End SubPrivate Sub Mun_FindGrean_Click() Frm_FindGrean.Show 1End SubPrivate Sub Mun_F

49、indJiaoF_Click() Frm_FindStruJF.Show 1End SubPrivate Sub Mun_GreanCount_Click() Frm_CountGrean.Show 1End SubPrivate Sub Mun_JiaoFCount_Click() Frm_CountJiaoF.Show 1End SubPrivate Sub Mun_LiulanUser_Click() Frm_LiulanUser.Show 1End SubPrivate Sub Mun_Possword_Click() Frm_UpdatePass.Show 1End SubPriva

50、te Sub Mun_ShezGrean_Click() Frm_SheZGrean.Show 1End SubPrivate Sub Mun_UpLogin_Click()If MsgBox("若重新登录，所有窗体都将关闭！是否重新登录？", vbQuestion + vbYesNo + vbDefaultButton2, "重新登录") = vbYes Then Unload Me Frm_Login.ShowEnd IfEnd Sub5.3 班级管理的实现对班级的管理功能主要实现对班级基本信息的增加删除和对班级基本信息的查询。班级增加界面如图5-3

51、： 图 5-3 增加班级界面增加按钮事件处理代码如下：Private Sub Command1_Click()Dim NianJi, ZhuanYe, RenShu, FuDaoYuan, BeiZu As StringNianJi = Text1.TextZhuanYe = Text2.TextRenShu = Text3.TextFuDaoYuan = Text4.TextBeiZu = Text5.TextCommand1.Enabled = TrueIf Trim(NianJi) = "" Or Trim(ZhuanYe) = "" Or Tri

52、m(RenShu) = "" Or Trim(FuDaoYuan) = "" Then MsgBox "班级资料不能为空,请填写完整！" Exit SubEnd IfmyCon.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=信息.mdb;"myRs.Open "select * from 班级表 where 年级='" & Trim(Text1.Text) & "' and 专业='&quo

53、t; & Trim(Text2.Text) & "' ", myConIf myRs.EOF = False Then MsgBox "该班级已经存在，请重新输入！" myRs.Close myCon.Close Text1.SetFocus Exit SubEnd IfmyRs.ClosemyRs.Open "班级表", myCon, 3, 2myRs.AddNew myRs.Fields("年级") = Text1.Text myRs.Fields("专业") = T

54、ext2.Text myRs.Fields("人数") = Text3.Text myRs.Fields("辅导员") = Text4.Text If Text5.Text = "" Then myRs.Fields("备注") = " " Else myRs.Fields("备注") = Text5.Text End IfmyRs.UpdatemyRs.ClosemyCon.CloseMsgBox "添加成功!"Adodc1.RecordSource =

55、 "select * from 班级表 order by 年级"Frm_AddClass.Adodc1.RefreshFrm_AddClass.DataGrid1.Refresh班级查询界面如图5-13：图 5-13 班级查询界面查询班级功能实现代码如下：Private Sub Command1_Click()Dim a As StringDim BJCX1 As StringDim BJCX2 As Stringa = Trim(Combo2)Select Case a Case "=" BJCX1 = "" & Combo

56、1.Text & " " & Combo2.Text & " '" & Trim(Text1) & "'" Case "like" BJCX1 = "Instr(1," & Combo1.Text & ",'" & Trim(Text1.Text) & "')<>0 "End Selecta = Trim(Combo4)Select Case a Case "=" BJCX2 = "&qu