计算机党务管理系统毕业论文.doc

摘 要计算机系党务管理信息系统是学校党员管理中的一个重要内容，随着时代的进步，学校也逐渐变得庞大起来。如何管理好学校内部党务党务信息，成为学校管理中的一个大问题。在这种情况下，开发一个小型计算机系党务管理信息系统就显得非常必要。本计算机系党务管理信息系统是是把学校的党务党务信息和教师务信息进行信息化管理，通过它的管理，可以将信息直观的提供给学校管理人员，加强对学校内容的优化分配，充分发挥人的作用，提高学校整体工作效率，创造价值。本系统结合学校实际的党务党务制度，经过实际的需求分析，采用功能强大的Visual Basic6.0作为开发工具而开发出来的计算机系党务管理信息系统。关键词: 党务管理,数据库,面向对象AbstractManagement Information Systems Department of Computer party is an important part in the management of the school. With the development of society, business school becomes larger and larger. How to deal with the information of the student party has become a serious problem for school management. Under this condition, it is necessary to develop a management system of files. This system is discrete school of classified information to be grouped in the handling, through its management, Categories can be processed information, and visual management staff to strengthen the school employing the optimal allocation, giving full play to human, raising the overall efficiency, the creation of value. This system combines school party system, through real demand analysis; adopt Visual Basic 6.0 unit edition personnel that developing instrument develops pay attention to the system.Keywords : party Management; Database; Object-oriented 目 录摘要1Abstract21 系统概述31.1 管理系统概述31.2 计算机系党务管理信息系统现状31.3 需求分析41.3.1 可行性分析41.3.2 功能需求分析52 系统分析62.1 业务流程分析62.2 数据字典62.3 开发环境72.3.1 开发工具的选择72.3.2 数据库的选择82.3.3 开发与运行环境83 系统设计103.1 功能设计103.2 模块结构设计103.3 数据库设计113.3.1 概念结构设计113.3.2 逻辑结构设计133.3.3 表结构设计134 系统实现154.1 界面实现154.1.1 登录界面实现154.1.2 主界面实现164.1.3 系统维护界面实现174.1.4 组织和党员信息界面实现194.1.5 申报审批界面实现214.1.6 查询界面实现234.1.7 关于帮助界面实现244.2 系统安全性245 系统测试25结论26致谢27参考文献28- 33 -第1 章 系统概述1.1 管理系统概述管理信息系统就是我们常说的MIS（Management Information System），在强调管理，强调信息的现代社会中它越来越得到普及。MIS是一门新的学科，它跨越了若干个领域，比如管理科学、系统科学、运筹学、统计学以及计算机科学。在这些学科的基础上，形成信息收集和加工的方法，从而形成一个纵横交织的系统。管理信息系统在企业中的应用存在三个要素，这就是人、计算机和数据。人是指企业领导者、管理人员、技术人员以及MIS建设的领导机构和实施机构，他们在系统中起主导作用。MIS是一项系统工程，不是只靠一些计算机开发人员就可以完成的，必须有企业管理人员，尤其是企业领导的积极参与。计算机技术是MIS得以实施的主要技术。在这些技术中，软件开发是MIS开发的重点。第三个因素也不能忽视，企业的管理数据是MIS正常运行的基础。广义地说，各项管理制度是MIS建设成功的基础。20世纪，随着全球经济的蓬勃发展，众多经济学家纷纷提出了新的管理理论。20世纪50年代，西蒙提出管理依赖于信息和决策的思想。同时期的维纳发表了控制论，他认为管理是一个控制过程。1958年，盖尔写到：“管理将以较低的成本得到及时准确的信息，做到较好的控制。”这个时期，计算机开始用于会计工作，出现数据处理一词。1970年，Walter T.Kennevan给刚刚出现的管理信息系统一词下了一个定义：“以口头或书面的形式，在合适的时间向经理、职员以及外界人员提供过去的、现在的、预测未来的有关企业内部及其环境的信息，以帮助他们进行决策。”在这个定义里强调了用信息支持决策，但并没有强调应用模型，没有提到计算机的应用。1985年，管理信息系统的创始人明尼苏达大学的管理学教授Gordon B.Davis给了管理信息系统一个较完整的定义，即“管理信息系统是一个利用计算机软硬件资源，手工作业，分析、计划、控制和决策模型以及数据库的人机系统。它能提供信息支持企业或组织的运行、管理和决策功能。”这个定义全面地说明了管理信息系统的目标、功能和组成，而且反映了管理信息系统在当时达到的水平。1.2 计算机系党务管理信息系统现状随着社会经济的迅速发展和科学技术的全面进步，计算机事业的飞速发展，作为今天使用最广的现代化工具已深入到各个领域，并且正在成为未来社会信息社会的重要支柱。所以，将计算机这一信息处理工具应用于党务档案的日常管理已是势必所然，而且这也将为党务管理带来前所未有的改变，它可以带来意想不到的效益，同时也会为学校的飞速发展提供无限潜力。采用计算机管理信息系统已成为管理科学化和现代化的重要标志，它给学校管理带来了明显的经济效益和社会效益。主要体现在：在传统管理过程中，表单填写与查询管理都非常的耗费人力物力，同时由于采用手工操作，不可避免造成一些的错误，这种管理方式还存在着许多缺点，如效率低、保密性差且较为烦琐。而现在许多学校都采用计算机来管理信息，避免了手工操作的不足。极大提高了工作人员的工作效率，大大减少了以往入出记录和流程繁琐杂乱，周期长的弊端。基于党务管理的全面自动化，可以减少学校管理中的漏洞，可以节约不少管理开支，增加学校收入。党务信息管理的操作自动化和信息电子化，全面提高了党务档案的管理水平。随着我国改革开放的不断深入，经济飞速的发展，学校要想生存发展，要想在激烈的市场竞争中立于不败之地，没有现代化的管理是万万不行的，党务档案服务管理的全面自动化、信息化则是其中极其重要的部分。为了加快党务信息管理自动化的步伐，提高学校的处理效率，建立党务档案服务管理系统已变得十分必要。本系统可以避免单位管理的随意性，使得管理工作规范化、系统化、程序化，提高信息处理的速度和准确性，对于减轻工作人员的劳动量、提高劳动热情和服务质量，具有重要的现实意义。1.3 需求分析1.3.1 可行性分析技术可行性数据库技术在计算机软件邻域研究中一直是非常重要的主题，产生于60年代，40多年来数据库技术得到了迅速发展，并已形成较为完整的理论体系和一大批实用系统。面向对象是一种新兴的程序设计方法,或者是一种新的程序设计规范(paradigm),其基本思想是使用对象、类、继承、封装、消息等基本概念来进行程序设计。许多程序开发工具，如VB、Java等等，都支持面向对象的程序开发。系统的开发平台，我们选择了当前流行的Windows XP操作系统，应用程序开发采用Microsoft公司的面向对象程序开发工具Visual Basic 6.0。VB6.0是全新的可视化编程环境，为我们提供了一种方便、快捷的windows应用程序开发工具。与普通的数据库系统相比，用Visual Basic作为数据库开发平台有简单、灵活、可扩充等特点，非常适合初学者快速掌握并用来开发数据库管理信息系统。数据库选择ACCESS 2000。ACCESS是一个桌面电脑的数据库管理系统。它是一个功能强大的数据库管理系统和MIS系统开发工具，具有界面友好、易学易用、开发简单、接口灵活等特点。当前管理信息系统的开发，大都时基于数据库技术和面向对象软件开发技术。这些技术目前已经成熟，被广泛应用与各个领域。所以，党务信息管理信息系统的开发，在技术上是可行的。经济可行性经济可行性研究是对系统投入使用后带来的经济效益进行估计，也包括对系统的投资预算。即要解决两个问题，资金可得性和经济合理性。当前办公用PC机的普及使得开发和应用管理信息系统在经济上成为可能。另一方面, 就学校自身来说,它也是需要这样一个软件的。我们在计算机还没有普及之前,信息都必须通过在纸上填写来实现, 这样既浪费时间又容易出错。随着信息时代的来临, 我们的各项工作都要讲求效率, 党务信息管理也不例外, 这就为作者的软件提供了使用群体。所以，本系统在经济上是可行的。综上所述，开发计算机系党务管理信息系统是可行的。1.3.2 功能需求分析需求分析是软件定义时期的最后一个阶段，它必须准确的回答系统必须做什么的问题？虽然在可行性研究阶段已经大概了解了系统需要达到的要求，但可行性研究的目的是在最短的时间内用最少的成本确定是否存在可行的解法。所以它忽略了一些细节的问题。但是需求分析也不是确定系统怎样完成它的工作，而仅仅是确定系统必须完成哪些工作，也就是对目标系统提出完整、准确、清晰、具体的要求。拟定需求计划，需要彻底而系统地分析各种影响因素和消费特点，并且建立相关的、科学的、合理的模型。计算机系党务管理信息系统的总目标：在数据库和先进的开发平台上，利用现有资源，开发一个体系结构完善的、易扩充的、易维护的、具有良好人机交互界面的管理系统，实现党务档案服务的计算机管理，提供完善的功能，为操作人员提供便利的工作方式。通过调查，要求系统需要实现以下一些基本功能：本系统主要包括系统登陆、基本信息、党务管理、党员发展、党员信息管理、查询管理和用户管理共7个模块。2 系统分析系统分析是软件生命周期的一个重要阶段，它根本的任务是确定为了满足用户的需要必须做什么。具体地说，应该确定系统必须具有的功能和性能，系统要求的运行环境，并且预测系统发展的前景，必须仔细分析系统中的数据，既要分析系统中的数据流。又要分析长期使用的数据存储，通过分析应该得出用业务流图、数据字典，可行性分析等内容为系统的设计奠定基础。2.1 业务流程分析计算机系党务管理信息系统的业务主要是学校的党务档案和支部等信息进行管理。学校各个部门把党务档案信息和支部信息输入系统，操作人员根据党务档案信息和支部进行分析得出。党务管理的特点是信息处理量比较大，所管理的党务档案信息包括全部学校的党务档案信息，而且信息的单据的发生量特别大，关联信息多，查询和统计的方式各不相同。因此在管理上实现起来有一定困难。在管理的过程中经常出现住处的重复传递：单据、报表的种类繁多，各个部门管理规格不统一等问题。本系统在设计过程中，为了克服这些困难，满足计算机管理的需要，采取了下面的一些原则：(1)程序代码标准化，软件统一化，确保软件的可维护性和实用性。(2)删除不必要的管理冗余，实现管理规范化、科学化。(3)统一各种原始单据的格式，统一账目和报表的格式。(4)界面友好、简单化，做到实用、方便，尽量满足学校的需要。下面进行计算机系党务管理信息系统业务流程图的设计。操作员或管理人员进入本系统后，一系列的操作过程设计如图2-1所示。操作人 员教师党务录入查询学生党务申报审批录入录入查询导出结果查询结果查询结果统计图2-1 业务流程2.2 数据字典数据字典是关于数据的信息的集合，也就是对数据流图中包含的所有元素的定义的集合。任何字典最主要的用途都是供人查阅对不了解的条目的解释。数据字典的作用是在软件分析和设计的过程中给人提供关于数据的描述信息。数据流图和数据字典共同构成系统的逻辑模型，没有数据字典，数据流图就不严格，然而没有数据流图数据字典也难于发挥作用。只有数据流图和对数据流图的精确定义放在一起，才能共同构成系统的规格说明。系统开发时，常用卡片的形式书写保存描述一个数据元素。下面给出本系统的主要数据元素的数据字典索引卡片：名字：学号列名：学号描述：唯一地标识学生信息的一个特定关键域定义：学号20字符20位置：党务信息 图2-2 学号 名字：党务类型描述：唯一地标识党务类型的一个特定关键域定义：PID20字符20位置： 党务信息 图2-3 党务类型名字：支部名称描述：标识党务支部的一个特定关键域定义：支部名称20字符20位置：支部信息 图2-4支部名称名字：用户名称列名：用户名称描述：用户指定条件下的系统用户口令表定义：用户20字符20位置：用户信息表 图2-5 用户名称2.3 开发环境2.3.1 开发工具的选择目前，在市场上这些众多的程序开发工具中，有些强调程序语言的弹性与执行效率；有些则偏重于可视化程序开发工具所带来的便利性与效率的提高，各有各的优点和特色，也满足了不同用户的需求。然而，语言的弹性和工具的便利性是密不可分的，只有便利的工具，却没有弹性的语言作支持，许多特殊化的处理动作必需要耗费数倍的工夫来处理，使得原来所标榜的效率提高的优点失去了作用；相反，如果只强调程序语言的弹性，却没有便利的工具作配合，会使一些即使非常简单的界面处理动作，也会严重地浪费程序设计师的宝贵时间。而VB6.0是著名的微软公司的可视化软件开发工具，其被称为最容易编程语言，它具有简单、高效、功能强大的特点。它是一个非常理想的选择，是可视化的快速应用程序开发语言，它提供了可视化的集成开发环境，这一环境为应用程序设计人员提供了一系列灵活而先进的工具，可以广泛地用于许多种类应用程序设计。Visual Basic的前身是QBASIC，语言基础是BASIC。自从微软推出VB后，便成为了程序开发人员的首选工具。据统计，仅在数据库系统开发领域，VB就占了90的份额。VB是基于对象的可视化程序开发工具，它的优点在于能够快捷、简易地建立Windows应用程序。1998年8月，微软推出了VB 6.0的版本，进一步加强了部件开发的功能。以适用人员来分，可有以下三个版本：标准版 针对一般程序设计人员,适合普通应用系统的开发。专业版 针对专业程序开发人员，它在标准版的基础上提供了对数据库和Internet的支持。企业版 适用于专为企业设计应用软件的程序开发人员。2.3.2 数据库的选择建立一个数据库也有多种选择，现在市场上有各种各样的数据库，而且每一种数据库都有其自身的特点，不能说哪一种更好，只能在其中寻找一种能更好地适应系统需求、更好地满足用户的要求以及适应开发人员的习惯。在本系统中，作为党务档案服务管理系统是一个比较小的应用系统，它所产生和处理的数据量也比较小。因此，没有必要使用像SQL Server和Oracle这样的大型数据库。首先想到的数据库是Microsoft Office中的Access数据库在计算机上的应用比较普及，是开发小型数据库系统比较理想的选择。所以，在本系统中选择了Access数据库。Access 2000是微软公司出品的Office 系列办公室自动化软件的一个组件，是一个中、小型的数据库管理系统。Access数据库处理的基本结构，采取关系型数据库模式。与其他的数据库系统相比，Access更加简单易学，一个普通的计算机用户可以很快地掌握它。Access 2000的功能十分强大，它提供了全新的“数据透视图” 视图、“数据透视表”视图、完全的XML支持和SQL Server 2000的扩展属性支持等10。利用它还可以方便地实现对信息保存、维护、查询、统计、打印、交流、发布，而且它可以十分方便地与Office其他组件交流数据，这些功能对一个一般用户而言已经足够了。2.3.3 开发与运行环境(1)硬件环境处理器：Inter Pentium 4或更高。内存：512MB硬盘空间：20GB显卡：SVGA显示适配(2)软件环境操作系统：Windows XP。开发工具：VB6.0中文企业版。数据库：Microsoft Access 2003。其他：Excel 2003。 3 系统设计系统设计阶段主要目的是将系统分析阶段所提出的反映了用户信息需求的系统逻辑方案转换成可以实施的基于计算机与通信系统的物理（技术）方案。3.1 功能设计为了提高管理效率，减轻劳动强度的提高，信息处理速度和准确性；为操作员提供更方便、科学的服务项目。为操作员提供的一种更先进、科学的服务系统。于是便选择了由计算机来设计一个党务管理系统的方案。让计算机对其党务档案服务进行自动管理，操作员可以直接在计算机上实现党务档案与申报信息管理，并能在一定程度上实现自动化。在现行系统初步调查的基础上提出了新系统目标，即新系统建立后所要求达到的运行指标，这是系统开发和评价的依据。作为党务档案服务管理系统，其主要实现的功能应包括党务教师管理、支部管理、查询管理、系统维护管理等，具体功能描述如下：根据信息管理的实际要求，系统实现的功能如下：1：组织管理：主要包括两个功能，支部管理和职务任免。在支部管理模块可以提供支部的信息的添加、删除、修改等操作；2：学生党员管理：此模块共有人员信息录入、入党积极分子管理、发展对象管理、预备党员管理、正式党员管理等功能。3：教师党员管理：包括系内各部门的在职、退休教师的管理,在职及离退休教师党员管理单独建立一个模块，其中包括对在职的党员包括预备党员信息的查看、删除、修改、查询等操作。4：党员发展管理：其中包括申报学生名单和审批两项基本操作。5：系统管理：包括修改密码，添加、删除用户等功能3.2 模块结构设计 “计算机系党务管理信息系统”可分为几个主模块：党务管理、课程支部管理、查询管理、系统维护管理模块。按照结构化的系统设计方法，将整个系统分解成相对独立的若干模块，通过对模块的设计和模块之间关系的协调来实现整个软件系统的功能，从而得到系统的功能模块结构图。本系统的功能模块结构如图3-1所示。 党务管理系统系统管理基本信息查询管理用户管理密码管理退出院系支部党务类型 支部管理学生申报审批管理申报查看党员查询申报审批党员管理教师党员学生党员图3-1 系统模块结构图该系统通过VB 连接Access 数据库来开发信息管理系统，建立用户登录、按党务进行的信息管理、按支部管理、信息查找排序、报表生成、统计分析和系统管理等几大模块，实现登陆、学生党务信息管理（添加党员、查看党员、修改党员、删除党员）、教师党务管理（添加、查询、修改、删除）、申报审批管理（学生申报和审批）、支部管理（录入支部、查看支部、修改支部、删除支部），用户修改登陆密码等功能。3.3 数据库设计3.3.1 概念结构设计概念模型可以看成是现实世界到机器世界的一个过渡的中间层，是整个数据库设计的关键。概念结构设计的结果是产生概念模型，将现实世界中的客观对象首先抽象为不依赖任何具体机器的信息结构，这种信息结构不是DBMS支持的数据模型，而是概念型模型。然后再把概念模型转换为具体机器上的DBMS支持的数据模型。要对数据词典中的数据存储进行分析，得到系统的关系模型，可以采用实体联系图（简称E-R图）的方法来进行数据结构分析，从而得出概念模型。E-R图由实体、联系、属性三部分组成。实体指客观存在并可相互区分的事物，可以是人、物、实际对象、某些概念、事物本身，也可指事物和事物之间的联系。属性是实体具有的某一特性。一个实体可以由若干个属性来描述。联系是指现实世界的事物之间的联系。这种联系反映到信息世界中，就分为两类，一类是实体内部的联系，另一类是实体之间的联系。两个实体之间的联系可分为三类：l 一对一的联系（1：1）l 一对多的联系（1：n）l 多对多的联系（n: m）部分实体图如下:学生党务学号姓名班级地址.图3-2 学生党务实体教师编号姓名党务类型说明.教师党务学生图3-3教师党务实体用户名称密码-权限管理员学生图3-4管理员实体3.3.2 逻辑结构设计逻辑结构设计的任务是根据DBMS的特征把概念模型转换为相应的逻辑结构。概念设计所得到的E-R模型，是独立与DBMS的，这里的转换就是把表示概念结构的E-R图转换为层次模型或网状模型或关系模型的逻辑结构。E-R图向关系模型的转化要解决的问题是如何将实体和实体间的联系转换为关系模型，如何确定这些关系模式的属性和码。3.3.3 表结构设计关系数据结构的建立：在进行了数据基本结构的规范化重组后，还必须建立整体数据的关系结构。这一步设计完成后数据库和数据结构设计工作基本完成，只待系统实现时将数据分析和数据字典的内容代入到所设计的数据整体关系结构中，一个规范化数据库系统结构就建立起来了。根据分析阶段得出的结论，结合本系统对有关数据的存储的需要，更加方便实现该管理系统的所有功能，现将本管理系统设计成如下几个数据库表，表的设计如下:表3-1 用户信息表字段名称类型大小说明用户名称文本（20）主键密码文本（20）权限文本（20）表3-2 学生党务基本信息字段名称类型大小说明编号文本（50）主键学号文本（20）姓名文本（20）身份证号文本（50）班级文本（30）党务类型文本（50）所属支部文本（50）发展日期文本（50）介绍人文本（50）备注文本（100）表3-3支部信息字段名称类型大小说明支部代码文本（20）支部名称文本（20）负责人文本（20）联系电话文本（20）备注文本（50）表3-4 教师党务基本信息字段名称类型大小说明编号文本（50）主键教师编号文本（20）姓名文本（20）身份证号文本（50）院系文本（30）党务类型文本（50）所属支部文本（50）发展日期文本（50）介绍人文本（50）备注文本（100）其他请参考数据库。第4章 系统实现4.1 界面实现好的界面美观易懂、操作简单并且具有引导功能，使用户感觉愉快、增强兴趣，从而提高使用效率。本系统基于Windows操作系统，因此在界面上遵循Windows的传统风格，由标题栏、菜单栏、快捷工具按钮、对话框等要素组成。与Windows操作系统一致的人机界面，使得用户只要具备Windows操作基础，就能很快适应本管理系统的操作使用，因此能够大大降低系统培训费用，提高系统的可推广性。为了进一步美化人机界面，使得用户在操作中更加心情舒畅，我们选用Photoshop图像处理软件，为系统设计了简洁明快的界面图。总之我们对系统界面的整体风格，页面布局结构以及色彩搭配等进行了合理的规划和设计，在保证用户易用性、方便性的前提下，创造更简单，友好的系统界面。4.1.1 登录界面实现用户登录窗体启动。输入用户名和密码，登录。从用户信息表中检查是否有相应的用户名和密码，如果用户名或密码错误，进行提示；如果输入的用户名和相应密码正确，进入主控制平台。用户登录模块的窗体设计，在工程中添加一个窗体，命名为frmLogin.frm。控件如下:两个textbox,四个label.设置textbox字体为四,label前景颜色为Green各属性值如下:Frmlogin.Caption 登录计算机系党务管理信息系统Frmlogin.picture 登录图片Label1.caption 用户名称Label2.caption 密码Label3.caption 确定Label4.caption 退出用户登录模块的窗体如图4-1所示。用户登录连接数据库的主要代码：If CN.State Then CN.CloseCN.ConnectionString = Provider=Microsoft.Jet.OLEDB.4.0;Data Source= & App.Path & database.mdb;Persist Security Info=False CN.Open图4-1登录界面4.1.2 主界面实现党务信息管理主界面是如图4-2 主界面。采用SDI窗体。WINDOWS风格设计。主要采用菜单式的管理方式。图4-2 系统主界面图所用控件和对象包括:picture, image, StatusBar,控件代码如下：Picture1.Top = 0Picture1.Left = 0Picture1.Height = Me.ScaleHeight - StatusBar1.HeightPicture1.Width = Me.ScaleWidthStatusBar1.Panels(1).Text = 计算机系党务管理信息系统-操作员: & UserName加载背景代码Image1.Picture = LoadPicture(App.Path & 1.jpg)Picture1.RefreshPicture1.PaintPicture Image1.Picture, Picture1.ScaleTop, Picture1.ScaleLeft, Picture1.ScaleWidth, Picture1.ScaleHeight, 0, 0, Image1.Width, Image1.Height菜单包括系统设置,党务信息,组织信息,申报审批,查询管理,系统关于等。4.1.3 系统维护界面实现系统维护包括，用户，密码，数据库管理。用户包括权限管理。用户管理模块实现2个主要功能：增加新的操作人员、删除指定的操作人员。密码是对当前用户进行密码修改。如图4-3图4-3 用户管理 部分代码如下： Private Sub cmdExit_Click()Unload MeEnd SubPrivate Sub Command2_Click() 添加用户On Error GoTo ErrIf Trim(Text8.Text) And Trim(Text9.Text) And Trim(Combo1.Text) Then Dim rs1 As New ADODB.Recordset If rs1.State Then rs1.Close rs1.Open select count(*) from 用户信息表 where 用户名称= & Trim(Text8.Text) & , CN, adOpenStatic, adLockOptimistic If rs1.Fields(0) 0 Then MsgBox 用户已经存在! 请改用户名称!, , 系统提示 Text8.Text = Exit Sub End If If rs1.State Then rs1.Close rs1.Open select * from 用户信息表, CN, adOpenStatic, adLockOptimistic rs1.AddNew rs1.Fields(0).Value = Trim(Text8.Text) rs1.Fields(1).Value = Trim(Text9.Text) rs1.Fields(2).Value = Trim(Combo1.Text) rs1.Update Combo5.AddItem Trim(Text8.Text) MsgBox 用户添加成功!,初始密码为 & Text9.Text, , 系统提示 Text8.Text = End IfExit SubErr:MsgBox Err.DescriptionEnd SubPrivate Sub Command3_Click() 删除用户代码 If Trim(Combo5.Text) = UserID Then MsgBox 不能删除正在操作的用户! Exit Sub End If CN.Execute delete from 用户信息表 where 用户名称= & Trim(Combo5.Text) & Combo5.RemoveItem (Combo5.ListIndex) MsgBox 操作已成功!, , 提示End SubPrivate Sub Form_Load() 初始化代码On Error GoTo ErrText8.Text = Dim rs1 As New ADODB.RecordsetIf rs1.State Then rs1.Closers1.Open select * from 用户信息表, CN, adOpenStatic, adLockOptimisticCombo5.ClearWhile Not rs1.EOF If Not IsNull(rs1.Fields(0) Then Combo5.AddItem Trim(rs1.Fields(0)rs1.MoveNextWendErr:End Sub密码管理是对当前操作用户的密码进行管理.如图4-4.图4-4 密码管理代码如下: If rs1.State Then rs1.Close rs1.Open select * from 用户信息表 where 用户名称= & UserID & , CN, adOpenStatic, adLockOptimistic If Not rs1.EOF Then If Not IsNull(rs1.Fields(1) Then If Trim(Text13.Text) Trim(rs1.Fields(1) Then MsgBox 用户旧密码不对!, , 提示 Exit Sub Else rs1.Fields(1).Value = Trim(Text14.Text) rs1.Update MsgBox 操作已成功!, , 提示 Text13.Text = Text14.Text = Text15.Text = Unload MeEnd if End if 4.1.4 组织和党员信息界面实现用户登录系统后进入主界面，在组织管理菜单下，包括数据参数信息和支部信息，在党员管理包括学生信息和教师信息。如图4-5所示基本信息功能包括，添加删除修改等。教师信息和党务基本信息一样。所用控件包括:mshflexgrid,text1()控件数组,label1()控件数组,pictrue控件,command控件。其中label1()控件数组的caption分别对应党务信息表的各个字段。代码如下：If rs.State Then rs.Closers.Open strSQL, CN, adOpenStatic, adLockOptimisticIf rs.EOF Then If MsgBox(记录不存在!是否添加新记录?, vbYesNo, 提示) = vbYes Then rs.AddNew For i = 0 To rs.Fields.Count - 2 If Trim(Txt(i + 1).Text) Then rs.Fields(i).Value = Trim(Txt(i + 1).Text) Next i rs.Update MsgBox 操作成功!, , 提示 End If图4-5基本信息界面图4-6 数据参数4.1.5 申报审批界面实现申报审批管理界面是如图4-7。学生申报和审批功能包括，添加申报和审批两个功能等。代码如下：所用控件包括:mshflexgrid,text1()控件数组,label1()控件数组,pictrue控件,command控件。其中label1()控件数组的caption分别对应党务信息表的各个字段。图4-7 发展申报管理代码如下：Dim strSQL As StringIf rs.State Then rs.Closers.Open strSQL, CN, adOpenStatic, adLockOptimisticDim i As IntegerDim k As Integerk = Txt.CountFor i = 1 To rs.Fields.Count Txt(i).Visible = True Lbl(i).Visible = True Txt(i).Text = Next iTxt(0).Text = rs.Fields.Count 用于记录字段数(列)With MSHFlexGrid1 .Clear .Rows = 2 .Cols = rs.Fields.Count For i = 0 To rs.Fields.Count - 1 .TextMatrix(0, i) = Trim(rs.Fields(i).Name) Lbl(i + 1).Caption = Trim(rs.Fields(i).Name) Next i While Not rs.EOF For i = 0 To rs.Fields.Count - 1 If Not IsNull(rs.Fields(i) Then .TextMatrix(.Rows - 1, i) = Trim(rs.Fields(i) Next i .Rows = .Rows + 1 rs.MoveNext WendEnd With图4-8 审批4.1.6 查询界面实现查询主要是对党务和发展信息查询。如图4-9。代码如下:所用控件包括:mshflexgrid, label,command控件,。Dim xlApp As Excel.ApplicationDim xlBook As Excel.WorkbookDim xlSheet As Excel.WorksheetOn Error GoTo ErrSet xlApp = CreateObject(Excel.Application)Set xlBook = xlApp.Workbooks.Add 打开已经存在的EXCEL工件簿文件Set xlSheet = xlBook.Worksheets(1) 设置活动工作表With MSHFlexGrid1For i = 0 To .Rows - 1 For j = 0 To .Cols - 1 xlSheet.Cells(i + 1, j + 1) = Trim(.TextMatrix(i, j) Next jNext iEnd WithxlApp.Visible = True图4-9 查询管理 4.1.7 关于帮助界面实现本界面主要是对系统的软件和作者进行简单介绍，包括作者，软件名称等。如图4-10.图4-10 关于4.2 系统安全性MIS系统的安全性设计可以分为数据库级安全设计、应用软件级安全设计两个级别。数据库级安全设计在数据库级通过赋予用户不同的操作权限，控制用户对数据库的访问，对用进行存取控制；另外并发控制、完整性约束以及数据的备份和恢复策略等等，这些安全性都可以充分利用数据库管理系统（DBMS）本身具有的功能来完成。应用软件级安全设计可以在系统平台上根据不同的登陆身份和权限，给出不同的用户界面，允许不同的操作。本系统的登录模块、用户管理模块配合，就是完成这样的功能。另外，系统还提供了灵活方便的数据备份、恢复功能，有用户自己选择合适的时机进行数据的备份和恢复，隐藏了对DBMS操作的复杂细节，使得系统具有更强的支持灾难性数据恢复的功能。5 系统测试测试的目的就是为了能以最少的人力和是发现潜在的各种错误和缺陷。系统测试是保证系统质量和可靠性的关键步骤，是对系统开开过程的系统分析，系统设计和实施的最后检查。测试表格显示此功能模块通过测试，也证明了本功能模块与其他模块的独立性十分强，从而在以后更新