《员工工资管理系统》

企业员工工资管理系统摘要 随着计算机技术的飞速发展，计算机在企业管理中应用的普及，利用计算机实现企业人事工资的管理势在必行。本系统结合公司实际的人事、财务制度，经过实际的需求分析，采用功能强大的Visual Basic6.0做为开发工具而开发出来的单机版工资管理系统。整个系统从符合操作简便、界面友好、灵活、实用、安全的要求出发，完成人事、工资管理的全过程，包括新进人事加入时人事档案的建立、老人事的转出、职位等的变动引起职工信息的修改、人事信息查询、统计等人事管理工作以及新进人事工资的新增、老人事工资修改、出盘、工资短信等工资管理工作。经过实际使用证明，本文所设计的工资管理系统可以满足公司人事、工资管理方面的需要。论文主要介绍了本课题的开发背景，所要完成的功能和开发的过程。重点的说明了系统设计的重点、设计思想、难点技术和解决方案。关键词 人事的基本资料 工资结算 考勤管理。The wagess managementAbstractwith the rapid development of computer technique, and the computer is in the business enterprise to manage the universality of the inside application, and make use of the computer to realize the business enterprise personnel the wagess management is in necessarily line.This system join togethers the personnel of actual company, finance the system, pass by actual of need analysis, the mighty Visual Basic6.0 of function of adoption be used as the develop tool but single machine version that come out of development personnel wages management system.This thesis primarily introduced this lesson the process for of development background, wanting the finished function with developmented.Explaining of point system point, design that design thought, difficult point technique is with the solution.KeyWords Database, Visual Basic6.0, personnel wages management目录1 绪言12 系统分析12.1 开发背景12.2 需求分析12.2.1 系统开发的可行性研究12.2.2 需求信息的收集22.2.3 需求信息的整理32.3 系统的数据字典52.3.1 数据流的描述52.3.3 外部实体的描述82.4 E-R图设计93 系统数据库设计103.1 系统功能模块划分104 系统总体规划154.1 系统功能154.2 流程图152业务总体流程调查165 系统具体实现175.1 用户界面的实现175.2 数据库的实现346 综合测试357 软件的使用与维护378 结束语39致谢40参考文献411 绪言企业员工工资管理系统是一个企业单位不可缺少的部分,它的内容对于企事业单位的决策者和管理者来说都至关重要,所以人事工资管理系统应该能够为用户提供充足的信息和快捷的查询手段。但一直以来人们使用传统人工的方式管理文件信息，这种管理方式存在着许多缺点,如:效率低、保密性差,另外时间一长,将产生大量的文件和数据,这对于查找、更新和维护都带来了不少的困难。随着科学技术的不断提高,计算机科学日渐成熟,其强大的功能已为人们深刻认识,它已进入人类社会的各个领域并发挥着越来越重要的作用。计算机在企业管理中应用的普及，利用计算机实现企业人事管理势在必行。对于大中型企业来说，利用计算机支持企业高效率完成劳动人事管理的日常事务，是适应现代企业制度要求、推动企业劳动人事管理走向科学化、规范化的必要条件；计算机管理所无法比拟的优点检索迅速、查找方便、可靠性高、存储量大、保密性好、寿命长、成本低等。这些优点能够极大地提高人事管理的效率,也是企业的科学化、正规化管理,与世界接轨的重要条件。不同的企业具有不同的人事管理制度，这就决定了不同的企业需要不同的人事管理系统。目前市面上流行的人事管理系统不少。但是，对于企、事业单位的人事管理系统来说，不需要太大型的数据库系统。只需要一个操作方便，功能实用，能满足本中心对数据的管理及需求的系统。我们的目标就是在于开发一个功能实用、操作方便，简单明了的人事管理系统。能够录入人事的基本资料，在操作上能够完成诸如添加、修改、删除、按各种条件进行查询、新用户的设置及密码修改等方面的工作，基本满足人事日常业务的需要。为数据库系统的开发，Visual Basic是一个非常理想选择。数据库是MIS中的重要支持技术，在MIS开发过程中，如何选择数据库管理是一个重要的问题，目前，数据库产品较多，每种产品都具有各自的特点和适用范围，因此，在选择数据库时，应考虑数据库应用的特点及适用范围，本系统选用的数据库语言Visual Basic语言，该开发工具具有很多长处。Visual Basic是一种可视化的、面对对象和条用事件驱动方式的结构化高级程序设计，可用于开发Windows环境下的种类应用程序。它简单易学、效率高，且功能强大，可以与Windows的专业开发工具SDK相媲美，而且程序开发人员不必具有C/C+编程基础。在Visual Basic环境下，利用事件驱动的编程机制、新颖易用的可视化设计工具，使用Windows内部的应用程序接口(API)函数，以及动态链接库(DLL)、动态数据交换(DDE)、对象的链接与嵌入(OLE)、开放式数据访问(ODBC)等技术，可以高效、快速地开发出Windows环境下功能强大、图形界面丰富的应用软件系统。根据一般员工工资管理需求，系统主要达到以下几个功能：1) 人事信息录入，编辑，修改，查询，打印。2) 工资管理录入，编辑，修改，查询，计算，统计。3) 家庭关系信息录入，编辑，修改。4) 企业部门管理录入，编辑，修改。5) 日常管理。6) 人事变动。7) 各种信息的查询打印。8) 系统数据的安全保密，设定系统用户。9) 帮助信息。10）打印报表。2 系统分析2.1 开发背景随着计算机技术的飞速发展，计算机在企业管理中应用的普及，利用计算机实现企业工资的管理势在必行。对于大中型企业来说，利用计算机支持企业高效率完成劳动人事管理的日常事务，是适应现代企业制度要求、推动企业劳动人事管理走向科学化、规范化的必要条件；而人事工资管理是一项琐碎、复杂而又十分细致的工作，工资计算、发放、核算的工作量很大，一般不允许出错，如果实行手工操作，每月发放工资须手工填制大量的表格，这就会耗费工作人员大量的时间和精力，计算机进行工资发放工作，不仅能够保证工资核算准确无误、快速输出，而且还可以利用计算机对有关工资的各种信息进行统计，服务于财务部门其他方面的核算和财务处理，同时计算机具有着手工管理所无法比拟的优点.例如:检索迅速、查找方便、可靠性高、存储量大、保密性好、寿命长、成本低等。这些优点能够极大地提高工资资管理的效率,也是企业的科学化、正规化管理,与世界接轨的重要条件。计算机已经成为我们学习和工作的得力助手。今天，计算机的价格已经十分低廉，性能却有了长足的进步。它已经被应用于许多领域，计算机之所以如此流行的原因主要有以下几个方面：首先，计算机可以代替人工进行许多繁杂的劳动；其次，计算机可以节省许多资源；第三，计算机可以大大的提高人们的工作效率；第四，计算机可以使敏感文档更加安全，等等。2.2 需求分析2.2.1 系统开发的可行性研究在决定开发管理信息系统应用项目之前，首先要做好系统开发的可行性分析。可行性分析的任务是确定项目开发是否必要和可行。建设MIS的必要性取决于需求的迫切性和实现的可行性。从以下几个方面认真进行研究，从而为确定系统开发项目的决策提供科学依据。1.经济可行性：对组织的经济状况和投资能力进行分析，一方面是支出的费用，其中包括设备购置费、软件开发费、管理和维护费用、人人事资和培训费等；另一方面是取得的收益，其中有一部分可以用钱来衡量，如开发本系统，为企业节省的人力，物力。收益的另一部分难以用钱表示，如加强人事信息管理。2.技术上可行性：现技术上的可行性分析所考虑采用的硬件和软件技术能满足用户提出的要求（如计算机的容量、速度等）。此外，因本系统难度不大，所涉及的范围只限于企业人事信息管理，所以在技术上已达到开发该系统的能力。3.营运上的可行性：指系统对组织结构的影响，现有人员和结构、设备、环境等系统的适应性以及进行人员培训补充计划的可行性。4.管理上的可行性：重要是管理人员对开发信息系统的态度和管理方面的基础工作。重要领导不支持的项目肯定不可行。管理基础工作好坏重要表现在管理制度和方法是否科学，规章制度是否齐全以及原始数据是否正确等方面。现在我国的企事业单位中信息的管理水平还停留在纸介质的基础上，这样的机制已经不能适应时代的发展，因为它浪费了许多人力和物力，在信息时代这种传统的管理方法必然被计算机为基础的信息管理所取代。我作为一个计算机应用的专科生，希望可以在这方面有所贡献。改革的总设计师邓小平同志说过“科学技术是第一生产力”，我希望能用我四年的所学编制出一个实用的程序来帮助企事业单位进行更有效的信息管理。 归纳起来，好处大约有以下几点：1) 可以存储历届的工资，安全、高效；2) 只需一到二名信息录入员即可操作系统，节省大量人力；3) 可以迅速查到所需信息。为将来企事业单位上网做好准备工业和信息化部22日发布的数据显示，今年一季度，中国互联网网民新增2000万人，网民总数达到4.04亿人。互联网已经十分普及，企事业单位往界的毕业生希望能在世界的任何一个角落查到自己校友的信息，本系统为企事业单位将来的上网作了先期工作，比如数据库的建立。企业人事信息系统的目标是：按照建立管理信息系统的原理和方法，采用成熟的计算机信息技术和手段，支持企业人事管理工作的全过程，加强企业职工的各种信息资源的管理和应用，提高企业人事管理的现代化水平，优化人、才、物和信息资源的结构，在为企业日常业务提供全面信息服务的基础上，提供管理决策支持功能。企业人事管理信息系统的范围和边界是：企业人事管理信息系统主要是为企业内部管理活动提供信息服务，同时也为有关单位提供职工信息服务，它覆盖企业内部和外部的各项管理工作。系统能够对企业的各部门信息、职工基本信息、职工考勤等方面的信息提供存储、更新、查询等功能，并对有关单位提供信息的查询功能。系统的数据来源由系统管理员录入。工资的设计分析根据实际情况，我们使用原型法（Rapid Prototyping）即以少量代价快速地构造一个可执行的软件系统模型。使用户和开发人员可以较快地确定需求，然后采用循环进化的开发方式，对系统模型作连续的精化，将系统需具备的性质逐渐增加上去，直到所有的性质全部满足。此时模块也发展成为最终产品了。 需求信息的收集需求信息的收集又称为系统调查。为了充分地了解用户可能提出的要求，在调查研究之前，要做好充分的准备工作，要明确调查的目的、调查的内容和调查的方式。1.调查的目的 首先，要了解一个组织部门的机构设置，主要业务活动和职能。其次，要了解本组织部门的大致工作流程和任务范围划分。这一阶段的工作是大量的和繁琐的。尤其是管理人员缺乏对计算机的了解，他们不知道或不清楚哪些信息对于数据库系统设计者是必要的或重要的，不了解计算机在管理中能起什么作用，做哪些工作。另一方面，数据库系统设计者缺乏对管理对象的了解，不了解管理对象内部的各种联系，不了解数据处理中的各种要求。由于管理人员与数据库系统设计者之间存在着这样的距离，所以需要管理部门和数据库系统设计者更加紧密地配合，充分提供有关信息和资料，为数据库系统的设计打下良好的基础。外部要求：信息的性质，响应的时间、频度和如何发生的规则，以及对经济效益的考虑和要求，安全性及完整性要求。业务现状：这是调查的重点，包括信息的种类，信息流程，信息的处理方式，各种业务工作过程和各种票据。组织机构：了解本组织部门内部机构的作用、现状、存在的问题，及是否适应计算机管理。规划中的应用范围和要求。对高层负责人的调查，最好采用个别交谈方式。在交谈之前，应给他们一份详细的调查提纲，以便使他们有所准备。从访问中，可获得有关该组织高层管理活动和决策过程的信息需求、该组织的运行政策、未来发展变化趋势等与战略规划有关的信息。对中层管理人员的访问，可采用开座谈会、个别交谈或发调查表、查看业务记录的方式，目的是了解企业的具体业务控制方式和约束条件、不同业务之间的接口、日常控制管理的信息需求以及预测未来发展的潜在信息要求。对基层操作人员的调查，主要采用发调查表和个别交谈方式来了解每项具体业务的过程、数据要求和约束条件。2.2.3 需求信息的整理想要把收集到的信息（如文件、图表、票据、笔记等）转化为下一设计阶段可用形式的信息，必须对需求信息做分析整理工作。业务流程分析的目的是获得业务流程及业务与数据联系的形式描述。一般采用数据流分析法，分析结果以数据流图（DFD）表示。是一个数据流图的示意图。图中有向线表示数据流，圆圈中写上处理的名称、处理框代表一个处理、存储框表示存储的信息。其数据流图示意图如图2.1所示：人事主管S-01总经理S-02会计员S-04员工信息汇总P-03员工信息登记表考勤汇总P-01考勤报表工资结算P-02工资报表系统管理员S-03D-01D-02D-03D-04D-05D-06D-07D-08D-09D-12D-11D-10下面是人事信息管理数据库系统设计的业务流程分析，原始的数据是人事的信息，系统要求统计人事的信息，并根据信息统计的结果由奖金评委评选出获得奖金的人事。其数据流图示意图如图2.2所示：员工部门负责人人事主管系统管理员提交信息员工信息登记表新的员工信息登记总表添加修改员工信息员工信息汇总表人事主管总经理会计员系统管理员考勤信息汇总考勤报表工资结算工资报表2.3 系统的数据字典2.3.1 数据流的描述数据流编号：D01数据流名称：员工考勤信息简述：员工考勤信息 数据流来源：人事主管 数据流去向：考勤汇总 数据项组成：迟到请假等数据流编号 ：D02 数据流名称 ：考勤总汇数据 简述 ：考勤总汇数据 数据流来源 ：部门主管 数据流去向 ：考勤总汇 数据项组成 ：迟到请假天数数据流编号 ：D03 数据流名称 ：考勤总汇信息 简述 ：考勤总汇信息 数据流来源 ：部门主管 数据流去向 ：会计员 数据项组成 ：迟到请假天数数据流编号 ：D04 数据流名称 ：入库数据 简述 ：对员工考勤的综合 数据流来源 ：后台管理模块 数据流去向 ：数据库 数据项组成 ：管理员名称 数据流编号 ：D05 数据流名称 ：库存数据 简述 ：员工工资表总汇 数据流来源 ：数据库 数据流去向 ：后台管理模块数据项组成 ：管理员信息 数据流编号 ：D06 数据流名称 ：员工工资表 简述 ：员工工资信息 数据流来源 ：会计员 数据流去向 ：审批部门 数据项组成 ：用户名称 + 用户密码 数据流编号 ：D07 数据流名称 ：通过审核的信息 简述 ：经审核正确的员工工资信息 数据流来源 ：登录审核模块 数据流去向 ：前台管理模块 数据项组成 ：用户名称 + 用户密码 数据流编号 ：D08 数据流名称 ：员工工资通过审核表 简述 ：经审核员工工资信息 数据流来源 ：登录审核模块 数据流去向 ：系统管理员 数据项组成 ：员工工资奖金基本工资等数据流编号 ：D09 数据流名称 ：经审核的工资表 简述 ：经审核的数据信息，存入数据库。 数据流来源 ：前台管理模块 数据流去向 ：数据库 数据项组成 ：员工信息工资 数据流编号 ：D10 数据流名称 ：员工基本信息 简述 ：在职员工信息 数据流来源 ：数据库 数据流去向 ：前台管理模块 查看结果模块 数据项组成 ：员工姓名等数据流编号 ：D11 数据流名称 ：员工基本信息 简述 ：在职员工信息 数据流来源 ：部门主管 数据流去向 ：后台管理 数据项组成 ：员工姓名等数据流编号 ：D12 数据流名称 ：员工基本信息 简述 ：在职员工信息 数据流来源 ：部门主管 数据流去向 ：入数据库 数据项组成 ：员工姓名等2.3.2 处理逻辑的描述处理逻辑编号 ：P01处理逻辑名称 ：考勤统计 简述 ：人事主管提供员工考勤信息输入的数据流：考勤信息 处理描述 ：统计员工及各个部门考勤信息。输出的数据流 ：员工考勤信息总汇处理逻辑编号 ：P02处理逻辑名称 ：员工工资结算 简述 ：对员工基本工资，奖金，扣发工资等进行总计输入的数据流 ：员工考勤信息基本工资等数据 处理描述 ：经审核汇总员工工资表 输出的数据流 ：员工工资报表处理逻辑编号 ：P03处理逻辑名称 ：人事主管统计 简述 ：人事主管提供员工信息输入的数据流：员工信息 处理描述 ：统计员工及各个部门信息。输出的数据流 ：员工信息总汇用户信息处理逻辑编号 ：P04处理逻辑名称 ：前台管理 简述 ：对用户（学生）的调查进行管理 输入的数据流 ：本次调查问题、当前调查结果 处理描述 ：经审核通过验证的用户，可以参与调查，查看当前调查结果输出的数据流 ：学生作出的选择答案数据存储的描述数据存储编号 ：F01 数据存储名称 ：数据库 简述 ：员工、用户和有关的信息数据 数据储存组成 ： 管理员基本信息 、 用户基本信息 、工资表2.3.3 外部实体的描述外部实体编号 ：S01外部实体名称 ：人事主管简述 ：人事信息主管 输出的数据流 ：D01 D10 外部实体编号 ：S02外部实体名称 ：总经理 简述 ：审批信息 输入的数据流 ：D06输出的数据流 ：D03 D07部实体编号 ：S03外部实体名称 ：系统管理员简述 ：系统主管 输入的数据流 ：D08 D09 D12部实体编号 ：S04外部实体名称 ：会计员简述 ：工资表汇总统计 输入的数据流 ：D03输出的数据流 ：D042.4 E-R图设计E-R图设计模式分为两种：1. 一种是以局部E-R图为基础设计全局模式，称为集中式模式设计；2. 另一种是先设计局部E-R模型图，再由若干个局部E-R模型图综合成为全局E-R模型图，称为综合设计法。这两种设计方法的设计思想是有区别的：综合设计法是以局部需求说明作为设计的基础，在集成时尽管对局部E-R图要做必要的修改，但局部E-R图是设计的基础，全局模式是局部E-R图的集成；集中式模式设计法是在统一需求说明的基础上，设计全局模式，全局模式是设计的基础。综合设计法比较适合于大型数据库系统的设计，可以多组并行进行，免除综合需求说明的麻烦。目前，综合设计法用得较多，下面将以综合设计法为主介绍概念模式设计。综合设计法分为两个步骤：1）设计局部概念模式。2）由局部概念模式综合成全局概念模式。局部概念模式设计可以由用户独立完成，也可以由数据库系统设计者协助完成。一般分为以下几个步骤： 根据局部需求分析的结果产生局部实体集。局部实体集应该是局部应用领域中的事物，能够满足局部应用的要求。局部实体集的产生包括确定局部实体集的属性和键码。在局部概念模式设计过程中，我们可能会发现有些事物既可以抽象为实体集也可以抽象为属性或实体集间的联系。对于这样的事物，我们应该使用最易于为用户理解的概念模型结构来表示。在易于被用户理解的前提下，既可抽象为属性，又可抽象为实体的的尽量抽象为属性。需要注意的是，每个事物必须由一种而且仅有一种概念模型结构表示。在设计局部实体集时，我们还需要确定哪些属性是单值属性、哪些属性是多值属性以及哪些属性是复合属性(指由多个数据项组成的属性)。在确定了局部实体集后，根据局部分析的结果确定局部实体集间的联系及其结构约束。局部实体集间的联系要准确地描述局部应用领域中各事物之间的关系。同时，局部实体集间的联系也需要满足局部应用的各种要求。最后，根据上面的分析来形成局部E-R图。系统局部E-R图如图2.3所示：考勤工 时员工编号员工姓名公积金姓别部门其它扣除工资工作员工奖 金津贴费总计工资代号身份证号图2.3 系统局部E-R图3 系统数据库设计3.1 系统功能模块划分 根据该企业的业务情况及实现目标，系统功能模块图如图2.1所示：员工工资管理系统系统部分员工工资信息设置员工工资信息管理修改密码基本工资设置其他工资设置工资公式设置计算实发工资查询工资退出系统出勤统计添加用户导出工资表图3.1 系统功能模块在这次系统开发中我主要完成的部分是工资管理和设置方面。开发这个系统的目的就是帮助企业的财务主管部门提高工作效率，实现企业工资信息管理的系统化、规范化和自动化。能够和认识管理系统、考勤管理系统相结合，真正实现企业高效、科学、现代化的员工管理。系统最终实现的主要功能如下：企业工资信息设置部分：包括设置员工的基本工资和其他项目的金额，如奖金等。并且负责设置员工工资的计算公式。工资信息设置工资计算公式设置其他工资设置基本工资设置图3.2 工资信息设置模块企业工资信息管理部分：包括统计出勤、计算工资、查询工资和导出工资表。工资信息管理导出工资表计算实发工资出勤统计查询工资图3.3 工资信息管理模块系统部分：包括添加用户和修改密码。系统退出系统修改密码添加用户图3.4 系统模块3.2 系统数据库设计数据库是信息管理系统的后台，存储着所有的信息，在信息管理系统中有着很重要的地位。数据库设计的好与坏，直接影响到这个系统的运行效率。良好的数据库设计，可以提高数据信息的存储效率，确保数据信息的完整性和一致性。针对企业工资信息管理系统的需求，通过对员工工资计算过程的内容分析，为本系统设计如下的数据项和数据结构：基本工资信息：包括员工编号和基本工资（元/小时）。基本工资信息员工编号基本工资图3.5 基本工资实体E-r图其他项目信息：包括员工编号、奖金、津贴、福利、扣发等。其他项目设置奖金津贴福利扣发图3.6 其他项目实体E-R图计算公式信息：包括加班费的百分比、出差工资、旷工、迟到早退扣发等。计算公式加班费出差工资旷工扣发表3.1 员工出勤统计信息表：字 段类 型长 度是否空说 明id自动编号长整型否记录编号stuffid文本50否员工编号stuffname文本50否员工姓名recordmonth日期/时间否统计时间attendance数字长整型否出勤天数lateearly数字长整型否迟到早退次数absent数字长整型否事假次数overtimecom数字长整型否病假次数overtimespe数字长整型否加班次数表3.2 员工工资计算公式信息表：字 段类 型长 度是否空说 明overtimecom数字长整型否正常加班工资百分比overtimespe数字长整型否特殊加班工资百分比errand数字长整型否出差工资absent数字长整型否旷工工资le数字长整型否迟到早退表3.3 员工其他项目设置：字 段类 型长 度是否空说 明id自动编号长整型否记录编号stuffid文本50否员工编号yearmonth日期/时间否年月type数字长整型否类型name文本50是类型money货币货币否名称remark备注是备注表3.4 员工工资统计信息表：字 段类 型长 度是否空说 明id自动编号长整型否记录编号stuffid文本50否员工编号stuffname文本50否员工姓名yearmonth日期/时间否时间basicsalary货币货币基本工资bonus货币货币奖金welfare货币货币福利allowance货币货币津贴abatement货币货币扣发lesub货币货币迟到早退扣发overtime货币货币加班费errand货币货币出差费others货币货币其他金额total货币货币总额表3.5 员工信息表：字 段类 型长 度是否空说 明sid文本50否员工编号sname文本50否员工姓名sgender文本50否性别splace文本50否籍贯sage数字长整型否年龄sbirthday日期/时间否生日sdegree文本50是学历sspecial文本50是专业saddress文本50是住址scode文本50是 stel文本50是 semail文本50是EmailsworkTime日期/时间否参加工作时间sintime日期/时间否进入公司时间sdept文本50是部门sposition文本50是职务sremark文本50是备注表3.6 用户信息表：字 段类 型长 度是否空说 明userid文本50否用户名称userpwd文本50否用户密码4 系统总体规划4.1 系统功能整个系统从总体上分为工作分配管理（包括假条管理）、工资管理、系统维护三大部分，每一部分应实现的功能如下：1. 档案管理功能1) 新人事档案的输入；2) 部门档案设置:包括修改、删除（删除部门只是将该部门登记为无效，并不要求从表中删除）；3) 部门档案信息查看。2. 工资管理功能1) 基本工资设置；2) 考勤信息统计；3) 工资结算；4) 固定工资调整。3. 系统查询功能1) 查询人事工资：实现灵活的工资项目维护；2) 查询部门工资：能够灵活的改变部门的薪水账目等；3) 系统用户管理：修改用户密码等。4.2 流程图1流程图流程图如图4.1所示：员工工资管理系统 查询模块档案管理模块系统维护模块工资管理模块_系统密码的修改关于系统工资信息的添加工资信息的删除工资信息的查询工资信息的设置查询部门工资总汇查询人事工资部门信息职工信息图4.1 流程图2业务总体流程调查业务总体流程调查如图5.2所示：维护人事基本信息维护人事工资信息数据统计结束开始 图4.2 业务总体流程调查图 维护人事基本信息：人事管理主要负责人员基本信息的维护，包括新进人事档案的建立，人事信息的修改。人画工资管理基本流程如下：数据来源：将各部门送达的人事工资信息包括基本工资、奖金、水电费等作为数据来源，分为新增人事工资数据和老人事每月修改数据。数据的输入：由工作人员通过新人事本月工资增加和老人事上月工资表修改完成。数据的统计：由工作人员通过对修改后的上月工资表进行计算得到每个人的实发工资以及总金额。具体操作步骤一览表如表5.3所示： 表4.1 操作步骤表模块名称功能说明1档案管理数据设置操作菜单项分别由人事录入，部门录入。2查询为普通用户实现对工资的查看和浏览，以及查询等功能。3打印报表打印月工资和年工资4工资管理实现工资项目维护。改变人事的薪水账目等。5系统介绍此系统的基本操作方法，基本信息，开发背景，及退出。5 系统具体实现5.1 用户界面的实现主界面具体实现见下图：a) 档案管理：数据设置操作菜单项分别由人事录入，部门录入。b) 查询：为普通用户实现对工资的查看和浏览，以及查询等功能。c) 工资管理：实现工资项目维护。改变人事的薪水账目等。d) 打印报表：打印月工资和年工资。e) 系统：修改用户密码！及退出。f) 帮助：主要为使用软件用户介绍此系统的一些个基本信息以及开发背景！提供给用户此软件的基本操作方法。1用户登录界面用户登录界面如图5.1所示:图5.1 用户登录界面图 图5.1 登陆界面图用记登录界中只要输入用户名和密码就可以进入系统进行操作，在输入过程中，输入错误或者没有输入密码都将无法进入系统，只要输入次数等于三次。系统将确认你为一个非法用，将退出系统。这里边的用户名也有超级用户和一般用户，超级用户有权限操作系统的全部功能，而一般用户只能对系统进行一般的查询和游览等操作！2主界面主界面如图5.2所示:图5.2 主界面图 模块源代码：Private Sub About_Click()End SubPrivate Sub AddUser_Click()End SubPrivate Sub AttInfo_Click()End SubPrivate Sub BMInfo_Click()End SubPrivate Sub BSalary_Click()End SubPrivate Sub ChangeGZ_Click()End SubPrivate Sub ChangePWD_Click()End SubPrivate Sub Exit_Click()End Sub5.1.1 档案管理模块的实现其功能主要为对人事信息的增加与修改。职工信息界面如图5.3所示:图5.3 职工信息界面图模块源代码：Private Sub Command1_Click()End SubPrivate Sub Command2_Click()If MsgBox(确定删除当前资料吗？, vbInformation + vbYesNo, 删除资料？) = vbYes ThenEnd IfEnd SubPrivate Sub Command3_Click()If Text1.Text = Then MsgBox 请输入部门编号！, vbOKOnly + vbExclamation, 提示Else If Text2.Text = Then MsgBox 请输入部门名称！, vbOKOnly + vbExclamation, 提示 Else If MsgBox(确定保存当前资料吗？, vbInformation + vbYesNo, 保存资料？) = vbYes Then Else Text1.Text = Text2.Text = End If End IfEnd IfAdodc2.RecordSource = select * from 职工信息表 where 所属部门编号= & Text1.Text & End SubPrivate Sub Command7_Click()If Adodc1.Recordset.EOF = True Then MsgBox 已到达最后一条记录!, vbOKOnly + vbExclamation, 警告 Exit SubEnd IfAdodc2.RecordSource = select * from 职工信息表 where 所属部门编号= & Text1.Text & End SubAdodc2.RecordSource = select * from 职工信息表 where 所属部门编号= & Text1.Text & End SubPrivate Sub Command9_Click() If Adodc1.Recordset.BOF = True Then MsgBox 已到达第一条记录!, vbOKOnly + vbExclamation, 警告End If Command8.Enabled = True Command7.Enabled = True Adodc2.RecordSource = select * from 职工信息表 where 所属部门编号= & Text1.Text & End SubPrivate Sub Form_Load()Adodc2.RecordSource = select * from 职工信息表 where 所属部门编号= & Text1.Text & Private Sub Form_Unload(Cancel As Integer) Screen.MousePointer = vbDefaultEnd SubPrivate Sub Text1_Change()Adodc2.RecordSource = select * from 职工信息表 where 所属部门编号= & Text1.Text & End Sub2.部门信息主界面其功能主要为对部门的增加与修改。部门信息主界面如图所示:图5.4 部门信息主界面模块源代码：Private Sub Command1_Click()APrivate Sub Command2_Click()If MsgBox(确定删除当前资料吗？, vbInformation + vbYesNo, 删除资料？) = vbYes ThenEnd IfEnd SubPrivate Sub Command3_Click()If Text1.Text = Then MsgBox 请输入部门编号！, vbOKOnly + vbExclamation, 提示Else If Text2.Text = Then MsgBox 请输入部门名称！, vbOKOnly + vbExclamation, 提示 Else If MsgBox(确定保存当前资料吗？, vbInformation + vbYesNo, 保存资料？) = vbPrivate Sub Command5_Click()Unload MeEnd SubPrivate Sub Command6_Click()Adodc2.RecordSource = select * from 职工信息表 where 所属部门编号= & TIf Adodc1.Recordset.EOF = True Then MsgBox 已到达最后一条记录!, vbOKOnly + vbExclamation, 警告 Exit SubAdodc2.RecordSource = select * from 职工信息表 where 所属部门编号= & Text1.Text & End SubAdodc2.RecordSource = select * from 职工信息表 where 所属部门编号= & Text1.Text & End SubPrivate Sub Command9_Click() If Adodc1.Recordset.BOF = True Then MsgBox 已到达第一条记录!, vbOKOnly + vbExclamation, 警告 Adodc2.RecordSource = select * from 职工信息表 where 所属部门编号= & TexPrivate Sub Form_Load()Adodc2.RecordSource = select * from 职工信息表 where 所属部门编号= & Text1.Text & End SubPrivate Sub Text1_Change()Adodc2.RecordSource = select * from 职工信息表 where 所属部门编号= & Text1.Text & End Sub5.1.2 工资管理其功能主要是对职工工资的管理。: 图5.5 基本工资设置主界面模块源代码：Private Sub Command1_Click()Text1(0).SetFocusPrivate Sub Command10_Click()End SubPrivate Sub Command2_Click()If MsgBox(确定删除当前资料吗?, vbInformation + vbYesNo, 删除资料?) = vbYes ThenEnd IfEnd SubPrivate Sub Command4_Click()For i = 0 To 11 If Text1(i) = Then MsgBox 输入不完整！, vbOKOnly + vbExclamation, 警告 Text1(i).SetFocus Exit Sub End IfNext iIf MsgBox(确定保存当前资料吗?, vbInformation + vbYesNo, 保存资料?) = vbYes ThenEnd IfPrivate Sub Command5_Click()If MsgBox( 放弃当前的操作吗?, vbInformation + vbYesNo, 放弃?) = vbYes Then Adodc1.Recordset.CancelBatch adAffectAllChapters End IfEnd SubPrivate Sub Command7_Click() Unload Me Exit SubEnd SubPrivate Sub Command8_Click()If Adodc1.Recordset.EOF = True Then MsgBox 已到达最后一条记录!, vbOKOnly + vbExclamation, 警告 Exit SubEnd IfCommand6.Enabled = TrueCommand10.Enabled = TrueEnd Sub2.考勤信息统计模块主界面其功能是对人事考勤信息的采集与修改。考勤信息统计模块主界面如图所示:图5.6 考勤信息统计模块主界面模块源代码：Private Sub Combo1_Click() 选择月份Adodc1.ConnectionString = Provider=Microsoft.Jet.OLEDB.4.0; & Data Source=database企业工资管理系统.mdb;Persist Security Info=False Adodc1.RecordSource = select * from 考勤信息表 where 年份= & Text1(3).Text & and 月份= & Combo1.Text & mysql = select * from 考勤信息表 where 年份= & Text1(3).Text & and 月份MsgBox mysqlrs.CursorLocation = adUseClientrs.Open mysql, conn, adOpenKeyset, adLockPessimisticPrivate Sub Command10_Click() 前翻If rs.BOF = True ThenPrivate Sub Command2_Click() 删除If MsgBox(确定删除当前资料吗?, vbInformation + vbYesNo, 删除资料?) = vbYes ThenEnd IfEnd SubPrivate Sub Command4_Click() 保存For i = 0 To 9 If Text1(i) = Then MsgBox 输入不完整！, vbOKOnly + vbExclamation, 警告 Text1(i).SetFocus Exit Sub End IfNext iIf MsgBox(确定保存当前资料吗?, vbInformation + vbYesNo, 保存资料?) = vbYes ThenEnd IfEnd SubPrivate Sub Command5_Click() 取消 If MsgBox( 放弃当前的操作吗?, vbInformation + vbYesNo, 放弃?) = vbYes Then rs.CancelBatch adAffectAllChapters End IfPrivate Sub Command7_Click() 返回 Unload Me Exit SubEnd Subation = adUseClientrs.Open mysql, conn, adOpenKeyset, adLockPessimisticSet DataGrid2.DataSource = rsEnd Sub功能主要是对月工资的统计计算。工资结算模块主界面如图5.7所示：