软件工程课程设计人力资源管理系统样本.doc

课程设计（论文）任务书
学 院
理 学 院
专 业
信息与计算科学
学生姓名

班级学号

课程名称
软件工程课程设计
课 程 设 计
（论文）题目
人力资源管理系统
设计规定（技术参数）：
（1） 以人力资源管理系统为例，设计软件设计开发基本环节
（2） 描述系统可行性、需求、概要设计和详细设计基本过程
（3） 设计任务：人力资源管理系统
（1） 掌握软件设计和开发基本环节和办法
（2） 以系统为研究对象，设计系统E-R图、系统构造图、程序流程图
（3） 设计顾客登录管理、人事信息管理、员工调动管理和工资管理
（4） 研究系统可行性、需求分析、概要设计和详细设计
（5） 撰写设计报告
筹划与进度安排：
（1） 第一周 教师解说题目内容、任务和论文规定，学生查阅资料，提出设计方案
（2） 第一周 周五——第二周周五（包括周六周日）完毕设计，得出结论
（3） 第二周 周六教师审查设计报告，合格者参加答辩
成绩：
指引教师（签字）：
年 月 日
专业负责人（签字）：

年 月 日
主管院长（签字）

年 月 日

摘 要
随着经济全球一体化时代到来，公司发展不再是仅限于技术竞争，市场竞争，更重要是人才竞争。公司在发展过程中，除了要维护好和客户关系，掌握先进行业生产技术以外，还需要拥有一批本领域中具备相称才干工作人员，才干在信息时代经济浪潮中立于不败之地。人力资源管理系统是当代公司公司管理核心内容。随着计算机信息技术高速发展，电子商务模式空前盛行，公司之间竞争也从有形经济市场转向了网络。以计算机技术、网络技术、信息技术支持当代人力资源管理系统，既能提高公司人力资源管理技术含量和公司办事效率，也能使人力资源管理进入当代化、决策科学化进程。通过人力资源管理系统使得管理者迅速高效地完毕公司寻常事务中人事工作，减少了人力资源管理成本，使管理者能集中精力在公司战略目的；另一方面，通过软件及时收集与整顿分析大量人力资源管理数据，为公司战略决策生成与实行控制提供强有力支持，以提高组织目的实现也许性。
人事管理系统是典型信息管理系统 ,使用了 MICROSOFT公司 VISUAL BASIC开发工具,一方面在短时间内建立系统应用原型,然后,对初始原型系统进行需求迭代,形成可行系统。本系统采用SQL Server 开发和管理数据库，它功能强大、直观易于操作、建立表以便，具备强大错误解决功能。本文人力资源管理系统重要内容有：顾客登录管理、人事信息管理、员工调动管理和薪酬管理等。

核心词：人力资源管理； 数据库； 员工调动管理； 薪酬管理

目 录

1 概述 1
2 可行性研究 2
2.1技术可行性 2
2.1.1本系统技术规定如下 2
2.1.2开发工具 2
2.2操作可行性 3
3 需求分析 3
4 概要设计 5
4.1系统构造图 5
4.2数据库设计 6
4.2.1数据库设计过程 6
4.2.2人力资源管理数据库设计 7
4.3数据库概念模型设计 13
5详细设计 15
5.1 顾客登录模块 15
5.2 主界面设计 19
5.3人事信息管理设计 20
5.4员工调动管理设计 24
5.5薪酬管理设计 27
总结 29
参照文献 29

1 概述
公司在国内国民经济方面起到非常大作用，在满足人们多样化需求、培养公司家、进行技术创新、参加专业协作等方面都具备重要作用。公司在一定限度上影响地区乃至整个国家经济繁华和社会稳定。然而公司人员众多，职位繁杂，管理起来很麻烦，始终以来人们使用老式人工方式管理文献档案，这种管理方式存在着许多缺陷,如:效率低、保密性差,此外时间一长,将产生大量文献和数据,这对于查找、更新和维护都带来了不少困难。由于当今公司发展速度飞快，对各个环节规定都非常之高，从生产各个环节，进货、施工、运营、到后期销售，等等都需要诸多人力和物力、进货中需要有采购部门，采购部门又需要分派诸多小部门，施工运营更是需要人力最多部门，各个圣生产线当中各环节，紧密相扣，缺一不可，尚有后期销售，良好生产和采购，最后目都是为了给生产出来产品找个好销路，因此各部门人才更是需要较好管理与策划。这样一来，就需要人力资源部门对人力规划做很周密细致工作，这种工作工作量相称巨大，因此说，就需要一种很完善人力资源管理系统来协助人力资源管理人员，这样不但可以减轻管理人员承担，更可以把繁重体力劳动转化为脑力劳动，用于多思考管理公司办法。管理公司人力资源需要诸多方面，员工需要考勤、培训、还需要参看自己某些信息、公司领导更需要对员工进行管理，这样一来，更需要系统有个比较完善功进而需要开发一种人力资源管理系统。本系统设计重要是解决人力资源管理信息化、智能化、便捷化，提高了人力资源管理工作人员工作效率，减少由于人力资源管理过于繁琐和因而导致人才流失所带来损失，同步也给公司发展带来一定经济效益。
随着科学技术不断提高,计算机科学日渐成熟,其强大功能已为人们深刻结识,它已进入人类社会各个领域并发挥着越来越重要作用。 作为计算机应用一某些,使用计算机对人事信息进行管理,具备手工管理所无法比拟长处.例如:检索迅速、查找以便、可靠性高、存储量大、保密性好、寿命长、成本低等。这些长处可以极大地提高人事管理效率,也是公司科正规化管理,与世界接轨重要条件。
2 可行性研究
开发任何一种基于计算机系统，都会受届时间和资源上限制。因而，在接受项目开发任务之前，必要依照客户提供时间和资源条件进行可行性分析，以减少项目开发风险，避免人力、物力和财力挥霍。可行性分析与风险分析在诸多方面是互有关联，项目风险越大，开发高质量软件可行性就越小。
2.1技术可行性
开发一种中小型公司人力资源管理系统，涉及到技术问题不会太多，重要用到技术就是数据库和一门可视化开发编程语言。在这方面，数据库重要是用来存储数据，就当前主流数据库来看，可以考虑采用Microsoft SQL Server数据库系统，在前台开发编程方面，采用Microsoft公司Visual Basic 6.0中文版作为开发工具。
2.1.1本系统技术规定如下
功能：对人事资料、系统管理、工资管理、阮元调动等进行综合管理。
输入/输出：输入查询条件，输出查询内容。
基本数据流程和解决流程：先对人员信息进行录入，然后再对它们分类。可以对数据进行插入、删除、修改、查询。
2.1.2开发工具
以上系统技术规定使用VB 和SQL Server可以满足，SQL Server可觉得各种顾客提供完整数据库应用解决方案。除了其关系型系统内核之外，它分布式查询解决、强大触发器功能、以便数据发布等特点，使它布满着将来数据库技术气息。
SQL Server 是一种关系数据库管理系统,它最初是由Microsoft、Sybase 和Ashton-Tate三家公司共同开发。于1988 年推出了第一种OS/2 版本，在Windows NT 推出后，Microsoft与Sybase 在SQL Server 开发上就分道扬镳了，Microsoft 将SQL Server 移植到Windows NT系统上专注于开发推广SQL Server Windows NT 版本。Sybase 则较专注于SQL Server在UNIX 操作系统上应用。在本系统中使用是Microsoft SQL Server 。
SQL Server 继承了SQL Server 7.0 版本长处同步又比它增长了许多更先进功能，具备使用以便、可伸缩性好、与有关软件集成限度高等长处，可跨越从运营Microsoft Windows 98 膝上型电脑到运营Microsoft Windows 大型多解决器服务器等各种平台使用
微软Visual Basic 6.0是Windows应用程序开发工具，是当前最为广泛、易学易用面向对象开发工具。Visual Basic提供了大量控件，这些控件可用于设计界面和实现各种功能，减少了编程人员工作量，也简化了界面设计过程，从而有效提高了应用程序运营效率和可靠性。故而，实现本系统VB是一种相对较好选取。
Visual Basic应用程序基本构建块是顾客所创立对象，每一种对象都具备某些特性和行为（属性、事件和 办法）。开发人员可以最有效运用所创立每一种对象。使用应用程序具备可通用性可说扩展性和强有力功能。Visual Basic应用由一系列对象构成，涉及有函数、菜单、函数、构造和数据窗口、顾客对象、顾客事件等等，对象中又包括若干控件如命令按钮、单行编辑器等这些对象和控件都可在许多应用中重复使用。运用动态数据互换技术，使VB开发应用程序能与其她Windows应用程序进行动态数据通信。通过动态链接库技术，能在VB开发应用程序中调用其她程序设计语言编写程序，也可调用Windows系统应用程序接口函数。使用对象链接和嵌入技术，可以把其她Windows应用程序作为对象，在VB开发应用程序中对它进行各种操作，使用它所提供功能。
2.2操作可行性
该系统在操作上很简朴，使用者完全可以没有专业计算机知识。启动系统后进入登陆顾客界面，顾客用自己登陆名和密码进入系统操作页面。不同顾客拥有不同顾客名及密码。顾客可以对信息进行浏览、删除、修改、添加等操作。
3 需求分析
需求分析是介于系统分析阶段和软件设计阶段之间重要桥梁。一方面，需求分析以系统规格阐明和项目规划作为分析活动基本出发点，并从软件角度对它们进行检查与调节；另一方面，需求规格阐明又是软件设计、实现测试直至维护重要基本。良好分析活动有助于避免或尽早发现初期错误，从而提高软件生产率，减少开发成本，改进软件质量。
该系统分为4个模块：顾客管理模块、人事信息管理模块、员工调动管理模块和薪酬管理模块。
顾客登管理模块：该模块是对登陆该系统顾客顾客名及密码进行管理。
分为顾客登录和注册新顾客两项。不同顾客拥有不同权限。
人事信息管理模块：该模块是关于公司人事信息维护，一方面是对入职工工基本信息录入、修改、浏览等操作；另一方面是员工人事档案、合同档案等基本信息管理和公司部门管理；最后，并对公司人事信息从工种，专业，学历等属性进行记录分析。
员工调动管理模块：该模块是对员工职位调动进行管理，员工调动重要分为内部调动和外部调动两方面，内部调动为本都市中部门间调动，外部调动为分公司间调动。本模块尚有登记新员工和复职、离职等信息管理。
薪酬管理模块：重要涉及薪酬登记、薪酬修改、薪酬查询薪酬设立4某些构成。其中，薪酬登记是完毕对员工薪酬添加，如果有需要改正某些，通过薪酬修改模块来实现，系统还提供应员工查询薪酬功能，通过薪酬查询来实现。

4 概要设计
4.1系统构造图及系统流程图
人力资源管理系统
顾客管理
注册新顾客

顾客登录
人事信息管理
基本资料管理

合同管理
工种类型管理
职务类型管理

部门管理
职称类型管理
薪酬管理

考勤管理
薪酬设立
奖励项目设立
惩罚项目设立

工资设立
员工调动管理
离职信息管理
复职信息管理
内部调动管理
外部调动管理
薪酬查询管理
薪酬修改管理
薪酬登记管理
员工奖励管理
员工惩罚管理
新员工登记管理
协助

协助

退出

图1 系统构造图

开始
顾客登录
进入主窗体
失败超过3次
拥有权限
退出系统
管理模块
退出系统

图2 系统流程图
4.2数据库设计
4.2.1数据库设计过程
当前设计数据库重要采用是以逻辑数据库设计和物理数据库设计为核心规范设计办法。其中逻辑数据库是依照顾客规定和特定数据库管理系统详细特点，以数据库设计理论为根据，设计数据库全局逻辑构造和每个顾客局部逻辑构造。物理数据库设计是在逻辑构造拟定之后，设计数据库存储构造及其她实现细节。各种规范设计办法在设计环节上存在差别，各有不同。普通分为如下六个阶段：
(1)需求分析阶段：
进行数据库设计一方面必要精确理解与分析顾客需要（涉及数据与解决）。需求分析是整个设计过程基本，需求分析与否充分与精确，决定整个数据库构建速度与质量。
(2)概念构造设计阶段：
概念设计是整个数据库设计核心，她通过对顾客需求进行综合，归纳与抽象，形成一种独立于详细DBMS概念模型。
(3)逻辑构造设计阶段：
逻辑构造设计是将概念构造转换为某个DBMS所支持数据模型，并对其进行优化。
(4)数据库物理设计阶段：
数据库物理设计是为逻辑数据模型选用一种最适合应用环境物理构造（涉及存储构造和存取办法）。
(5)数据库实行阶段：
在数据库实行阶段，设计人员运用DBMS提供数据语言及其宿主语言，依照逻辑设计和物理设计成果建立数据库，编制与调试应用程序，组织数据录入，并进行试运营。
(6)数据库运营和维护阶段：
数据库系统通过试运营后，即可投入正式运营。在数据库运营过程中必要不断地对其进行评价、调节与修改。
4.2.2人力资源管理数据库设计
新建一种数据库：
创立任何一种数据库第一步是仔细规划数据库，设计必要是灵活、有逻辑。创立一种数据库构造过程被以为是数据模型设计。
本系统采用 SQL Server数据库为数据库开发工具，建立一种数据库---人力资源管理，其中涉及各种表，并为之定义了相应关系以适应本系统所需功能。下面简介各表。
（一）系统各重要表重要功能及设计办法
(1)部门总信息表：部门表重要用于保存部门信息。
由于系统需要对部门进行添加、删除、修改、查询等操作，因此必要要有一种表，用于存储各个部门名称、其上级主管部门，部门描述等信息，给这个表取名为：部门表。其中部门编号设立为主键，不容许为为空，其她字段都可觉得空。详细设计如下：
表1 部门总信息表
字段名
数据类型
长度
容许空
部门编号
Varchar
12

本级编号
Varchar
2
√
部门名称
Varchar
20
√
部门全称
Varchar
200
√
部门主管
Varchar
10
√
部门地址
Varchar
50
√
部门电话
Varchar
30
√
编码级次
int
20
√
（2）各部门信息表：用于存储公司各部门职位信息
由于公司需要对各部门中职位分派进行总规划及管理，需要建立各部门信息表，用于存储当前公司各部门均有什么职位及在职人员名单。需要每个部门都建立一张表，信息类别基本相似。取名为***信息表。以产品部为例，涉及主管、组长、程序员三个职位。信息表取名为产品部信息表。部门编号设立为主键，不容许为空，其她字段可觉得空。详细设计如下：
表2 产品部信息表
列名
数据类型
长度
容许空
部门编号
Bigint
8

主管
Varchar
15
√
组长
Varchar
5
√
程序员
Varchar
5
√
(3)员工信息表：员工信息表重要用于保存员工基本信息。
由于系统需要对员工进行管理，其中涉及对员工添加、删除、修改员工基本信息，查询员工状况，因此需要有一种员工信息表，给这个表取名为：员工信息表。用于存储每个员工姓名等基本信息，其中涉及诸多字段，编号设立为主键，不容许为空，其她字段都可觉得空。详细设计如下：
表3 员工信息表
列名
数据类型
长度
容许空
编号
Varchar
5

姓名
Varchar
10
√
性别
Varchar
2
√
身份证号
Varchar
20
√
婚姻状况
Varchar
4
√
参加工作时间
Datetime
8
√
部门
Varchar
200
√
工种
Varchar
20
√
基本工资
Money
8
√
调入时间
Datetime
8
√
本单位工龄
Int
4
√
简历
Text
16
√
登记人
Varchar
30
√
登记日期
Datetime
8
√
(4)考勤登记表：考勤登记表重要用于保存员工考勤时刻信息。
公司考勤规定非常严格仔细，公司要对员工进行考勤，因此规定系统能有培训管理模块，因而本系统考勤管理做也是本系统亮点之一。考勤管理模块需要对员工考勤进行严格计算，因而必要创立一种表，用于存储员工考勤状况，给这个表取名为：考勤登记表。其中涉及诸多字段：员工编号、所属工资月份、员工姓名、出勤天数、请假天数、迟到或早退天数、旷工天数、加班次数。员工编号设立为主键，不容许为空，其她字段都可觉得空。详细设计如下：

表5 考勤表
列名
数据类型
长度
容许空
员工编号
Varchar
5

所属工资月份
Varchar
15
√
员工姓名
Varchar
10
√
出勤天数
Varchar
10
√
请假天数
Varchar
10
√
迟到或早退天数
Varchar
10
√
旷工天数
Varchar
10
√
加班次数
Varchar
10
√
(5)薪酬列表：薪酬列表重要用于保存各个员工薪酬信息。
公司考勤做仔细，也是更好为员工薪金发放服务，由于系统需要对员工进行薪金发放操作，因此必要要有一种表，用于存储各个员工薪水状况，给这个表取名为：薪酬表。ID设立为主键，不容许为为空，其她字段都可觉得空。
表6 薪酬表
列名
数据类型
长度
容许空
ID
Bigint
8

所属工资月份
Varchar
15
√
员工编号
Varchar
5
√
基本工资
Money
8
√
奖励总额
Money
8
√
惩罚总额
Money
8
√
保险费
Money
8
√
应发工资
Money
8
√
应扣工资
Money
8
√
实发工资
Money
8
√

（6）离职表：用于存储员工离职信息
公司对于离职人员信息需要进行统一管理，便于公司日后安排及职位及时调动，不至于浮现职位空置活人员冗余等问题。其中涉及跟多字段，编号设立为主键，不容许为空，其她字段可觉得空。详细设计如下：
表7 离职表
字段名
数据类型
长度
容许空
编号
Varchar
5

姓名
Varchar
10
√
部门
Varchar
200
√
登记人
Varchar
30
√
登记日期
datetime
8
√
离职时间
datetime
8
√
离职登记日期
datetime
8
√
离职登记人
Varchar
30
√
与否复职
bit
1
√
复职时间
datetime
8
√
复职登记日期
datetime
8
√
复职登记人
Varchar
30
√
（7）合同表：用于存储员工合同信息
公司对于进入我司每个员工都要订立就业合同，即劳动合同。公司对于职工合同信息进行统一管理，其中包括许多字段，合同编号设立为主键，员工编号为外码，不容许为空，其她字段可觉得空。详细设计如下：

表8 合同表
列名
数据类型
长度
容许空
合同编号
Varchar
15

员工编号
Varchar
5

合同类型
Varchar
20
√
合同开始日期
Datetime
8
√
合同结束日期
Datetime
8
√
合同期限
Varchar
10
√
合同期工资
Money
8
√
试用期
Varchar
10
√
试用期工资
Money
8
√
备注
Text
16
√
状态
Varchar
4
√
（二）简介其她表重要功能
人事调动表：用于存储员工调动信息；
合同类型表：用于设立合同类型；
员工奖励表：用于存储员工奖励信息；
员工惩罚表：用于存储员工惩罚信息；
奖励项目表：用于存储关于奖励项目信息；
工种表：用于存储工种类型；
工资公式表：用于存储各项基本工资详细金额；
惩罚项目表：用于存储关于惩罚项目信息；
文化程序表：用于存储员工文化程序类型；
月份表：用于存储月份信息；
权限信息表：用于存储操作员有关权限、密码信息；
民族表：用于存储员工民族类型信息；
离职表：用于存储员工离职信息；
考勤表：用于存储考勤信息；
职务表：用于存储员工职务类型；
职称表：用于存储员工职称类型；
聘任类型表：用于存储员工聘任类型；
聘任表：用于存储员工聘任信息；
权限表：用于存储权限信息。
4.3数据库概念模型设计
在需求分析基本上设计出可以满足顾客需求各种实体以及它们之间关系。下面例举出各实体实体图及实体关系E-R图：
1 员工：编号、姓名、性别、身份证号……
编号
姓名
身份证号
员 工
性别
……

图3 员工实体图

2合同：合同编号、员工编号、合同类型、合同开始日期、合同期限……

合同编号
员工编号
合同开始日期
合 同
合同类型
合同期限
……

图4 合同实体图

3 考勤：所属工资月份、员工编号、出勤天数、请假天数、迟到或早退次数……

所属工资月份
员工编号
请假天数
考 勤
出勤天数
迟到或早退次数
……

图5考勤实体图

4工资：所属工资月份、员工编号、员工姓名、出勤天数……

所属工资月份
员工编号
出勤天数
薪酬
……
员工姓名

图6 工资实体图

5操作员：名称、密码、权限
名称

权限
用　户
密码

图7 操作员实体图

6员工－合同实体关系图

员工

签定

合同类型

合同

图8员工－合同实体关系图
7与工资关于实体关系E-R图
减少
奖励工资
实发工资
惩罚总额

添加
领取

员工

图9与工资关于实体关系E-R图

5详细设计
5.1 顾客登录模块
顾客登录界面是本系统第一种界面，其中两个文本框用来输入顾客名和密码。通过顾客名、密码来核对顾客身份。如果输入顾客名和密码错误，会弹出提示框提示顾客名或密码错误。当输入顾客名和密码3次错误时，会自动退出系统。只有输入对的顾客名和密码才干进入管理系统。登入窗体如图所示

图10 登录窗体
重要实当代码如下：
Private Sub Command3_Click()
reg.Show
Me.Hide
End Sub
Private Sub Command1_Click()
Dim sqlstr As String
sqlstr = "select * from password where username= '" & Text1 & "'"
Adodc1.RecordSource = sqlstr
Adodc1.Refresh
If Adodc1.Recordset.BOF Then
MsgBox "顾客名错误，重新输入"，vbExclamation，"警告"
Text1.Text = ""
Text1.SetFocus
Else
If Adodc1.Recordset.Fields("password") = Text2 Then
frmMain.Show
Unload Me
Else
MsgBox "密码错误，重新输入"，vbExclamation，"警告"
Text2.Text = ""
Text2.SetFocus
End If
End If
micount = micount + 1
If micount = 3 Then Unload Me
End Sub
Private Sub Command2_Click()
Unload Me
End Sub
点击注册新顾客，浮现注册新顾客界面，可以进行新顾客添加。

图11 注册新顾客
实当代码如下：
Private Sub Command1_Click()
Dim sqlstr As String
If Text1 = "" Then
MsgBox "请输入顾客名!"，vbExclamation，"确认密码"
Text1.SetFocus
Exit Sub
Else
sqlstr = "select * from password where username='" & Text1 & " ' "
Adodc1.RecordSource = sqlstr
Adodc1.Refresh
If Adodc1.Recordset.EOF = False Then
MsgBox "顾客已存在,请重新输入!"，vbExclamation，"检查顾客名"
Text1 = ""
Text1.SetFocus
Exit Sub
End If
End If
If Text2 <> Text3 Then
MsgBox "二次输入密码不一致,请重新输入"，vbExclamation，"检查密码"
Text2 = ""：Text3 = ""
Text2.SetFocus
Exit Sub
ElseIf Text2 = "" Then
MsgBox "密码不能为空!"，vbExclamation，"检查密码"
Text2.SetFocus
Else
Adodc1.Recordset.AddNew
Adodc1.Recordset.Fields("username") = Trim(Text1)
Adodc1.Recordset.Fields("password") = Trim(Text2)
Adodc1.Recordset.Update
Me.Hide
MsgBox "成功注册新顾客!"，vbInformation，"添加顾客"
End If
End Sub
5.2 主界面设计
主界面是应用程序主体，也是应用程序门面，它设计好坏将直接影响顾客第一感觉，如果主界面设计得很糟糕，则无论应用程序其她某些设计得多么细致，顾客都不能或不乐意使用它。因此，在设计主界面时应保持界面简洁性和明确性。人力资源管理系统主界面便遵循了这一原则，其运营成果如图所示。

图12 主界面
实当代码如下：
Private Sub Toolbar1_ButtonClick(ByVal Button As MSComctlLib.Button)
Select Case Button.Key
Case "tbnAddClient"
mnuAddClient_Click
Case "tbnExit"
mnuExit_Click
Case "tbnSearchClient"
mnuSearchClient_Click
Case "tbnWarnSetting"
mnuWarnSetting_Click
Case "tbnWarn"
mnuShowWarn_Click
Case "tbnReport"
mnuReport_Click
Case "tbnCooperate"
munCoop_Click
Case "tbnNewly"
mnuNewly_Click
Me.Hide
End Select
End Sub
5.3人事信息管理设计
人事信息管理重要完毕人事信息增长、修改、删除、查找等功能。为了以便顾客操作，系统将增长、修改与删除、查找功能分别放在两个不同窗体中，完毕浏览、查找、删除、和打开“人事信息添加”或“人事信息修改”窗体；
包括基本资料管理、合同管理、工种类型管理、职务类型管理、部门管理、职称类型管理等。

图13 人事信息管理窗体
打开人事信息管理查询选项，填写填写相应信息进行查询，如下图：可以批量查询，导出excel表格等操作。
点击查找弹出如下对话框，填写信息进行查找。

图14 人事信息查找窗体
打开人事信息管理下基本信息管理选项，进行基本资料添加、修改、删除等操作。

图15 基本资料浏览窗体
上图可以进行浏览、添加、删除、修改等操作。如点击添加按钮弹出添加顾客对话框，将信息填写完整单击拟定按钮完毕添加。详细操作如下图：

单击完毕添加

图16 基本资料添加窗体

将窗体中数据导出至Excel中代码实现
Private Sub Toolbar1_ButtonClick(ByVal Button As MSComctlLib.Button)
Select Case Button.Key
Case "excel"
Dim r As Integer，c As Integer
Dim newxls As Excel.Application
Dim newbook As Excel.Workbook
Dim newsheet As Excel.Worksheet
Set newxls = CreateObject("Excel.Application")
'创立excel应用程序,打开excel
Set newbook = newxls.Workbooks.Add '创立工作簿
Set newsheet = newbook.Worksheets(1)　 '创立工作表
If Adodc1.Recordset.RecordCount > 0 Then
newxls.Visible = True
For i = 0 To DataGrid1.Columns.Count - 1
newsheet.Cells(1，i + 1) = DataGrid1.Columns(i).Caption
Next i '指定表格内容
Adodc1.Recordset.MoveFirst
Do Until Adodc1.Recordset.EOF
r = Adodc1.Recordset.AbsolutePosition
For c = 0 To DataGrid1.Columns.Count - 1
newsheet.Cells(r + 1，c + 1) = DataGrid1.Columns(c)
Next c
Adodc1.Recordset.MoveNext
Loop
End If
End Select
End Sub
5.4员工调动管理设计
员工调动模块实现了员工在部门及公司之间调动、工种、职务、职称调动和员工信息查找等功能。其设计思路与人事信息管理模块基本相似。其中一种窗体重要用于浏览、查找和打开“添加调动信息”窗体（子窗体）；子窗体则用于保存人员调动信息。
员工调动模块中运营成果如图17所示。

图17 员工调动窗体
打开员工调动管理下内部调动，弹出如下对话框。将内容填写完整点击拟定完毕信息添加。
单击完毕添加

图18 添加内部调动信息窗体

外部调动

图19 添加外部调动信息窗体
而将添加调动信息窗体中新修改／添加员工调动信息添加到数据库并体当前员工调动窗体里代码如下：
Private Sub Command1_Click()
Cnn.Execute (" update 人事表 set 部门= '" + Txt1 + "',工种='" + DataCombo1 + "',职务='" + DataCombo2 + "',职称='" + DataCombo3 + "'where 编号='" + main_rsgl_rsbd.Text1(0) + "'")
With main_rsgl_rsbd
Cnn.Execute ("insert into 人事调动表 (职工编号,职工姓名,原部门,现部门,原工种,原职务,原职称,现工种,现职务,现职称,调动时间,登记人)values('" +.Text1(0) + "','" + .Text1(1) + "','" + .Text1(2) + "','" + Txt1 + "','" + .Text1(3) + "','" + .Text1(4) + "','" + .Text1(5) + "','" + DataCombo1 + "','" + DataCombo2 + "','" + DataCombo3 + "','" + str(Date) + "','" + czy + "')")
.Adodc1.Refresh
End With
End Sub
5.5薪酬管理设计

若想对工资信息进行添加，一方面应 “建立新月份工资”。当添加了新月份后，再选取工资信息管理选项时，将会显示新建立月份工资状况。
工资信息管理模块重要用于完毕员工工资信息修改、批量修改，显示当前月份或所有月份员工工资信息、查找和导出Excel等功能。为了以便顾客操作，系统将修改、批量修改与显示当前月份或所有月份员工工资信息、查找和导出Excel功能分别放在不同子窗体中。其中父窗体重要完毕浏览、查找、显示当前月份或所有月份员工工资信息，导出Excel和打开“工资信息修改”窗体（子窗体）、“批量修改”窗体（子窗体）；运营成果如图所示。

图20 薪酬窗体

图21 工资信息修改窗体

图22 批量修改窗体

在工资信息修改窗体中，当修改了某一项工资金额，点击“计算”后，会重新计算员工实发工资，“计算”按钮代码为：
Private Sub Command3_Click()
Text1(14) = Val(Text1(3)) + Val(Text1(4)) + Val(Text1(5)) + Val(Text1(6)) + Val(Text1(7)) + Val(Text1(8)) + Val(Text1(9))
Text1(15) = Val(Text1(10)) + Val(Text1(11)) + Val(Text1(12)) + Val(Text1(13))
Text1(16) = Val(Text1(14)) - Val(Text1(15))
End Sub
总结
本次课程设计到当前已经结束了，通过这次课程设计，我学到了多东西，也发现了自己诸多局限性。这个过程当中，是咱们运用学习成果，检查学习成果，运用学习成果过程，把课堂上学到系统花知识，尝试性应用于时机设计工作中。从理论高度对设计