第25章 使用VBA制作人事管理系统

基于VB的人力资源管理系统摘要随着经济全球一体化时代的到来，企业的发展不再是仅限于技术的竞争，市场的竞争，更重要的是人才的竞争。

企业在发展过程中，除了要维护好和客户的关系，掌握先进的行业生产技术以外，还需要拥有一批本领域中具有相当才能的工作人员，才能在信息时代的经济浪潮中立于不败之地。

人事管理系统是典型的信息管理系统(MIS),其开发主要包括后台数据库的建立和维护以及前端应用程序的开发两个方面。

对于前者要求建立起数据一致性和完整性强、数据安全性好的库。

而对于后者则要求应用程序功能完备,易使用等特点。

经过分析,我们使用 MICROSOFT公司的 VISUAL BASIC开发工具,利用其提供的各种面向对象的开发工具,尤其是数据窗口这一能方便而简洁操纵数据库的智能化对象,首先在短时间内建立系统应用原型,然后,对初始原型系统进行需求迭代,不断修正和改进,直到形成用户满意的可行系统。

本系统后台采用SQL Server 2000开发和管理数据库，它功能强大、直观易于操作、建立表方便，具有强大的错误处理功能；语言用ASP开发和管理用户界面，具有开发效率高，易于维护等特点，并且信息完善，界面友好。

在对深入学习SQL SERVER 2000和ASP之后，遵照企业人力资源管理系统的要求，本人完成了需求分析,模块划分, 数据库模式的分析及数据库和应用程序的设计。

关键字：人事管理; 控件; 窗体; 企业管理系统; SQL SERVER 2000Human Resource Manages System Based onVISUAL BASICABSTRACTBecause the economic global integral whole turns the arrival in ages, the development of business enterprise is no longer to only be limited by a technical competition, the competition of market, the competition of more important talented person. The business enterprise is in the process of develop in, in addition to want to support like with the customer's relation, the profession which controls a forerunner produces a technique outside, also need to be own in a batch of skills area have very then can of staff member, then can in the information economic wave tide of the ages the neutral is at the invincible position. The Human Resource Management System is a typical application of managing information system （know as MIS）,which mainly includes building up data-base of back-end and developing the application interface of front-end. The former required consistency and integrality and security of data. The later should make the application powerful and easily used.By looking up lots of datum, we selected Visual Basic presented by Microsoft because of its objective tools in Win32. VB offered a series of ActiveX operating a data-base. It can give you a short-cut to build up a prototype of system application. The prototype could be modified and developed till users are satisfied with it.This system SQL Server of the backstage adoption is 2000 developments and management database, its function is strong and keeps a view to be easy to an operation and builds up form convenient, have strong false processing function;The language uses ASP development and management customer's interface, have development efficiency Gao and be easy to a maintenance etc. characteristics, and the information be perfect, interface amity.To thorough study SQL SERVER 2000 with ASP after, act according to business enterprise human resource management system of request, oneself completed a need analysis, mold piece divide the line, the design of analysis and database and application procedure of database mode.Keywords：Human Resource Management ; ActiveX; Form;The business enterprise manages system; SQL SERVER 2000第一章绪论 (5)1.1 开发背景 (5)1.2 设计目的 (5)第二章开发环境和工具 (6)2.1 开发环境简介 (6)2.1 ADO 数据库访问技术 (7)第三章需求分析 (9)3.1 系统功能分析 (9)3.2 安全性要求 (11)3.3 数据流图 (11)3.3.1 人事管理 (11)3.3.2 个人管理 (12)3.3.3 招聘管理 (12)3.3.4 培训管理 (13)3.3.5 保险管理 (14)3.3.6 薪酬管理 (14)3.3.7 系统设置 (14)第四章系统总体设计 (16)4.1 数据库设计 (16)4.1.1 数据库设计过程 (16)4.1.2 人力资源管理系统数据库设计 (17)4.2 模块设计 (20)4.2.1 人事管理模块 (22)4.2.2 个人管理模块 (22)4.2.3 招聘管理模块 (22)4.2.4 培训管理模块 (22)4.2.5 保险广场模块 (23)4.2.6 薪酬管理模块 (23)4.2.7 系统管理模块 (23)结论 (24)致谢 (25)参考文献 (26)第一章绪论1.1开发背景企业在我国的国民经济中具有重要的作用。

目录一、功能描述 (3)二、概要设计 (3)2.1系统的体系结构 (3)2.1.1 系统的登入运行 (3)2.1.2菜单界面所连接的 (4)2.2员工信息的管理 (4)2.3员工信息的检索 (5)2.4员工信息与工资信息之间的联系 (5)2.4.1员工的工资 (5)2.4.2 所有员工工资的汇总 (5)三、详细设计 (6)3.1 登入模块 (6)3.2 菜单模块 (6)3.3 员工信息模块 (6)3.4 源代码 (7)四、效果及存在问题 (15)4.1 效果 (15)4.2 问题 (19)五、心得体会 (19)一、 功能描述对人事管理系统而言，针对各个功能模块的需求，总结出各个信息之间的联系如下： 部门与员工之间的联系：一个部门信息对应多个员工信息，而一个员工信息对应一个部门信息，所以员工信息与部门信息之间是一对多的关系。

员工与工资之间的联系：一个员工信息对应多个工资信息，一个工资信息对应一个员工信息，所以员工信息与工资信息二者之间是一对多的关系,产生职务属性。

系统主要威力实现，人员信息的建立，根据不同情况来查询人员信息，删除系统中的选定人员信息，通过对人员工作表现来颁发奖金，最后对所有人员的工资进行一个汇总计算出总的支出。

二、 概要设计 2.1系统的体系结构2.1.1 系统的登入运行密码错误系统有一个进入界面，只有输入密码才能进入主菜单，在主菜单中进行一些所需操作。

登入系统系统主界面员工信息面绩效管理面检索员工面退出运行面2.1.2菜单界面所连接的信息全局E-R 图反应了一个人事管理系统中所要涉及的一些模块。

如：1、员工信息 2、检索员工 3、绩效管理 4、退出运行2.2员工信息的管理1员工信息的添加部门拥有员工姓名性别基本工资工作评价部门编号职务工资领取奖金基本工资员工信息实体的属性员工工作评价部门 基本工资职务员工姓名性别员工编号添加删除查询1员工信息的添加 2员工信息的删除3 所有员工信息显示2.3员工信息的检索员工信息的检索通过不同的条件来查看员工信息，如果所查看的信息部存在就会弹出提示信息框，提示一随查看的员工不存在。

VB人事管理系统(数据流程图+ER图)-课程设计1〃课程设计的目的人事管理系统是一个企事业单位不可缺少的部分,它的内容对于企事业单位的决策者和管理者来说都至关重要,所以人事管理系统应该能够为用户提供充足的信息和快捷的查询手段。

但一直以来人们使用传统人工的方式管理文件信息，这种管理方式存在着许多缺点,如:效率低、保密性差,另外时间一长,将产生大量的文件和数据,这对于查找、更新和维护都带来了不少的困难。

使用计算机对人事信息进行管理,具有着手工管理所无法比拟的优点.例如:检索迅速、查找方便、可靠性高、存储量大、保密性好、寿命长、成本低等。

因此有利于办公自动化的人事管理系统能够极大地提高人事管理的效率,也是企业进行科学化、正规化管理的手段。

2.设计方案论证2.1需求分析人事管理可以说是一项琐碎、繁杂而又必须十分细致的工作，是不能允许时常发生差错的。

几十年前的那种手工操作已远远跟不上近代企业发展的步骤，时代的进步决定了企业的发展，而企业要发展必然完善的管理体系，所以说企业人事管理的自动化完全是时代进步的必然结果。

合理的利用有助于企业发展的管理系统是企业改革的一种优越的体现。

利用计算机对企业人事管理不仅保证了核算准确度，还成倍的提高了工作效率，而且便于查询。

通过本人事管理数据库管理系统软件，能帮助人事管理人员利用计算机快速方便的对企业人事资源进行管理。

人事管理系统主要用于企业内部员工的档案、工资，便于公司领导掌握人员动向，及时调整人才的分配。

本软件集企业人员基本信息，企业人员劳工合同，及人才需求计划于一身，目的在于能够使管理人员更加方便，快捷的对企业人事进行管理。

同时本人事管理软件使人事管理工作系统化、规范化、自动化，从而在一方面提高了管理者的工作效率，减少了传统人工管理方式所带来的人力，物力的浪费，另一方面由于本软件具有查找方便、可靠性高、存储量大等优点，所以实现了企业人事管理的自动化。

人事管理系统针对企业员工信息的处理工作采用计算机进行全面的现代化管理，用户可以通过输入员工的基本信息、考勤信息等,由系统自动生成相应的统计数据及工资统计报表以供用户查询、打印,另外用户还可以对这些基本信息进行定期的更新与删除工作,人事管理系统力求以方便快捷的途径去管理职工的信息，代替手工操作的繁琐数据。

案例一用VB制作一个人事管理系统1.1课程设计的目的和意义1.2 系统功能的设计本系统的设计中，将主要实现如下的功能：增加记录、修改记录、删除记录。

1.3 数据库和数据表的设计数据库应用系统的开发的前提首先开发数据库和数据库中的数据表1.3.1人事管理应用系统的数据库设计在VB集成开发环境中制作数据库的步骤：（1）启动VB应用程序，出现VB应用系统开发主界面（2）在VB主菜单中单击“外接程序（A）|可视化数据管理器(V)”，出现可视化数据管理器界面。

（3）单击“文件|新建（N）|Microsoft Access|V ersion 7.0 MDB(7)”菜单项（4）在单击菜单后出现文件保存对话框，在对话框中选择磁盘驱动器和文件夹名称。

1.3.2 人事管理数据表的创建数据库只是一个容器，它是数据表的集合。

创建数据表的步骤：（1）在可视化数据管理器中打开数据库（2）在数据库管理器中选择数据库文件（3）右击数据库文件，出现弹出式菜单（4）在弹出式菜单中单击“新建表（T）”菜单项，出现数据表结构设计器对话框，输入数据表的字段1.3.3创建人事历史数据库1.3.4 为人事管理数据表增加一些数据记录在人事管理数据表中增加记录的有两种途径第一种是利用VB的可视化数据库管理器，另一种方法是通过Microsoft Access 2000打开创建的人事管理数据库，然后再为人事管理数据表增加记录。

1.3.5 数据表的其他一些操作方法了解并操作数据的导入与导出、数据压缩操作、数据库的修复、数据查询生成器、成批数据替换。

1.4用可视化数据管理器设计人事管理窗体1.4.1创建人事管理窗体利用可视化的数据管理器作为VB的“外接程序”制作人事管理窗体的方法，从而进入第一个应用程序的制作：其步骤：（1）在数据管理器中打开人事管理数据库（2）在管理器的主菜单中单击“实用程序|数据窗体设计器（F）”菜单项，出现数据窗体设计器对话框。

（3）为窗体命名为“人事管理窗体”（4）在数据表列表框中选择数据表名（5）单击“生成窗体（B）”按钮，生成该窗体。

一、课程设计的目的与要求 (1)二、题目分析 (2)三、设计思路 (2)四、调试过程 (4)4.1、设计工程框架 (4)4.1.1、设计登录窗体 (4)4.1.2、图书基本信息管理模块设计 (6)4.2、设计图书信息编辑窗体 (7)4.3、图书信息管理窗体 (8)4.4、图书借阅管理模块设计 (10)4.4.1、设计借阅证件类型编辑窗体 (10)4.4.2、设计借阅证件类型管理窗体 (12)4.4.3、设计借阅证件编辑窗体 (13)4.4.4、设计借阅证件管理窗体 (13)4.4.5、设计图书借阅记录查看窗体 (15)4.4.6、设计图书借阅信息编辑窗体 (16)4.4.7、设计图书归还信息管理窗体 (16)4.4.8、设计图书借阅管理窗体 (17)4.4.9、设计用户信息编辑窗体 (18)五、运行结果 (20)六、课程设计总结 (20)七、参考文献 (21)摘要随着人类社会的发展，人类对知识的需求也不断地增长。

在这种形势下，书籍就渐渐地成为人们获取并增长知识的主要途径，而图书馆就自然而然地在人们的生活中占据了一定的位置。

绘本图书与其他普通图画书的区别在于绘本图书通常有独立的绘画著者，图画有个人风格，画面即情即景，可单幅成画，容易提高儿童读书的积极性。

如何科学地管理绘本馆不但关系到读者求知的方便程度，也关系到绘本馆的发展，因此，开发一套完善的绘本图书馆管理系统就成不可少了，图书管理系统是典型的信息管理系统(MIS)，其开发主要包括后台数据库的建立和维护以及前端应用程序的开发两个方面。

经过分析，使用 Microsoft公司的Visual Basic6.0为开发工具，利用其提供的各种面向对象的可视化开发平台作为开发工具，采用面向对象技术，图形化的应用开发环境，尤其是它有一个功能极其强大的集成环境提供级开发人员，使得开发人员可通过菜单、界面、图形浏览工具、对话框以及嵌入的各种生成器来轻松地完成各种复杂的操作。

数据库课程设计VB之人事管理系统关于数据库课程设计VB之人事管理系统设计内容计算机科学与技术专业《数据库系统原理》课程设计报告题目人事管理作者于丹指导教师张娜关于数据库课程设计VB之人事管理系统设计内容目录一、设计并开发人事管理系统..............................1二、需求分析...................................................2三、概念设计...................................................4四、逻辑设计...................................................6五、具体设计...................................................8六、程序使用说明.............................................15七、小组分工及设计体会 (20)关于数据库课程设计VB之人事管理系统设计内容一直以来人们使用传统人工的方式管理员工档案，这种管理方式存在着许多缺点，譬如：效率低、保密性差，另外时间一长，将产生大量的文件和数据，这对于查找、更新和维护都带来了不少的困难。

随着科学技术的不断提高，计算机科学日渐成熟，其强大的功能已为人们深刻认识，它已进入人类社会的各个领域并发挥着越来越重要的作用。

人事管理信息系统的出现轻而易举的解决了传统管理人员档案的方法的缺点。

伴随着人事管理信息系统的广泛应用，它已经成为了任何一家企业公司都不可缺少的组成部分，它的存在使得管理者更容易了解自己公司的员工,便于分配人员,易于进行调整。

所以人事管理信息系统能够为管理人员提供充足的信息和快捷的查询手段。

二、需求分析人事管理系统题目要求：1、基本信息包括：（2）来本单位的日期及来自的单位；（3）职称及评定的时间和工资级别；（4）职工的奖惩登录；2、工资的确定：基本工资与职称和级别有关；职务补助、房补由职称决定；关于数据库课程设计VB之人事管理系统设计内容工龄津贴由工龄决定；洗理费由性别决定；另有每人奖金不同。

目录第一章导论 (2)第二章系统需求分析 (3)第一节系统设计背景介绍 (3)第二节系统功能分析 (4)第三章人事管理系统总体设计 (5)第1节系统设计 (5)第2节数据库设计 (9)第四章详细设计工作 (11)第1节各功能模块创建及实现 (11)第五章系统功能测试 (25)第六章结束语 (26)参考文献 (28)第 1 页第一章导论随着信息技术的飞速发展,特别是数据库技术的发展,计算机已经成为当今信息时代的关键工具。

数据库技术是计算机应用技术中的一个重要组成部分,对于大量的数据,使用数据库来存储管理将比通过文件来存储管理更高效。

数据库技术在经过几代变革以后,出现了以关系数据库产品为主流的数据库时代。

Access 20XX是微软公司推出的关系数据库产品。

作为Microsoft的office 套件产品之一,Access已经卖出了近700万份,成为世界上最流行的桌面数据库系统。

Access与许多优秀的关系数据库一样,可以让你很容易地连接相关的信息而且还对其他的数据库系统有所补充。

Visual Basic作为应用程序的开发“利器”也表现在数据库应用程序的开发上,它良好的界面和强大的控件功能使数据库编程变得简单多了。

Visual Basic提供了强有力的数据库存取能力,将Windows的各种先进特性与强大的数据库管理功能有机地结合在一起。

本次毕业设计——人事管理系统是运用ADO技术设计开发的,使用大量地SQL语句进行添加、查询、删除等操作。

本系统使用Access 20XX作为后台数据库,利用Visual Basic 6.0提供的数据库开发平台开发前台部分。

第二章系统需求分析第1节系统设计背景介绍管理信息系统就是我们常说的MIS (Management Information System),在强调管理,强调信息的现代社会中它变的越来越普及。

而将信息管理系统与企业自动化设备想结合,则是当今社会现代企业的发展趋势。

图1 建立Access数据库界面图通过设计器创建表，并插入数据在数据库的设计中,共设计了五张表。

其中包括员工信息表，密码表, 部门表，员工个人信息表和员工考勤表.部门表中设置了三个字段,分别为部门序号、部门名称和业务描述.密码表中设置了两个字段，分别为用户名和密码。

员工个人信息表中设置了10个字段，分别为姓名、所属部门、身份证号、性别、民族、出生日期、文化程度、户口所在地、移动电话、照片.员工考勤表中设置了7个字段,分别为编号部门名称、姓名、工作证号、全勤、事假、病假。

员工信息表中共设置了10个字段,其中包括：工作证号、员工姓名、所属部门、到岗日期、职务、办公电话、政治面貌、合同有效期、工资、奖金.（3）连接数据库单击菜单“工程"，在部件对话框中，添加控件“Microsoft ADO Data Control 6。

0”，然后点击确定按钮,具体操作对话框如图2所示。

在窗体上添加Adodc数据控件，右击Adodc，在属性窗口中,首先选择“通用"选项卡,并选择“连接字符串”,单击“生成"按钮，如图3所示。

在“提供者”选项卡中，选择“Microsoft Jet 4.0 OLE DB Provider”，如图4所示。

单击“测试连接"按钮。

如果显示“测试连接成功"消息框，则表示连接成功,如图5所示。

图2添加“Microsoft ADO Data Control 6。

0”图图3 ADODC属性界面图4 添加“Microsoft Jet 4。

0 OLE DB Provider"图图5 测试连接成功图3。

详细设计3.1系统功能模块图图7 登陆界面图登陆界面窗体的控件如表6所示。

表6 登录窗体控件表控件类别控件Name 控件TextLabel Label1 用户名Label2 密码TextBox Text1 （空）Text2 （空）CommandButton Command1 确定Command2 退出Adodc Adodc1 （空）3。

1 概述：简单介绍本系统实现的内容用户登录通过权限判断，普通用户不能浏览、阅读和查询信息，指定用户可以操作，可以进行信息录入、修改和删除的操作。

系统的主要功能特点有:该表单的功能是在系统被访问之前，要对进入系统的用户进行安全性检查，防止非法用户进行系统破坏数据及威胁系统安全，避免不必要的损失。

只有合法的用户在输入正确的密码后方可进入系统。

用户在经过正确的登录后可进行—1)人事管理:包括部门信息和员工信息的查看,进行人员的调动,并查看各部门员工的福利待遇.2)考勤管理:进行日常出勤管理和加班出差的管理3)工资管理:可对各部门员工的工资进行登录和查询.4)打印:以条目或表格的形式对员工工资或员工信息进行输出预览.5)系统管理:登录用户可对系统进行管理包括增加用户,修改用户,删除用户和修改密码.值得一提的是登录用户进行修改时仅限自身,不可对别的用户进行修改操作.数据库设计：员工信息表：用户需要录入的员工信息表主要字段包括：员工编号、员工姓名、部门编号、性别、生日、住址、职位、出生地、联系电话。

加班信息表：包括：员工编号、加班日期、加班天数、加班补助。

工资福利表：包括：员工编号、岗位工资、基本工资、伙食补贴、住房补贴、住房公积金、养老保险、其他补贴、发放时间、加班补助、缺勤扣除、实发工资。

缺勤信息表：包括：员工编号、缺勤日期、缺勤天数、缺勤类型、缺勤扣除。

用户信息表：包括：用户名、用户密码、用户类型。

登录时间表：包括：用户名、用户类型、登录时间。

部门信息表：包括：部门编号、部门名称、部门人数、部门级别3 代码添加用户代码：在窗体中：ImportsPrivate Sub MenuItem20_Click(ByVal sender As , ByVal e As Handles ………..…..End Sub在窗体中：——————————————————————————————————————————————Public Class FrmXTGLPrivate MyTag As StringPrivate Username As StringPrivate Sub Button2_Click(ByVal sender As , ByVal e As HandlesDim connstr As New String("provider=;User ID=sa;PassWord=110;Persist Security Info=false;Initial Catalog=wage;Data Source=.;")Dim Cn As New OleDbConnectionDim cmd As OleDbCommandDim SQLString As StringIf…….End IfTryIf MyTag = 1 ThenSQLString = "INSERT INTO 用户信息表 (用户名,用户密码,用户类型)" & _" VALUES('" & & "', " & CInt & "," & _& ")"ElseIf MyTag = 2 ThenSQLString = "DELETE 用户信息表 WHERE 用户名='" & & "'" ElseIf MyTag = 3 ThenSQLString = "UpDate 用户信息表 SET 用户密码='" & & _ "',用户类型=" & & " WHERE 用户名='" & _& "'"ElseIf MyTag = 4 ThenIf = Username ThenSQLString = "UpDate 用户信息表 SET 用户密码='" & & _"' WHERE 用户名='" & & "'"Else……….Exit SubEnd IfEnd If= connstr()cmd = New OleDbCommand(SQLString, Cn)()Catch ex As ExceptionMsgBoxEnd Try()()= FalseGetUser()End Sub修改用户界面代码如下：在窗体中：'")Dim Cn As New OleDbConnectionDim cmd As OleDbCommandDim SQLString As StringEnd Sub在窗体中：“确定”按钮的Text属性变为“删除”，Label1的Visible属性设置为False不可见， TextBox1的Visible属性设置为False不可见，Label3的Visible属性设置为False不可见，ComboBox1的Visible属性设置为False 不可见，Label2的Visible属性设置为False不可见，TextBox2的Visible属性设置为False不可见Private Sub login_Load(ByVal sender As , ByVal e As HandlesGetUser()= False…….…….End IfEnd Sub在窗体中：Private Sub Button2_Click(ByVal sender As , ByVal e As HandlesDim connstr As New String("provider=;User ID=sa;PassWord=110;Persist Security Info=false;Initial Catalog=wage;Data Source=.;")Dim Cn As New OleDbConnectionDim cmd As OleDbCommandDim SQLString As StringIf = Username And MyTag = 2 ThenIf MsgBox("如果删除自己的账户，将不能在使用本系统。

V B人事管理系统员工管理系统VB人事管理系统/员工管理系统(送论文查重报告)本系统所使用的模块包括：系统模块，员工调动信息模块，员工考勤模块，员工基本信息模块等。

1、系统：系统启动的时候有一个管理员用户,使用这个用户登录后,可以添加其它用户,而且每一个用户都可以更改自己的密码。

2、员工基本信息添加员工信息:系统自动生成员工编号,管理员可以添加员工的基本信息,包括姓名、性别、籍贯、年龄、生日、住址、E-mail、学历、专业、进入本公司时间等。

修改员工信息：选择一个员工，可以修改这个员工的基本信息。

查询员工信息：可以根据员工的编号、姓名或者进入公司的时间进行查询员工基本信息。

并且可以针对查询结果进行修改和删除操作。

删除员工信息：直接从列表中选中需要删除的员工信息，然后进行删除操作，或者首先查询需要删除的员工信息，然后再删除。

3、员工考勤信息添加考勤信息:主要分为上下班信息和其他考勤信息.上下班信息主要记录每个员工每天上下班的时间,而其他考勤信息包含有请假、加班、出差信息。

修改考勤信息：当考勤信息出现错误需要修改的时候，可以从这里修改相应的记录。

查询考勤信息：分为删除上下班信息和删除其他考勤信息。

删除考勤信息：分为删除上下班信息和删除其他考勤信息。

设置上下班时间：设置公司上下班时间。

4、员工调动信息添加调动信息：添加企业员工的原有部门、原有职务、新部门、新职务等信息。

修改调动信息：修改相应的员工调动信息。

查询调动信息：查询某个员工的调动信息或者某段时间内企业内部的调动情况。

摘要：本文以企业管理信息系统建设中的人事管理子系统的开发为背景，论述了管理信息系统的概念、结构及系统开发的基本原理和方法，全文共分为序言、管理信息系统综述、开发方法、开发平台和工具、系统规划和分析、系统实现、系统运行及维护、系统评价、程序调试与故障处理、开发总结等九章。

本文首先阐述了Visual Basic 6.0的基本概念；然后详细说明了以数据库技术为技术背景的"人事管理管理系统"的基本功能及实现过程，最后重点介绍了软件的设计与实现详细阐述了系统分析、系统设计的技术及其应用。