人事管理系统课程设计报告(共32页)

1、精选优质文档-倾情为你奉上湖南文理学院数据库课程设计报告 设计题目： 人事管理系统 学生姓名： 系 别： 计算机学院 专 业： 班 级： 学 号： 指导教师： 同组同学： 评阅意见：课 程 设 计 任 务 书题目 人事管理系统 专业、班级 学号 姓名 同组人员 主要内容：设计内容：设计如下主要功能模块1) 人事档案管理模块。2) 人员薪酬管理模块。3) 人员培训管理模块。4) 各类报表生成模块。5) 人员内部调动、离岗管理模块。6) 人员奖惩情况管理模块。7) 具有数据备份和数据恢复功能。基本要求：单位内部的人事的管理，从大的方面分主要集中在单位职工的个人情况、调入调出等。所以该系统主要是实现

2、对数据的录入、插入、删除、查询、统计、更新、打印等功能。其次，为了信息的保密与安全，系统还要提供一定的安全机制。开发这个系统的目的就是帮助单位人力资源部门提高工作效率，实现人事信息管理的系统化、规范化和自动化。 在提供详细人员资料的同时，还为保证资料的保密性特设置访问密码，有效控制进入系统的人员。完 成 期 限： 二周 指导教师签名： 课程负责人签名： 2010年 9月18日目 录1.开发背景人力资源是企业所有资源中最活跃与最昂贵的资源，如何让更多的员工以积极主动的态度参与公司的运作，最大限度的发挥企业人力资源的效用是每一个管理者关心的问题。本系统完全按照"以人为本&quo

3、t;的设计要求，以综合利用信息资源，调动管理人员积极性、综合智慧和创造性为目的，将人事管理所涉及的各类业务按照其内在的联系组织成一个有机整体。透过信息化方式取代传统人工作业，帮助人事单位化繁为简，快速有效的处理奖惩考核、训练发展、任用迁调等各项人事作业，大幅提升人事单位的工作效率，使其作业控管事半功倍，使企业达到事得其人，人尽其才的目标，创造企业竞争力，让管理者轻松的体味人事管理系统的新观念。1.1相关技术介绍1.1.1VisualBasic6.0中文版工具软件简介Visual Basic经过微软公司长期不断的完善、第三方资源的大量加入以及广大爱好者的大力支持， Visual Basic是一种

4、可视化的、面向对象和调用事件驱动方式的结构化高级程序设计，可用于开发Windows环境下的应用程序。它简单易学、效率高、且功能强大，可以与Windows的专业开发工具SDK相媲美，而且程序开发人员不必具有C/C+编程基础。在Visual Basic环境下，利用事件驱动编程机制、新颖易用的可视化设计工具，使用Windows内部的应用程序接口（API）函数，以及动态链接库（DLL），动态数据交换（DDE），对象的链接与嵌入（OLE）、开放式数据访问（ODBC）等技术，可以高效、快速地开发出Windows环境下功能强大、图形界面丰富的应用软件系统。总的来说，Visual Basic具有以下特点：1.

5、可视化编程。 2.面向对象的程序设计。 3.结构化程序设计。 4.事件驱动编程机制。 5.访问数据库。 6. 动态数据交换。 7. 对象的链接与嵌入。 8.动态链接库。1.1.2.SQL server2000简介由于本系统涉及到许多数据的处理，这就需要有一个强大的后台数据库管理系统支持。目前主要的数据库有：Access、FoxPro、Excel、Sybase、Oracle、Informix、SQLServer等，其中网络型的SQLServer、Oracle产品安全性远远高于桌面型的Access、FoxPro等数据库。 本系统采用的是微软公司的SQL Server 2000。其特点如下：

6、83;可伸缩性和可用性同一个数据库引擎可以在不同的平台上使用，从运行Microsoft Windows 98的便携式电脑，到运行Microsoft Windows 2000数据中心版的大型多处理器服务器。SQL Server 2000 企业版支持联合服务器、索引视图和大型内存支持等功能，使其得以升级到最大Web站点所需的性能级别。 ·企业级数据库功能SQL Server 2000关系数据库引擎支持当今苛刻的数据处理环境所需的功能。数据库引擎充分保护数据完整性，同时将管理上千个并发修改数据库的用户的开销减到最小。SQL Server 2000 分布式查询能够实现引用来自不同数据源的数据

7、，就好像这些数据是SQL Server 2000数据库的一部分，同时分布式事务支持充分保护任何分布式数据更新的完整性。复制同样可以维护多个数据复本，同时确保单独的数据复本保持同步。可将一组数据复制到多个移动的脱接用户，使这些用户自主地工作，然后将他们所做的修改合并回发布服务器。 ·易于安装、部署和使用SQL Server 2000 中包括一系列管理和开发工具，这些工具可改进在多个站点上安装、部署、管理和使用 SQL Server 的过程。SQL Server 2000 还支持基于标准的、与 Windows DNA 集成的程序设计模型，使 SQL Server 数据库和数据仓库的使用成

8、为生成强大的可伸缩系统的无缝部分。这些功能可以快速交付 SQL Server 应用程序，使客户只需最少的安装和管理开销即可实现这些应用程序。 2.功能描述2.1功能模块图 人事管理系统基本信息管理人事变动管理考勤管理工资管理基本信息查询信息打印员工离职管理员工职务调动新员工登记迟到早退管理请销假管理 出差管理查询统计 打印工资信息培训管理用户管理奖惩管理管理员普通用户信息查询信息修改图2.1功能模块图2.2功能描述通过对现行人事管理系统的调查，明确了人事管理系统由档案管理、职务调动管理、奖惩管理、考勤管理、工资管理、请销假管理组成。 系统功能的主要描述如下。（1）员工档案管理1）对公司里所有员

9、工进行统一编号；将每一位员工的信息保存在员工档案记录中。2）对新聘用的员工，将其信息加入到员工档案记录中；对于解聘的员工，将其信息从员工档案记录中删除。3）当员工的信息发生变动时，修改员工档案记录中相应的属性。（2）员工职务调动管理对公司里所有员工的职务记录进行统一编号；登记员工调动前后的具体职务，以及调动时间。（3）奖惩管理对公司里所有员工的奖惩记录进行统一编号；登记员工奖惩的原因，所受奖惩类型，奖惩时间。（4）考勤管理1）对员工上班刷卡的记录进行统一编号；登记员工上班时间、签到类型（准时、迟到）。2）对员工下班刷卡的记录进行统一编号；登记员工上班时间、签到类型（准时、早退）。（5）请销假管

10、理1）对员工请假的记录进行统一编号；登记员工请假时间、请假类型。2）对员工销假的记录进行统一编号；登记员工销假时间、请假类型，检查是否超期。（6）工资管理1）对公司里所有员工的工资记录进行统一编号，建立工资记录表。（7）部门管理1）对公司所有的部门进行编号，建立部门记录。 3.数据流程分析3.1数据流程图3.1.1数据流程图 一般用户档案信息表档案查询进入考勤信息表考勤考勤查询工资表工资查询工资 各种信息输入管理员用户表培训培训培训信息表用户管理 图3.1.1系统业务流程图 3.1.2 流程图培训管理人员档案管理员工员工档案人事变动管理上级员工调动职务记录工资级别管理工资级别记录部门管理部门信

11、息安全管理出勤管理出勤记录上班下班 图3.1.2 流程图3.2数据字典人事管理系统数据流程图中，数据信息和处理过程还需要通过数据字典来描述。在本文的数据字典中，主要对数据流图中的数据流、数据存储和处理过程进行说明。（1）主要的数据流定义1）数据流名称：员工情况位置：员工P1。定义: 员工情况=姓名+性别+出生日期+身份证号码+籍贯+学历+职称+政治面貌+婚姻状况+所在部门+ +电话+电子邮箱+家庭住址+邮编+入公司时间+入部门时间+起薪时间。数据流量：根据公司的员工具体录用情况来确定。说明：要对每一位被聘用的新员工进行唯一编号。2）数据流名称：奖惩情况位置：P3员工定义: 奖惩情况=员工流水号

12、+奖惩类型+奖惩金额+奖惩年月日。数据流量：根据公司的具体情况来确定。说明：要对每一次的奖惩记录进行唯一编号。3）数据流名称：奖惩批复位置：上级P3定义: 奖惩批复=奖惩类型+批复部门号+批复原因+批复日期。数据流量：根据公司的具体情况来确定。说明：具体应用中，批复原因可以省略。4）数据流名称：调动情况位置：P5员工定义: 调动情况=员工号+调动前职务+调动后职务+调动日期。数据流量：根据公司的具体情况来确定。说明：员工号和调动日期可以唯一确定一个调动情况。5）数据流名称：调动批复位置：上级P5定义: 调动批复=批复部门号+批复原因+批复日期。数据流量：根据公司的具体情况来确定。说明：批复原因

13、可以省略。6）数据流名称：上班刷卡位置：员工P7.1定义: 上班刷卡=员工号+上班刷卡时间+刷卡机号。数据流量：根据公司的具体规模情况来确定。说明：上班刷卡时间会汇入到出勤记录中。7）数据流名称：下班刷卡位置：员工P7.2定义: 下班刷卡=员工号+下班刷卡时间+刷卡机号。数据流量：根据公司的具体情况来确定。说明：下班刷卡时间会汇入到出勤记录中。8）数据流名称：工资查询位置：P4员工定义: 工资查询=员工号+基本工资+奖金+罚款+超始时间+截止时间+发薪日期。数据流量：根据公司的具体情况来确定。说明：根据员工号和发薪日期可以唯一确定一个工资记录。9）数据流名称：请假申请位置：员工P2.2定义:

14、请假申请=员工号+请假时间+请假天数。数据流量：根据公司的具体情况来确定。说明：员工号和请假时间可以唯一确定一个请假记录。10）数据流名称：请假批复位置：上级P2.2定义: 请假批复=审批人+批复结果。数据流量：根据公司的具体情况来确定。说明：批复结果的类型只能是（批准、拒绝）。11）数据流名称：销假申请位置：员工P2.1定义: 销假申请=员工号+销假时间 。数据流量：根据公司的具体情况来确定。说明：针对销假申请没用单独建立销假记录表，在这里将销假记录和请假记录进行了合并。因为在一般情况下，请假是不能够进行嵌套的。12）数据流名称：管理员情况位置：管理员P6定义: 用户身份=员工编号。数据流量

15、：根据公司的具体情况来确定。说明：要对每一位管理员建立唯一的账号。13）数据流名称：用户身份位置：安全管理P1，P2.1，P2.2，P3，P4,P5,P7.1,P7.2定义: 用户身份= 非法用户 | 内部管理员 | 服务管理员数据流量：根据公司的具体情况来确定。说明：不同的用户身份对应不同的操作权限，对应着不同的安全级别。14）数据流名称：部门情况位置：上级部门情况定义: 部门情况=部门号+部门名称+领导人号数据流量：根据公司的具体情况来确定。说明：部门号是主码。（2）主要的数据存储定义1）数据存储编号：员工记录 D1输入：P1输出：P1，P7.1，P7.2，P2.1，P2.2数据结构：员工

16、记录=姓名+性别+出生日期+民族+学历+职称 +员工编号。数据量和存取频度：根据公司的具体规模情况来确定。存取方式：联机处理；检索和更新；以随机检索为主。说明：员工编号具有唯一性和非空性；性别只能是男或女；主码是员工编号。2）数据存储编号：请假记录 D2输入：P2.1，P2.2输出：P2.1，P2.2数据结构：请假记录=员工号+请假时间+请假天数+销假时间 。数据量和存取频度：根据公司的具体规模情况来确定。存取方式：联机处理；检索和更新；以更新操作为主。说明：主码设为请假时间和员工号；员工号是外码，参照表是员工记录。3）数据存储编号：奖惩记录 D3输入：P3输出：P3数据结构：奖惩记录=员工流

17、水号+奖惩类型+奖惩金额+奖惩时间+批复部门号+批复原因+批复日期。数据量和存取频度：根据公司的具体规模情况来确定。存取方式：联机处理；检索和更新；以更新操作为主。说明：主码设为奖惩时间和员工号；员工号是外码，参照表是员工记录。4）数据存储编号：工资记录 D4 输入：P4输出：P4数据结构：工资记录=员工号+基本工资+奖金+罚款+超始时间+截止时间+发薪日期。数据量和存取频度：根据公司的具体规模情况来确定。存取方式：联机处理；检索和更新；以更新操作为主。说明：主码设为发薪日期和员工号；员工号是外码，参照表是员工记录。5）数据存储编号：职务调动记录 D5输入：P5输出：P5数据结构：职务调动记录

18、=员工号+调动前职务+调动后职务+调动日期+批复部门号+批复原因+批复日期。数据量和存取频度：根据公司的具体规模情况来确定。存取方式：联机处理；检索和更新；以更新操作为主。说明：主码设为调动日期和员工号；员工号是外码，参照表是员工记录。6）数据存储编号：管理人员记录 D6 输入：P6输出：P6数据结构：管理人员记录=用户密码+职工号+密码+管理员账号。数据量和存取频度：根据公司的具体规模情况来确定。存取方式：联机处理；检索和更新；以更新操作为主。说明：主码设为管理员账号。7）数据存储编号：出勤记录 D7输入：P7.1，P7.2输出：P7.1，P7.2数据结构：出勤记录=员工号+上班刷卡时间+下

19、班刷卡时间+刷卡日期。数据量和存取频度：根据公司的具体规模情况来确定。存取方式：联机处理；检索和更新；以更新操作为主。说明：主码设为员工号和刷卡日期；员工号是外码，参照表是员工记录。8）数据存储编号：部门记录 D8输入：P8输出：P8数据结构：部门记录=部门号+部门名称+领导人号。数据量和存取频度：根据公司的具体规模情况来确定。存取方式：联机处理；检索和更新；以检索操作为主。说明：主码设为部门号。（3）主要的处理过程1）处理过程编号：P1处理过程名：档案管理输入：用户身份，员工记录，员工情况输出：员工记录处理说明：根据员工的聘用、解聘建立或删除员工记录，以及在后续的过程中，以管理员身份对员工的

20、记录进行修改。2）处理过程编号：P2.1处理过程名：销假管理输入：销假申请，请假批复，用户身份，员工记录，销假记录输出：请假记录处理说明：根据员工的销假申请，把销假时间录入到相应的请假记录中。3）处理过程编号：P2.2处理过程名：请假管理输入：请假申请，请假批复，用户身份，员工记录，请假记录输出：请假记录处理说明：根据员工的请假申请和批复情况，进行请假表的登记。4）处理过程编号：P3处理过程名：奖惩管理输入：用户身份，奖惩批复，奖惩记录输出：奖惩记录，奖惩情况处理说明：根据奖惩批复的要求对员工进行相应的惩处，并对惩处进行记录。5）处理过程编号：P4处理过程名：工资管理输入：用户身份，工资记录输

21、出：工资记录，工资查询处理说明：根据员工目前的工资情况，进行调薪的操作。6）处理过程编号：P5处理过程名：调动管理输入：调动批复，用户身份，职务调动记录输出：职务调动记录，调动情况处理说明：根据调动批复的内容，更改员工的职务信息，并对调动情况进行记录。7）处理过程编号：P6处理过程名：安全管理输入：管理员情况输出：D6, P1，P2.1，P2.2，P3，P4,P5,P7.1,P7.2处理说明：建立管理人员记录表；通过用户名和口令，确认用户身份，保证系统安全性。8）处理过程编号：P7.1处理过程名：上班管理输入：上班刷卡，用户身份，员工记录，出勤记录输出：出勤记录处理说明：根据输入的员工号信息，

22、记录上班时间，并判断是否迟到。9）处理过程编号：P7.2处理过程名：下班管理输入：下班刷卡，用户身份，员工记录，出勤记录输出：出勤记录处理说明：根据输入的员工号信息，记录下班时间，并判断是否早退。10）处理过程编号：P8处理过程名：部门管理输入：部门情况，部门记录输出：部门记录处理说明：根据上级的调度，对现在公司的部门进行领导人的调换，或者是增加或删除某一部门。4.数据库的设计与优化4.1数据库概念设计 概念模型设计是指对用户的需求进行综合，归纳与抽象，形成一个独立于具体DBMS的概念模型，是整个数据库设计的关键将人事管理系统定名为“人事管理系统”。 各实体的分E-R图，如图A,B,C所示：全

23、局E-R图部门请假员工调动奖惩刷卡机出勤工资管理人员担任N 1 N 1 N 1 N 1 N 1 1 1 培训N 1图5各实体间的联系图员工编号员工职称姓名学历出生日期性别民族部门号 A） 员工实体图部门部门编号领导人号名称B） 部门实体图管理人员管理员账号级别员工账号密码C）管理人员实体图将人事管理系统的E-R图转换为关系数据库的数据模型，其关系模式为：1）员工档案（员工编号+姓名+性别+出生日期+民族+学历+职称+部门号），其中员工编号为主码，部门号为外码；2）管理员记录（管理员账号，员工编号，密码，级别），其中管理员账号为主码，员工编号为外码；3）请假记录（请假编号+员工编号+请假时间+请

24、假天数+销假时间+审批领导号+批复结果）请假编号为主码，其中员工编号外码。4）奖惩记录（奖惩编号+员工编号+奖惩类型+奖惩金额+奖惩日期+批复部门号+批复原因+批复日期），奖惩编号为主码，其中员工编号和批复部门号为外码；5）职务调动记录（调动编号+员工编号+调动前职务+调动后职务+调动日期+批复部门号+批复原因+批复日期），调动编号为主码，其中员工编号和批复部门号为外码；6）出勤记录（出勤编号+员工号+上班时间+下班时间+考勤日期），出勤编号为主码，员工号为外码；7）工资记录（工资编号+员工号+基本工资+奖金+罚款+起始时间+截止时间+发薪日期），工资编号为主码，员工号为外码。8）部门记录（部

25、门编号+名称+领导人号），部门编号为主码。4.2数据库逻辑结构设计经过检查，此数据库的详细逻辑设计满足第3范式的要求。人事管理系统中各表的属性设计情况如下表1：表名属性名数据类型长度允许空主码或索引约束条件部门部门号Char4No主码部门名Char10No领导人号Char4No索引、外码值为职工编号管理人员管理员账号Char4No主码职工编号Char4No外码密码Char6No 输入时不显示级别Char4No“管理员”或“系统管理员”员工员工编号Char5No主码姓名Char10No学历VarChar8No索引项性别Char2“男”或“女”出生日期Datetime索引项身份证号VarChar3

26、2No民族VarChar16职称VarChar10部门号Char4外码出勤号Char6No主码出勤员工编号Char4No外码上班日期DatetimeNo索引上班时间Datetime 下班时间DatetimeNo 刷卡机号Char4No外码工资编号Char6No主码工资员工编号Char4No外码基本工资MoneyNo索引罚款Money起始时间Datetime截止时间Datetime发薪日期DatetimeNo索引调动编号Char6No主码职务调动员工编号Char4No外码调动前职务VarChar10No索引项调动后职务VarChar10No调动部门号Char4外码 调动日期Datetime值为员

27、工调动日期批复日期Datetime 值为领导批复日期调动原因VarChar50 奖惩编号Char6No 主码 奖惩记录员工编号Char4No外码奖惩类型Char4No索引项奖惩金额Money奖惩日期Datetime值为员工受奖惩日期批复部门号Char4外码批复日期DatetimeNo 值为领导批复日期奖惩原因VarChar50 请假编号Char6No主码请假记录员工编号Char5No外码请假时间DatetimeNo 值为假期开始日期销假时间DatetimeNo 值为假期结束日期请假天数int索引项 审批人编号Char4索引项值为职工编号表1 5.物理设计和实施 5.1 数据库物理设计数据库物理

28、设计阶段的任务是根据具体计算机系统(DBMS和硬件等)的特点，为给定的数据库系统确定合理的存储结构和存取方法。所谓的“合理”主要有两个含义：一个是要使设计出的物理数据库占用较少的存储空间，另一个对数据库的操作具有尽可能高的速度。主要体现在后者。 (1)建立索引：对表 部门 在属性列 领导人号 上建立非聚集索引，对表 员工 在属性列 出生日期 上建立非聚集索引，在属性列 学历 上建立非聚集索引对表 出勤 在属性列 上班日期 上建立非聚集索引对表 工资 在属性列 基本工资 上建立非聚集索引对表 职务调动 在属性列 调动前职务 上建立非聚集索引。对表 奖惩记录 在属性列 奖惩类型 上建立非聚集索引。

29、对表 请假记录 在属性列“请假天数”上建立非聚集索引，在属性列“审批人编号” 上建立非聚集索引。(2)存储结构确定数据库的存储结构主要指确定数据的存放位置和存储结构，包括确定关系、索引、日志、备份等的存储安排及存储结构，以及确定系统存储参数的配置。  将日志文件和数据库对象(表、索引等)分别放在不同的磁盘，可以改进系统的性能，提高系统的安全性。所以，系统应将日志文件和数据文件存放在不同磁盘上。5.2数据库的建立具体SQL代码如下：create database 人事管理系统on primary( name=人事管理系统, filename='D:SQL汽车售后服务.mdf&#

30、39;, size=10, filegrowth=10%, maxsize=50 )log on( name=人事管理系统_日志, filename='D:SQL人事管理系统_日志.ldf', size=5, filegrowth=10%, maxsize=10)gocreate table 部门( 部门号 Char(4) primary key, 部门名 Char(10) not null,领导人号 Char(4) not null,)gocreate table 管理人员( 管理员账号 char(4) primary key,职工编号 Char(4) not null,密码

31、 Char(6) not null,级别 Char(4) check(级别 in ('管理员','系统管理员'),foreign key (职工编号) references 员工(员工编号)gocreate table 刷卡机( 刷卡机号 Char(4) primary key)create table 员工( 员工编号 Char(4) primary key, 姓名 Char(10) not null,性别 Char(2) check(性别 in('男','女'),出生日期 datetime,学历 VarChar(32) not

32、 null,身份证号 VarChar(32) not null,民族 VarChar(16) not null, 职称 Char(10),部门号 char(4), )gocreate table 出勤(出勤号 Char(6) primary key,员工编号 Char(4) not null,上班日期 datetime not null,上班时间 datetime not null,下班时间 datetime not null,刷卡机号 Char(4),foreign key (刷卡机号) references 刷卡机(刷卡机号),foreign key (员工编号) references 员

33、工(员工编号)gocreate table 工资(工资编号 Char(6) primary key,员工编号 Char(4) not null,基本工资 money not null,罚款 money,起始时间 Datetime,截止时间 Datetime,发薪日期 Datetime,foreign key (员工编号) references 员工(员工编号)gocreate table 职务调动(调动编号 Char(6) not null primary key,员工编号 Char(4) not null,调动前职务 Char(10),调动后职务 Char(10),调动部门号 Char(4)

34、 not null,调动日期 Datetime,批复日期 Datetime,调动原因 VarChar(50), foreign key (员工编号) references 员工(员工编号), foreign key (调动部门号) references 部门(部门号)create table 奖惩记录(奖惩编号 Char(6) not null primary key,员工编号 Char(4) not null,奖惩类型 Char(4),奖惩金额 money,奖惩日期 Datetime,批复部门号 Char(4),批复日期 Datetime,奖惩原因 VarChar(50), foreign

35、key (员工编号) references 员工(员工编号), foreign key (批复部门号) references 部门(部门号)Gocreate table 请假记录(请假编号 Char(6) not null primary key,员工编号 Char(4) not null,请假时间 Datetime,销假时间 datetime,请假天数 int ,审批人编号 Char(4), foreign key (员工编号) references 员工(员工编号)Go/*索引的建立*/create index部门_领导人号_index on部门(领导人号)create index 出勤_

36、学历_index on 出勤(学历 )create index 出勤_出生日期_index on 员工(出生日期 )create index 出勤_上班日期_index on 出勤(上班日期 )create index 工资_基本工资_index on 工资(基本工资 )create index 职务调动_调动前职务_index on 职务调动(调动前职务 )create index 奖惩记录_奖惩类型_index on 奖惩记录(奖惩类型 )create index 请假记录_请假天数_index on 请假记录(请假天数)Go5.3实验数据的输入为了验证所设计的数据库的性能，在SQL se

37、rver 2000上建立的“人事管理系统”数据库，输入了少量的实验数据。 6.应用程序设计 应用程序设计，指的是如何用vb的代码实现预定的功能。 7.1员工档案信息表 7.2调动信息表6.1建立公共模块 运行Visual Basic后，选择“文件”“新建工程”菜单，然后从工程模板中选择“标准EXE”项，单击“确定”按钮。Visual Basic就会自动生成一个窗体，这个窗体的属性采用的都是默认设置。在本系统设计中，先删除这个窗体，然后选择“文件”“保存工程”菜单，在出现的“文件另存为”对话框中输入这个工程项目的名称Stuff_MIS，并且选择要保存这个工程的目录，单击“保存”按钮，保存工程。

38、为了提高代码的效率方便维护，在Visual Basic中可以用公用模块来存放工程中经常使用的函数、过程和全局变量等。在这个系统中，每个功能模块都要使用数据库，因此可以使用一个公用的数据操作函数，来执行一系列的SQL语句。在项目资源管理器中为这个工程添加一个模块，保存为Modulelbas。Option ExplicitPublic DBCON As New ADODB.ConnectionPublic UserName As StringPublic PassWord As StringPublic YhQx As New ADODB.Recordset 定义一个Main过程：Sub Main() DBCON.ConnectionString = "DSN=MAO;database=person" DBCON.Open frmTimeLoad.ShowEnd Sub添加执行SQL语句的函数：Public Function CheckLogin()FrmMain.UserManage.Enabled = FalseFrmMain.StuffManage.Enabled = FalseFrmMai