人力资源信息管理系统论文

《人力资源信息管理系统论文》由会员分享，可在线阅读，更多相关《人力资源信息管理系统论文（32页珍藏版）》请在装配图网上搜索。

1、双鱼林的所有程序大都是免费提供的啊，只是朋友如果对程序不太懂我可以提供技术服务，另外，此系统是我在网上收集的,免费发布给大家哈!双鱼林主要开发ASP,VB系统,还有delphi,jsp系统等,有什么问题可以和我联系啊!真实姓名：汪建林生日: 1985年2月26日 星座: 双鱼座 血型: OQQ: 287307421 手机: 13558690869Email: wangjianlin1985126 淘宝店： :/shop34864101.taobao 更多商品请到拍拍店： :/287307421.paipai 摘 要随着现代企业制度的建立以及社会经济的高速发展，企业人力资源已成为左右企业生存发展

2、的重要因素，加强人力资源的有效管理和运作已成为企业提高竞争力的重要手段。本文主要研究如何开发企业人力资源管理系统，解释了开发人力资源管理系统的必要性和重要性,采用Visual Basic.NET 和SQL Server 2000软件作为开发工具,通过对计算机硬件和软件解决方案的论证,对应用领域进行调查分析,参考许多资料，在指导老师的帮助下,详细分析了人力资源管理系统的几个主要设计阶段:需求分析、概要设计和详细设计,同时给出了系统实现的具体思想方案,并列举了实际工程中的实例创建过程、方法和效果。本系统实现了企业机构编制管理、职员信息管理、薪资福利管理和系统管理等功能。关键词:人力资源管理系统 系

3、统 数据 信息摘 要Title： HRMS-Human Resources Management System Abstract：With the establishment of modern enterprise information system and high-speed development of society economy, the enterprise human resources has more and more become the significant factor which has dominated the subsistence and develo

4、pment of the enterprise, thus the enhancement of the effective management and operation of enterprise human resources has become an essential means to improve the competition of the enterprise.The text major study how to develop Human Resource Manage System ,explains the necessity and essentiality o

5、f developing Human Resource Management System .Adopt Visual Basic.NET and SQL Server 2000 software for develop tool ,with the demonstrate to solution of hardware and software, the investigation to application field ,refer to manage material, under the teachers help ,It analyses several primary desig

6、n steps of the Human Resource Management System ,such as the requirement analysis ,general analysis and particular analysis .At the same time ,it lists the Systems material ideas and schemes ,and some created process ,method and result.The design implements Enterprise Organization Management , Offic

7、e Worker Information Management , Salary Welfare Management and System Management etc.Key Words: Human Resource Management System , system, data, information目 录1 绪论51.1 课题背景51.2 课题开发的意义51.3 本文研究目标的内容62 需求分析72.1 系统需求72.2 功能需求72.3 数据需求72.4 性能需求72.4.1 硬件环境72.4.2 软件环境73 系统平台83.1 SQL Sever2000简介83.2 Visu

8、al Basic.NET简介84 总体设计94.1 基本设计思想及系统处理流程94.1.1 模块功能的设计94.1.2 系统处理流程94.2 数据库设计104.2.1 数据表的设计104.2.2 数据表的外部关键字124.2.3 存储过程的设计135 系统详细设计145.1 主控制模块145.2创建数据访问模块165.3登录模块185.4 机构编制管理195.4.1 机构设置及编码195.4.2 机构详细信息215.5 职员信息管理235.5.1 职员信息维护235.5.2 职员信息查询265.6 帮助276 系统维护和改进286.1 运行维护286.2 系统的改进与提高28总结29致谢30参

9、考文献311 绪论1.1 课题背景21世纪,高新技术的超速发展和全球化的市场经济导致企业之间的竞争空前激烈,但归根结底是人才的竞争,谁能有效地管理和开发人力资源,谁就能掌握知识经济时代的生产力，几乎所有的企业管理者都意识到人力资源是企业最重要最宝贵的资源。然而,如何开发和管理人力资源,使其转化为一种现实的劳动生产力,则是众多管理者的盲点。看似简单的人力资源管理,其实蕴涵了极为丰富的内涵。通过对人力资源的规划、招聘、考核、培训、激励等一系列的手段,充分挖掘员工的潜力,提高他们对企业的认同感和责任感.只有这样,才能使企业拥有不断创新的活力,保证其在研发、生产、营销等各方面的领先地位,最终赢得市场的

10、认可。随着人力资源部门工作范围的日益扩展,人力资源经理专业要求的日益提升,使得计算机等先进技术手段的作用日益显现。因此,开发人力资源管理系统(HRMS-HumanResourceManagementSystem)是非常有必要的,它不仅能够完成日常繁琐的业务,而且可以准确及时地搜集各种人力资源信息以供管理者进行决策。1.2 课题开发的意义人力资源管理系统是以先进的软件和高速、大容量的硬件为基础的，新的人力资源管理模式，通过集中式的信息库、自动处理信息、员工自助服务、外协以及服务共享，达到降低成本、提高效率、改进员工服务模式的目的。它通过与企业现有的网络技术相联系，保证人力资源与日新月异的技术环境

11、同步发展。一般来说，可以分四个部分来理解人力资源管理系统：（1）管理人员角色和目标的改变传统的人力资源管理中，管理人员的绝大部分精力将耗费在繁琐的日常行政事务处理上，而作为企业管理层的参谋角色应该做的咨询和策略制定的工作相对缺乏。通过人力资源管理人员将可以将绝大部分精力放在为管理层提供咨询、建议上，而在行政事务上的工作可以由电子化系统完成，只需占用管理人员极少的精力和时间。（2）提供更好的服务人力资源管理系统可以迅速、有效地收集各种信息，加强内部的信息沟通。各种用户可以直接从系统中获得自己的需的各种信息，并根据相关信息做出决策和相应的行动方案。（3）降低成本人力资源管理系统通过减少人力资源管理

12、工作的操作成本、降低员工流动率、减少通讯费用等途径达到降低企业运作成本的目的。（4）革新管理理念人力资源管理系统的最终目的是达到革新企业的管理理念而不仅仅是改进管理方式、优化人力资源管理。先进技术应用于人力资源管理时，并不仅仅是为了将现有的人力资源工作做得更好，更重要的是，做些对于企业来讲更有效率的事情，成为管理层的决策支持者，为决策提供信息和解决方案。1.3 本文研究目标的内容基于以上分析，本文开发的人力资源管理系统目标：(1)实现信息处理的准确、快捷和顺畅。(2)可随时掌握企业机构部门信息、员工的基本信息、奖惩记录、工资发放 状况，轻松计算当月工资。(3)系统操作简单易行，可多条件查询，灵

13、活方便。(4)通过该系统的实施，可逐步提高管理水平。(5)系统维护方便可靠，有较高的安全性，满足实用性的需求。本文使用SQL Server2000和Visual Basic.NET语言平台具体作了如下工作：(1)建立为系统提供数据的数据库，创建数据表及存储过程。(2)创建窗体、为窗体添加代码。(3)系统测试，打包发布。2 需求分析2.1 系统需求（1）建立机构编制管理，利用计算机实现机构的管理，部门的添加、更改与删除。（2）建立职员信息管理，实现计算机化的人事管理体制。（3）建立薪资福利管理，完成计算机自动化薪资福利管理体制。2.2 功能需求人力资源管理系统完成的任务虽然随着企业的不同而有所差

14、异,但对其任务进行归纳和划分后可将系统分为几个共同的功能需求模块,人力资源管理系统主要功能需求为下列六大部分,每个部分具体的功能需求如下：(1) 机构编制管理部分：可以进行设置、修改、删除、查看企业的组织机构信息。 (2) 职员信息管理部分：可以进行增加、修改、删除、查询企业的职员各种信息。(3) 薪资福利管理部分：可以进行职员工资的计算、发放、查询；奖惩信息的增加、删除、修改。2.3 数据需求在分析了人力资源系统的基本功能需求以后,根据每类具体的功能,分析实现该功能所需要的数据。按照数据库的设计思想,数据是以记录的形式存储在数据库中,因此系统的数据需求分析实际上就是分析系统所需要的数据库表。

15、包括用户清单、权限清单、组织机构编码表、职员基本信息表、月工资统计表、个人的所得税表、工资发放历史表、职员奖励表、职员惩罚表共9张表单。2.4 性能需求系统的运行对计算机软硬件配置的要求。2.4.1 硬件环境（1）处理器：Intel Pentium 166M或更高。（2）内存：256MB（建议）。（3）硬盘：1GB或更大。2.4.2 软件环境（1）操作系统：Windows2000/XP。（2）软件：.NET framework;Visual Basic.NET。（3）数据库：SQL Server2000。3 系统平台3.1 SQL Sever2000简介Microsoft SQL Server

16、 2000中文版是基于客户端/服务器模式(Client/Server模式，简称C/S模式)的新一代大型关系型数据库管理系统（DataBase Management System，简称DBMS），它在电子商务、数据仓库和数据库解决方案等应用中起着重要的核心作用，可为企业的数据管理提供强大的支持，对数据库中的数据提供有效的管理，并采用有效的措施实现数据的完整性及数据的安全性。3.2 Visual Basic.NET简介Visual Studio.NET 中的Visual Basic.NET是Microsoft公司推出的全新32位Windows开发工具。Visual Basic.NET 不仅继承了V

17、isual Basic 6.0的使用简便、功能强大、效率高等特点，而且Visual Basic.NET提供了一流的面向对象的程序设计语言特性，诸如实现继承、重载和参数化的构造器。此外，开发人员可以通过显示式的自由线程编写具有高度可伸缩性的代码，同时通过其他现代化的语言概念，如结构化的异常处理等，编写具有较高可维护性的代码。Visual Basic.NET将为开发人员提供创建强壮、可伸缩的分布式Web应用所需要的所有语言特性，因此是目前最为优秀的应用系统开发工具之一。4 总体设计4.1 基本设计思想及系统处理流程4.1.1 模块功能的设计基于以上分析，本文开发的企业人力资源管理系统，分为六大功能

18、模块：用户登录模块、机构编制管理模块、人员信息管理模块、薪资福利管理模块、系统管理模块、帮助系统，其功能分别为：（1）用户登录模块：提供用户登录界面。输入用户名称，填写正确的密码，进入系统主窗体。（2）构编制管理模块：用于设置企业的组织机构及其详细信息，新增部门，同时还可以编辑、删除、修改已有部门信息，以及根据部门层次设置建立一个部门树结构，使上下级关系在这里一览无余，其中包括机构设置及编码、机构详细信息两个子模块分别进行处理。（3）人员信息管理模块：用于管理和添加、浏览、修改以及删除企业员工的相关信息，其中包括职员信息维护、职员信息查询两个子功能模块：职员信息维护子模块用于输入和修改职员的资

19、料，职员信息查询子功能模块用于查询职员的资料。（4）薪资福利管理模块：用于管理企业薪资和福利计算的全过程,其中包括企业的薪资和福利设定、自动计算社会保险等代扣代缴项目,而且还可以根据公司的政策设置并计算由年假、事假、病假等带薪假以及迟到、早退、旷工等形成的对薪资和福利的扣减,还能存储完备的历史信息以供查询,其中包括当月工资管理、个人所得税率、发放工资历史、职员奖励管理、职员惩罚管理五个子功能模块。（5）系统管理模块：包含权限管理和退出系统两个子模块，其中权限管理用于设置各操作员使用系统的权限，提高系统保密性和安全性，退出系统即结束人力资源管理系统的运行和使用。（6）帮助系统：主要是向用户介绍系

20、统运行环境、使用方法。这样,不仅减少了人力资源管理人员使用困难,也较好的保证了使用质量工作速度。包含关于和帮助主题两个子模块。4.1.2 系统处理流程本系统基本的处理流程是：用户登录-主界面-选择各项子系统。整个系统流程图如图4-1所示：人力资源管理系统双击上一行的“1”“2”试试，J(本行不会被打印，请自行删除)显示登录界面用户名和密码正确No显示系统主窗体 Yes 帮助系统管理薪资福利管理人员信息管理机构编制管理理退出系统图4-1 人力资源管理系统流程图4.2 数据库设计创建数据库名为hrmbook，开发本系统共需要9张表，其中组织机构编码表和职员基本信息表是该系统的关键表，用于存放基础的

21、数据信息，其他涉及组织机构信息和职员信息的数据表，都只记录机构或职员的编号，根据作为外键的编号字段和组织机构编码表或职员基本信息表相对应，因此，这两张表和其他数据表间的关系是1：N的关系，其他各表均与这两张表通过“单位编号”或“职员编号”字段进行多对一的关联。4.2.1 数据表的设计系统数据表及其用途说明见表4.2，数据表结构见表4.3-4.4，数据表创建代码见附录：表4-2 系统数据表及其用途数据表名称 数据表用途 数据来源用户清单 保存系统使用者的信息 在数据库中增加记录组织机构编码表 用于保存企业组织机构的详细信息 机构编制管理模块职员基本信息表 用于保存企业员工的基本信息 职员信息管理

22、模块月工资统计表 用于保存、计算当月的员工工资 当月工资计算模块个人所得税表 用于保存个人所得税的税率数据 个人所得税率模块工资发放历史表 用于保存所有月份工资发放的历史 工资发放历史模块职员奖励表 用于保存员工的奖励情况 职员奖励管理模块职员惩罚表 用于保存员工的惩罚情况 职员惩罚管理模块权限清单 保存系统使用都的权限信息，可指定菜单级权限权限管理模块（2）名称：组织机构编码表（见表4-3）表4-3组织机构编码表名 称 类 型 宽度 主 键 非 空内部编号 Int 4 No Yes类 别 Varchar 100 No NoAbsIndex Int 4 No NoItemIndex Int 4

23、 No NoItemLever Int 4 No NoParentIndex Int 4 No No类 别 号 Char 10 No No单位编号 Varchar 20 Yes Yes单位名称 Varchar100 No No拼音编码 Varchar50 No No单位地址 Varchar100 No No单位 Varchar50 No No开户银行 Varchar 100 NoNo帐 号 Varchar 50 NoNo开户全称 Varchar 100 NoNo (4) 职员基本信息表（见表4-4）表4-4职员基本信息表名 称 类 型 宽度 主 键 非 空内部编号 Int 4 No Yes职员

24、编号 Varchar30 Yes Yes姓 名 Varchar 20 No Yes姓名简码 Varchar 10 No No性 别 Varchar2 No No出生日期 Int 4 No No年 龄 Int 4 No No籍 贯 Varchar50 No No民 族 Varchar20 No No文化程度 Varchar50 No No毕业学校 Varchar20 No No健康状况 Varchar100 No No婚姻状况 Varchar50 No No身份证号 Varchar10 No No家庭 Varchar 18 No No办公 Varchar 50 No No手 机 Varchar

25、50 No No电子邮箱 Varchaar 50 No No职工帐号 Varchar 20 No No备 注 Varchar 100 No No4.2.2 数据表的外部关键字为系统创建4个外部关键字FK_月工资统计表_职员基本信息表、FK_工资发放历史表_职员基本信息表、FK_职员奖励表_职员基本信息表、FK_职员惩罚表_职员基本信息表，用于将月工资统计表、工资发放历史表、职员奖励表、职员惩罚表与职员基本信息表通过“ 职员编号”字段进行多对一的关联。其中主要代码如下，因为其他于此雷同，这里就不在赘述。ALTER TABLE dbo.月工资统计表 ADD CONSTRAINT FK_月工资统计表

26、_职员基本信息表 FOREIGN KEY (职员编号) REFERENCES dbo.职员基本信息表 (职员编号)GO4.2.3 存储过程的设计为系统设计了四个存储过程，分别实现从历史导入工资明细，计算当月工资和工资发放的功能。这些存储过程都在“当月工资管理”模块中使用。5 系统详细设计5.1 主控制模块（1）功能简介：主控制平台使用简单直观的布局，它主要实现对模块的调用和显示，提供了菜单和按钮两种操作方式，利用系统默认生成的窗体作为主窗体，文件名frmMain.vb，为其添加一个主菜单（MainMenu）控件。（2）主控制模块功能树如图5-1所示。人力资源管理系统帮助系统管理薪资福利管理人员

27、信息管理机构编制管理理 图5-1 人力资源管理系统功能树（3）窗体部分属性设置如表5-2所示。表5-2 主窗体属性设置控件名 属性 取值frmMain Name frmMainfrmMain Text 人力资源管理系统frmMain IsMdiContainer TruefrmMain WindowState MaximizedfrmMain StartPosition CenterScreenStatusBar Text 欢迎使用本系统！（4） 在主菜单控件上单击鼠标左键进入菜单编辑模式，设置如表5-3所示。表5-3主窗体属性设置菜单栏 菜单项 属性 取值MenuItemDep Text 机

28、构编制管理（&X） MenuItemDepManage Text 机构设置及编码（&A）MenuItemDepInfo Text 机构详细信息（&B）MenuItemPeople Text 职员信息管理(&Y)MenuItemPeopleManage Text 职员信息维护(&AMenuItemPeopleQuery Text 职员信息查询(&B)MenuItemSalary Text 薪资福利管理（&Z）MenuItemSalaryManage Text 当月工资计算(&A)MenuItemTaxInfo Text 个人所得税率(&B)MenuItemSalaryHis Text 工资发放历

29、史(&C)MenuItemPrize Text 职员奖励管理(&D)MenuItemPunish Text 职员惩罚管理（&E）MenuItemSystem Text 系统管理(&PMenuItemManageRight Text 权限管理(&A)MenuItemQuit Text 退出系统（&Q）MenuItemHelp Text 帮助（&H）MenuItemHelp1 Text 关于（&A）MenuItemHelp2 Text 帮助主题（&H）（5）编写代码。通过触发并调用GETINSTANCESTATE函数显示各个子窗体,GetInstanceState函数主要代码如下：Private

30、Function GetInstanceState(ByVal name As String) As Boolean 获得frmMain窗体的子窗体的数量 Dim i As Integer = Me.MdiChildren.Length 循环判断是否有名为name的子窗体实例 For i = 0 To Me.MdiChildren.Length - 1 If Me.MdiChildren(i).Name = name Then 存在名为name的子窗体，是子窗体获得焦点并返回True Me.MdiChildren(i).Focus() Return True End If Next 不存在名为

31、Name的子窗体False Return False End Function（6）主窗体模块的窗体设计效果如图5-4所示：图5-4 主控制模块效果图5.2创建数据访问模块因为各个窗体均需要对数据库进行访问，因此可以把对数据库的一些操作通过一个类来实现，这样可以使对数据库的访问更加简单。因此创建类Database,编写代码使每个窗体可以通过调用此类来打开数据库，并对通过其对数据库中数据实现进行查询、删除等功能。具体代码如下：Public Class DataBase 实现接口IDisposable Implements IDisposable 数据库连接对象 Private SqlConn A

32、s SqlConnection Public Shared sConn As String = Persist Security Info=False;Integrated Security=SSPI;database=hrmbook;server=(local);Connect Timeout=30 Public Sub Dispose() Implements System.IDisposable.Dispose Dispose(True) GC.SuppressFinalize(True) End Sub Protected Sub Dispose(ByVal disposing As

33、Boolean) If disposing True Then Return End If If SqlConn Is Nothing = False Then SqlConn.Dispose() SqlConn = Nothing End If End Sub Public Sub Open() If SqlConn Is Nothing = True Then 建立数据库连接对象 SqlConn = New SqlConnection(Me.sConn) 打开数据库连接 SqlConn.Open() End If End Sub Public Sub Close() 如果数据库连接对象不为

34、空则关闭数据库连接 If SqlConn Is Nothing = False Then SqlConn.Close() End If End Sub Public Function RunSelectSQL(ByVal sSQLString As System.String) As DataView Me.Open() Dim SqlDS As DataSet = New DataSet Dim SqlDA As SqlDataAdapter = New SqlDataAdapter(sSQLString, Me.SqlConn) SqlDA.Fill(SqlDS) Return SqlDS

35、.Tables(0).DefaultView End Function Public Function RunDelOrInsSQL(ByVal sSQLString As System.String) Me.Open() Dim SqlComm As SqlCommand = New SqlCommand(sSQLString, Me.SqlConn) SqlComm.ExecuteNonQuery() End FunctionEnd Class5.3登录模块系统的管理应考虑安全性，于是本系统设计了登录模块用以控制合法用户进入主控平台。用户登录窗体启动后，等待用户输入用户号和密码，根据登录的

36、用户号在系统用户清单表中查找相应记录并自动添加用户名，然后系统检查密码的正确性，是系统合法授权用户，允许进入系统，否则无法进入退出系统。主要代码如下：Private Sub txbUserId_LostFocus(ByVal sender As Object, _ ByVal e As System.EventArgs) Handles txbUserId.LostFocus 定义一个数据访问类的对象 Dim db As DataBase = New DataBase 根据输入的用户ID进行查询 Dim dv As DataView = _ db.RunSelectSQL _ (select

37、密码,姓名 from 用户清单 where 用户编号 = _ + Me.txbUserId.Text.Trim() + ) 判断用户ID是否存在 If dv.Count = 0 Then 用户ID不存在 Me.txbUserId.Text = Me.txbPwd.Text = Me.txbName.Text = Else 用户ID存在 UserId = Me.txbUserId.Text.Trim() 获得用户的密码级用户名 Me.UserPwd = dv.Item(0)(密码) Me.txbName.Text = dv.Item(0)(姓名) End If 释放数据访问类的占用资源 db.D

38、ispose()（3） 登录窗体效果如图5-5所示。图5-5 登录模块效果图5.4 机构编制管理对于大型企业、集团公司等用户，组织机构往往非常复杂，总公司下属可能有多级子公司，子公司下又设置有各种部门，因此需要机构编制管理可以灵活的定义这些层次和属性，同时对应机构的编码可以根据所从属的上级机构自动生成。机构编制管理模块用于设置企业的组织机构，其中包括机构设置及编码，机构详细信息两个子功能模块，如图5-6所示。机构设置及编码机构编制管理 机构详细信息图5-6 机构编制管理功能模块图5.4.1 机构设置及编码机构设置及编码子模块用于生成企业组织机构的层次关系和编码，在这个模块中建立起组织的管理结构

39、，上下级关系在这里一览无余，而个人信息会与这个组织架构连接起来。机构设置及编码模块实现的四个主要功能包括：显示、增加、修改、删除机构，机构合成编码会根据所从属的部门机构自动生成，并且保存修改后其设置将返回到组织机构编码表中。当触发frmDepManage窗体事件后会调用方法InitTree，用树形显示数据库中存在的各个机构及其从属机构关系。具体代码如下：InitTree是用递归方法初始化TreeView控件的节点 Private Sub InitTree(ByRef nodes As TreeNodeCollection, _ ByVal sParentIndex As String) Try

40、 Dim tmpNode As TreeNode Dim absIndex As String Dim dvTemp As DataView = dvList.Table.DefaultView 选出数据源中ParentIndex为sParentIndex数据行 Dim dataRows() As DataRow = _ dvList.Table.Select(ParentIndex = + sParentIndex + ) 循环添加TreeNode For Each dr As DataRow In dataRows 获得节点所需数据 tmpNode = New TreeNode tmpNo

41、de.Text = dr(类别) 用TreeNode的Tag属性保存与此节点相关的数据 tmpNode.Tag = CType(New TreeNodeData(dr(AbsIndex), _ dr(ItemIndex), dr(ItemLevel), _ dr(ParentIndex), dr(类别号), dr(单位编号), Object) absIndex = dr(AbsIndex) 添加节点 nodes.Add(tmpNode) 递归调用 InitTree(nodes(nodes.Count - 1).Nodes, absIndex) Next Catch ex As Exceptio

42、n MessageBox.Show(初始化TreeView失败) End Try End Sub管理原可通过按键方式调用相应的触发函数来实现对机构的增加、删除、修改等功能。机构设置及编码模块的窗体效果如图5-7所示。图5-7 机构设置及编码窗休设计效果图5.4.2 机构详细信息机构详细信息子模块用于管理对应组织机构的详细信息，显示企业所有机构部门地址、 、账号等信息。机构详细信息模块实现的二个主要功能包括：显示、修改机构的信息，不能删除，其所列单位信息都是在组织机构编码表中的记录，只能在机构设置及编码中增加部门，在这里不能新增部门信息，操作完成后按保存按钮其值将返回到组织机构编码表。主要代码如

43、下：Private Sub frmDepInfo_Load(ByVal sender As Object, _ ByVal e As System.EventArgs) Handles MyBase.Load Dim dt As DataTable dt = DataSet11.Tables(组织机构编码表) 定义一个DataGrid表样式 Dim ts As New DataGridTableStyle Dim aColumnTextColumn As DataGridTextBoxColumn Dim numCols As Integer = dt.Columns.Count Dim i

44、As Integer 不显示单位编号 For i = 0 To numCols - 2 aColumnTextColumn = New DataGridTextBoxColumn aColumnTextColumn.MappingName = _ dt.Columns(i).ColumnName If i = 0 Then aColumnTextColumn.HeaderText = 单位名称 Else aColumnTextColumn.HeaderText = _ dt.Columns(i).ColumnName End If aColumnTextColumn.NullText = ts

45、.GridColumnStyles.Add(aColumnTextColumn) Next 隔行灰白显示 ts.AlternatingBackColor = Color.LightGray ts.AllowSorting = False dgdDepInfo.TableStyles.Add(ts) SqlConnection1.ConnectionString = DataBase.sConn SqlDataAdapter1.Fill(DataSet11, 组织机构编码表) 设置dgdDepInfo的数据源 ts.MappingName = dt.TableName dt.DefaultVie

46、w.AllowDelete = False dt.DefaultView.AllowNew = False dgdDepInfo.DataSource = dt.DefaultView End Sub机构详细信息模块的窗体效果如图5-8所示。图5-8机构详细信息窗体设计效果图5.5 职员信息管理人员信息管理模块用于管理和查询企业员工的相关信息，其中包括子功能模块如图5-9所示。职员信息维护人员信息管理职员信息查询图5-9职员信息管理功能模块图5.5.1 职员信息维护职员信息维护子模块用于输入和修改职员的姓名、性别、年龄、籍贯、文化程度、毕业院校、婚姻状况、家庭 、办公 、单位编号等资料。职员信

47、息维护模块实现的四个主要功能包括：显示、增加、修改、删除职员信息。其数据来源是职员基本信息表，操作后值返回职员基本信息表。（1）绑定数据至相应控件从工具箱中拖动一个SqlDataAdapter对象到窗体上，连接hrmbook数据，添加职员基本信息表并选择职员基本信息表的所有字段，如图5-10所示。在SqlDataAdapter1对象上右击，在弹出的快捷菜单中选择“生成数据”命令，在“生成数据集”对话框中单击“确定”按钮，如图5-11所示。为TextBox控件以及ComboBox控件设置数据源：在控件上右击弹出快快捷菜单中单击“属性”命令，在“属性”设计器中对TextBox的属性DataBind

48、ings与Text进行数据绑定，如图5-12所示。图5-10 查询生成器窗口图5-11 生成数据集对话框图5-12 数据绑定（2）编写代码。通过SQL语句及自定义方法SetDataGrid将数据库中职员信息表在DataGrid（代码与frmDepInfo_Load中代码基本一致）显示出来。 编写代码使得按键响应相应事件，使得修改的数据保存或者删除数据，具体代码如下：Private Sub ToolBar1_ButtonClick(ByVal sender As System.Object, _ ByVal e As System.Windows.Forms.ToolBarButtonClick

49、EventArgs) _ Handles ToolBar1.ButtonClick If e.Button Is tbbSave Then Dim row As Integer row = dgdPeopleInfo.CurrentCell.RowNumber dgdPeopleInfo.CurrentCell = New DataGridCell(row + 1, 0) Try If DataSet11.HasChanges Then 通过SqlDataAdapter1更新数据库数据 SqlDataAdapter1.Update(DataSet11) DataSet11.Tables(职员基

50、本信息表). _ DefaultView.RowFilter = dgdPeopleInfo.CurrentCell = New DataGridCell(row, 0) MessageBox.Show(数据修改成功!) Else dgdPeopleInfo.CurrentCell = New DataGridCell(row, 0) MessageBox.Show(无修改的数据!) End If Catch ex As Exception MessageBox.Show(修改的数据出错) End Try ElseIf e.Button Is tbbDel Then Try 获得DataGrid当前被选中的行号 Dim iRow