第25章 使用VBA制作人事管理系统
基于VB的人力资源管理系统
基于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开发背景企业在我国的国民经济中具有重要的作用。
VB的人事工资管理系统
目录一、功能描述 (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图)-课程设计
VB人事管理系统(数据流程图+ER图)-课程设计1〃课程设计的目的人事管理系统是一个企事业单位不可缺少的部分,它的内容对于企事业单位的决策者和管理者来说都至关重要,所以人事管理系统应该能够为用户提供充足的信息和快捷的查询手段。
但一直以来人们使用传统人工的方式管理文件信息，这种管理方式存在着许多缺点,如:效率低、保密性差,另外时间一长,将产生大量的文件和数据,这对于查找、更新和维护都带来了不少的困难。
使用计算机对人事信息进行管理,具有着手工管理所无法比拟的优点.例如:检索迅速、查找方便、可靠性高、存储量大、保密性好、寿命长、成本低等。
因此有利于办公自动化的人事管理系统能够极大地提高人事管理的效率,也是企业进行科学化、正规化管理的手段。
2.设计方案论证2.1需求分析人事管理可以说是一项琐碎、繁杂而又必须十分细致的工作，是不能允许时常发生差错的。
几十年前的那种手工操作已远远跟不上近代企业发展的步骤，时代的进步决定了企业的发展，而企业要发展必然完善的管理体系，所以说企业人事管理的自动化完全是时代进步的必然结果。
合理的利用有助于企业发展的管理系统是企业改革的一种优越的体现。
利用计算机对企业人事管理不仅保证了核算准确度，还成倍的提高了工作效率，而且便于查询。
通过本人事管理数据库管理系统软件，能帮助人事管理人员利用计算机快速方便的对企业人事资源进行管理。
人事管理系统主要用于企业内部员工的档案、工资，便于公司领导掌握人员动向，及时调整人才的分配。
本软件集企业人员基本信息，企业人员劳工合同，及人才需求计划于一身，目的在于能够使管理人员更加方便，快捷的对企业人事进行管理。
同时本人事管理软件使人事管理工作系统化、规范化、自动化，从而在一方面提高了管理者的工作效率，减少了传统人工管理方式所带来的人力，物力的浪费，另一方面由于本软件具有查找方便、可靠性高、存储量大等优点，所以实现了企业人事管理的自动化。
人事管理系统针对企业员工信息的处理工作采用计算机进行全面的现代化管理，用户可以通过输入员工的基本信息、考勤信息等,由系统自动生成相应的统计数据及工资统计报表以供用户查询、打印,另外用户还可以对这些基本信息进行定期的更新与删除工作,人事管理系统力求以方便快捷的途径去管理职工的信息，代替手工操作的繁琐数据。
用VB制作一个人事管理系统
案例一用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）”按钮，生成该窗体。
VB人事管理系统
一、课程设计的目的与要求 (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之人事管理系统设计内容计算机科学与技术专业《数据库系统原理》课程设计报告题目人事管理作者于丹指导教师张娜关于数据库课程设计VB之人事管理系统设计内容目录一、设计并开发人事管理系统..............................1二、需求分析...................................................2三、概念设计...................................................4四、逻辑设计...................................................6五、具体设计...................................................8六、程序使用说明.............................................15七、小组分工及设计体会 (20)关于数据库课程设计VB之人事管理系统设计内容一直以来人们使用传统人工的方式管理员工档案，这种管理方式存在着许多缺点，譬如：效率低、保密性差，另外时间一长，将产生大量的文件和数据，这对于查找、更新和维护都带来了不少的困难。
随着科学技术的不断提高，计算机科学日渐成熟，其强大的功能已为人们深刻认识，它已进入人类社会的各个领域并发挥着越来越重要的作用。
人事管理信息系统的出现轻而易举的解决了传统管理人员档案的方法的缺点。
伴随着人事管理信息系统的广泛应用，它已经成为了任何一家企业公司都不可缺少的组成部分，它的存在使得管理者更容易了解自己公司的员工,便于分配人员,易于进行调整。
所以人事管理信息系统能够为管理人员提供充足的信息和快捷的查询手段。
二、需求分析人事管理系统题目要求：1、基本信息包括：（2）来本单位的日期及来自的单位；（3）职称及评定的时间和工资级别；（4）职工的奖惩登录；2、工资的确定：基本工资与职称和级别有关；职务补助、房补由职称决定；关于数据库课程设计VB之人事管理系统设计内容工龄津贴由工龄决定；洗理费由性别决定；另有每人奖金不同。
用VBA编制用户权限管理系统
管理员
具体的操作步骤如下： 步骤3：单击【更改用户权限】按钮，即可打开【更改用户权限】对话框，如图 14-108所示。在“请输入用户名”下拉列表中选择“SL04012”选项，此时在“ 用户名”和“当前用户级别”文本框中分别显示该用户的用户名和当前级别，如 图14-109所示。 步骤4：在“更改用户级别为”下拉列表中选择“高级用户”选项，单击【确定 】按钮，即可打开【用户权限更改成功】对话框，如图14-110所示。
创建“用户权限管理系统说明”和“用户权限”工作表
具体操作步骤如下： 步骤3：选择【填充】选项卡，在“背景色”栏中选择需要填充的颜色，如图143所示。单击【确定】按钮，即可看到设置后的单元格字体和填充效果，如图144所示。 步骤4：分别合并A2:A6、A7:A11、B2:I2、B3:I3、B4:I4、B5:I5、B6:I6 以及 B8:I10之间的单元格，合并后的效果如图14-5所示。
保护设计完成的用户权限管理系统
• 隐藏工程代码 • 锁定工程
锁定工程
具体的操作步骤如下： 步骤1：在【Microsoft Visual Basic for Application】主窗口可对工程进行保护， 在【Microsoft Visual Basic for Application】主窗口中选择“VBAProject（用户 权限管理系统）”工程，如图14-84所示。 步骤2：在右击弹出菜单中选择【VBAProject属性】菜单项，即可打开【VBA Project-工程属性】对话框，在【保护】选项卡“锁定工程”组合框勾选“查看 时锁定工程”复选项，在“查看工程属性的密码”组合框中的“密码”和“确认 密码”文本框输入相同的密码，这里输入的是123456，如图14-85所示。
专家课堂（常见问题与解答）
人事管理系统论文-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),在强调管理,强调信息的现代社会中它变的越来越普及。
而将信息管理系统与企业自动化设备想结合,则是当今社会现代企业的发展趋势。
VB课程设计人力资源管理系统最终版(1)
图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。
VB课程设计企业人事信息管理系统
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("如果删除自己的账户，将不能在使用本系统。
最新vb人事系统员工系统
V B人事管理系统员工管理系统VB人事管理系统/员工管理系统(送论文查重报告)本系统所使用的模块包括：系统模块，员工调动信息模块，员工考勤模块，员工基本信息模块等。
1、系统：系统启动的时候有一个管理员用户,使用这个用户登录后,可以添加其它用户,而且每一个用户都可以更改自己的密码。
2、员工基本信息添加员工信息:系统自动生成员工编号,管理员可以添加员工的基本信息,包括姓名、性别、籍贯、年龄、生日、住址、E-mail、学历、专业、进入本公司时间等。
修改员工信息：选择一个员工，可以修改这个员工的基本信息。
查询员工信息：可以根据员工的编号、姓名或者进入公司的时间进行查询员工基本信息。
并且可以针对查询结果进行修改和删除操作。
删除员工信息：直接从列表中选中需要删除的员工信息，然后进行删除操作，或者首先查询需要删除的员工信息，然后再删除。
3、员工考勤信息添加考勤信息:主要分为上下班信息和其他考勤信息.上下班信息主要记录每个员工每天上下班的时间,而其他考勤信息包含有请假、加班、出差信息。
修改考勤信息：当考勤信息出现错误需要修改的时候，可以从这里修改相应的记录。
查询考勤信息：分为删除上下班信息和删除其他考勤信息。
删除考勤信息：分为删除上下班信息和删除其他考勤信息。
设置上下班时间：设置公司上下班时间。
4、员工调动信息添加调动信息：添加企业员工的原有部门、原有职务、新部门、新职务等信息。
修改调动信息：修改相应的员工调动信息。
查询调动信息：查询某个员工的调动信息或者某段时间内企业内部的调动情况。
摘要：本文以企业管理信息系统建设中的人事管理子系统的开发为背景，论述了管理信息系统的概念、结构及系统开发的基本原理和方法，全文共分为序言、管理信息系统综述、开发方法、开发平台和工具、系统规划和分析、系统实现、系统运行及维护、系统评价、程序调试与故障处理、开发总结等九章。
本文首先阐述了Visual Basic 6.0的基本概念；然后详细说明了以数据库技术为技术背景的"人事管理管理系统"的基本功能及实现过程，最后重点介绍了软件的设计与实现详细阐述了系统分析、系统设计的技术及其应用。
第25章 使用VBA制作人事管理系统
➋ 在【开始】选项卡中，选择【对齐方式】选项组中的【顶端对齐】命令，并单击。 ➌ 输入界面标题文字“人事管理系统”。
第
章 使 用
制
作
人
事
管
25..3.3 绘制界面按钮
Private Sub object_BeforeUpdate(ByVal Cancel As MSForms.ReturnBoolean)
3. Click 事件 鼠标单击控件时触发 Click 事件，该事件的语法格式如下：
Private Sub object_Click()
25.2 设计ห้องสมุดไป่ตู้事管理表格
619
ComboBoxDuty.AddItem "总经理" ComboBoxDuty.AddItem "厂长" ComboBoxDuty.AddItem "主任" ComboBoxDuty.AddItem "科长" ComboBoxDuty.AddItem "组长"
➎ 单击【保存】按钮，即保存为工作簿“人事管理系统.xlsm”。 完成人事信息管理新增员工的主窗体设计，但没有后台代码的支持还是无法实现新增
员工的功能，需要进一步设计后台代码。
25.4.2 设计人事信息管理代码
在用户窗体创建完好各控件后，并设置好各控件属性时，就可以开始编写代码了。在 编写窗体的初始化代码，可首先添加复选框控件的下拉列表项目。 618
第 章 使 用
制 作 人 事 管 理 系 统
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
Private Sub object_Initialize()
格式中的 object 表示一个对象。 2. BeforeUpdate 事件
603
在控件中的数据要改变前，BeforeUpdate 事件触发。该事件的语法格式如下：
619
ComboBoxDuty.AddItem "总经理" ComboBoxDuty.AddItem "厂长" ComboBoxDuty.AddItem "主任" ComboBoxDuty.AddItem "科长" ComboBoxDuty.AddItem "组长"
第 章 使 ➍ 将鼠标移至工作表 Sheet1 的标签处并单击右键，在弹出的快捷菜单中选择【重命名】菜单命 用 令，将工作表 Sheet1 重命名为“员工基本信息表”。 制 作 人 事 管 理 系 统
➏ 单击【文件】选项卡，在弹出的列表中选择【保存】菜单命令，将工作簿保存为“人事管理 系统.xlsx”并保存。
614
25
VBA
在 Excel 应用中，字母和汉字是一样的 长度，但在很多程序设计时往往是一个汉 字占两个字母长度。 ➍ 重复本步的➊~➌，完成如下窗体建设。并将“民族”后的文本框【名称】属性设为“TextNation”、 “出生年月”后的文本框【名称】属性设为“TextBirth”、“身份证号”后的文本框【名称】 属性设为“TextID”、“工作部门”后的文本框【名称】属性设为“TextDep”、“联系方式”后 的文本框【名称】属性设为“TextPhone”和“备注”后的文本框【名称】属性设为“TextMemo”。
25.1 系统分析
人事管理系统虽然单位的大小可能不同，但功能大同小异，基本类似。在此以最常用 的应用功能为基础来设计人事管理系统，达到学习目的。
25.1.1 设计思路
第
人事管理系统主要是对员工资料进行管理。常用功能包括新增员工登记、查询和修改 章
员工资料，实例掌握本单位员工信息和员工信息更新的目的。
第 章 使 用
制 作 人 事 管 理 系 统
第 4 步：建立窗体选项按钮 ➊ 单击【工具箱】¾【控件】中的【选项按钮】 。
➋ 在窗体中紧接“性别”后绘制一个【选项按钮】，在左侧依次设置其【名称】属性设为 “OptionMan”、【AutoSize】属性设为“Ture”、【Caption】属性设为“男”、【GroupName】属 性设为“GroupSex”和【Value】属性设为“Ture”。
615
➌ 然后再同样绘制一个【选项按钮】，依次将其【名称】属性设为“OptionWoman”、【AutoSize】 属性设为“Ture”、【Caption】属性设为“女”、【GroupName】属性设为“GroupSex”和【Value】 属性设为“False”。
在设置【选项按钮】的【Value】属性 设为“Ture”表示选中状态，而【Value】 属性设为“False”表示未选中状态。 第 5 步：建立窗体复选框 ➊ 单击【工具箱】¾【控件】中的【复合框】按钮 。
25
Tips
复制【新增员工】按钮后，可在主窗 体中粘贴出一个按钮，将新复制的【新增 员工】按钮，改为【查询修改】，即可。
➎ 单击【文件】选项卡，在弹出的列表中选择【保存】菜单命令。 根据设计要求，完成登录窗体建设，并用来做为以后管理系统的主界面。
25.4 设计人事信息窗体
第
人事管理系统完成主界面设计后，接下来需要完成功能模块设计，主要是新增员工和 章
➋ 将工作表 Sheet2 并重命名为“登录界面”。
606
25
VBA
➌ 在【视图】选项卡中，选择【显示/隐藏】选项组中的【编辑栏】、【网格线】和【标题】三个 按钮前的复选项取消。
第 章 使 ➎ 在【插入】选项卡中，选择【插图】选项组中【形状】命令，并单击。在下拉菜单中选择【矩 用 形】¾【矩形】命令。 制 作 人 事 管 理 系 统
第 1 步：设计复选框的下拉列表项代码 ➊ 打开上节完成的工作簿“人事管理系统.xlsm”， 单击【开发工具】¾【Visual Basic】。
25
VBA
第
章 使 用
➋ 在 VBA 环境下，双击“新增员工资料”【用户窗体】打开代码窗口。并选择右侧的下拉箭头， 制
选择“Initialize”事件。
作
人
➏ 按鼠标左键直接拖曳绘出如下图形。
607
➐ 在所绘制的矩形区域内单击右键，在弹出的菜单中选择【设置形状格式】菜单命令。
➑ 打开【设置形状格式】对话框，选择【填充】¾【颜色】¾【深蓝，文字 2，淡色 80％】主 题颜色并单击，然后单击【关闭】按钮，关闭对话框。
➒ 完成主窗体的建设。
608
25
25..3.2 设置界面标题
➊ 主窗体完成的基础上，在【开始】选项卡中，选择【字体】选项组中将字体设置为“粗体”； 字体颜色设置为“黑色”；字体设置为“宋体（正文）”，字号设置为“18”。
➋ 在【开始】选项卡中，选择【对齐方式】选项组中的【顶端对齐】命令，并单击。 ➌ 输入界面标题文字“人事管理系统”。
第
章 使 用
制
作
人
事
管
25..3.3 绘制界面按钮
➎ 单击【保存】按钮，即保存为工作簿“人事管理系统.xlsm”。 完成人事信息管理新增员工的主窗体设计，但没有后台代码的支持还是无法实现新增
员工的功能，需要进一步设计后台代码。
25.4.2 设计人事信息管理代码
在用户窗体创建完好各控件后，并设置好各控件属性时，就可以开始编写代码了。在 编写窗体的初始化代码，可首先添加复选框控件的下拉列表项目。 618
➋ 在窗体的“学历”后绘制一个【复选框】，在左侧设置其【名称】属性设为“ComboBoxEdu”。 616
25
VBA
➌ 然后为“职称”和“职务”分别绘制两个【复选框】，并将其各自的【名称】属性分别设为
“ComboBoxTitle”和“ComboBoxDuty”。
第
章
使 用
制 作 人 事 管 理 系 统
VBA
611
打 开 Excel 工 作 表 ， 选 择 快 捷 键 【Alt+F11】进入 VBA 环境。 ➋ 进入 VBA 环境下，选择【插入】¾【用户窗体】菜单命令。
➌ 选择【名称】，并将属性设为“Form1”，同时将【Caption】的属性改为“新增员工资料”。
第 2 步：建立窗体标签 ➊ 单击【工具箱】¾【控件】中的【标签】按钮 。
第 6 步：建立窗体命令按钮 ➊ 单击【工具箱】¾【控件】中的【命令按钮】 。
➋ 在窗体的低端分别建立两个名称为“增加”和“取消”的按钮，并将其各自的【名称】属性 617
分别设为“CmdSave”和“CmdCancel”。
➌ 单击【保存】按钮，在弹出的窗口中选择“否”。
➍ 弹出窗口【另存为】¾【保存类型】中选择【Excel 启用宏的工作簿】命令。
使
用
25.1.2 关键技术：用户窗体的创建和控制
制
创建一个窗体，并在窗体上绘制控件用来接收用户的输入，或者显示相应的信息。向 作
窗体添加控件有以下几种方法：
人 事
⑴ 单击【工具箱】中的控件，然后在窗体单击，控件以默认大小出来，可以通过拖动 管
来改变其大小。
理 系
⑵ 将控件从【工具箱】中拖到窗体，控件同样以默认大小出来。
605
根据设计要求，完成表头建设即可，里面的数据通过以后在用户窗体来逐步添加。
25.3 设计登录窗体
人事管理系统最重要的常用功能是新增员工和查询修改，设计登录窗体时主要体现这 两个功能。
根据设计要求，可以设计为登录界面，步骤如下。
25..3.1 主窗体建设
➊ 打开上节创建的 Excel 工作簿“人事管理系统.xlsx”，将鼠标移至工作表 Sheet2 的标签处并 单击右键，在弹出的快捷菜单中选择【重命名】菜单命令。
Private Sub object_BeforeUpdate(ByVal Cancel As MSForms.ReturnBoolean)
3. Click 事件 鼠标单击控件时触发 Click 事件，该事件的语法格式如下：
Private Sub object_Click()
25.2 设计人事管理表格
➋ 从 A2 单元格到 L2 单元格依次输入“编号”、“姓名”、“性别”、“民族”、“出生年月”、“学历”、 “身份证号”、“职称”、“职务”、“工作部门”、“联系方式”和“备注”文本。
604
25
VBA
➌ 选中 A1:L1 区域，在【开始】选项卡中，选择【对齐方式】选项组中的【合并后居中】按钮， 并单击。
第 25 章 使用 VBA 制作人事管 理系统
本章引言
人事管理系统是企事业单位在人事管理的主要内容之一。通过掌握人 员基本信息，加强和规范自身管理行为，造就和培养一支高素质的员工队 伍，促进单位的稳定和健康发展。本章主要讲解人事管理系统的制作方法 和制作技巧。
25
VBA
人事管理系统是企事业单元的一个重要应用，包括聘用、培训、考核和晋升等多个方 面，在对人事管理时，需要查询大量的信息，人事管理系统就可以解决这个问题。本章以 VBA 在人事资料管理的应用为例讲解。
人事管理系统最重要的一个环节是保存员工基本信息的员工基本信息表，首先设计员 工基本信息表，用来在管理系统中调用。
根据设计要求，本系统的功能要求比较简单常用，表格格式简单，使用前设置好表头 即可，用户不用直接操作此表，所有操作都通过用户窗体完成。 ➊ 打开 Excel 2010，单击 A1 单元格，输入“员工基本信息表”。