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

1 双鱼林的所有程序大都是免费提供的啊 只是朋友如果对程序不太懂我 可以提供技术服务 另外 此系统是我在网上收集的 免费发布给大家 哈 双鱼林主要开发 ASP VB 系统 还有 delphi jsp 系统等 有什么问题 可以和我联系啊 真实姓名 汪建林 生日 1985 年 2 月 26 日 星座 双鱼座 血型 O QQ 287307421 手机Email wangjianlin1985 淘宝店 更多商品请到拍拍店 2 摘摘 要要 随着现代企业制度的建立以及社会经济的高速发展 企业人力资源已成为左右 企业生存发展的重要因素 加强人力资源的有效管理和运作已成为企业提高竞争力 的重要手段 本文主要研究如何开发企业人力资源管理系统 解释了开发人力资源管理系统 的必要性和重要性 采用 Visual Basic NET 和 SQL Server 2000 软件作为开发工具 通 过对计算机硬件和软件解决方案的论证 对应用领域进行调查分析 参考许多资料 在指导老师的帮助下 详细分析了人力资源管理系统的几个主要设计阶段 需求分析 概要设计和详细设计 同时给出了系统实现的具体思想方案 并列举了实际工程中的 实例创建过程 方法和效果 本系统实现了企业机构编制管理 职员信息管理 薪资福利管理和系统管理等 功能 关键词 人力资源管理系统 系统 数据 信息 3 摘摘 要要 TitleTitle HRMS Human Resources Management System AbstractAbstract 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 development 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 of 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 teacher s help It analyses several primary design steps of the Human Resource Management System such as the requirement analysis general analysis and particular analysis At the same time it lists the System s material ideas and schemes and some created process method and result The design implements Enterprise Organization Management Office Worker Information Management Salary Welfare Management and System Management etc KeyKey WordsWords Human Resource Management System system data information 4 目 录 1 绪论 5 1 1 课题背景 5 1 2 课题开发的意义 5 1 3 本文研究目标的内容 6 2 需求分析 7 2 1 系统需求 7 2 2 功能需求 7 2 3 数据需求 7 2 4 性能需求 7 2 4 1 硬件环境 7 2 4 2 软件环境 7 3 系统平台 8 3 1 SQL SEVER2000 简介 8 3 2 VISUAL BASIC NET 简介 8 4 总体设计 9 4 1 基本设计思想及系统处理流程 9 4 1 1 模块功能的设计 9 4 1 2 系统处理流程 9 4 2 数据库设计 10 4 2 1 数据表的设计 10 4 2 2 数据表的外部关键字 12 4 2 3 存储过程的设计 13 5 系统详细设计 14 5 1 主控制模块 14 5 2 创建数据访问模块 16 5 3 登录模块 18 5 4 机构编制管理 19 5 4 1 机构设置及编码 19 5 4 2 机构详细信息 21 5 5 职员信息管理 23 5 5 5 1 职员信息维护 23 5 5 2 职员信息查询 26 5 6 帮助 27 6 系统维护和改进 28 6 1 运行维护 28 6 2 系统的改进与提高 28 总结 29 致谢 30 参考文献 31 6 1 绪论 1 1 课题背景 21 世纪 高新技术的超速发展和全球化的市场经济导致企业之间的竞争空前激 烈 但归根结底是人才的竞争 谁能有效地管理和开发人力资源 谁就能掌握知识经济 时代的生产力 几乎所有的企业管理者都意识到人力资源是企业最重要最宝贵的资 源 然而 如何开发和管理人力资源 使其转化为一种现实的劳动生产力 则是众多管 理者的盲点 看似简单的人力资源管理 其实蕴涵了极为丰富的内涵 通过对人力资 源的规划 招聘 考核 培训 激励等一系列的手段 充分挖掘员工的潜力 提高他 们对企业的认同感和责任感 只有这样 才能使企业拥有不断创新的活力 保证其在研 发 生产 营销等各方面的领先地位 最终赢得市场的认可 随着人力资源部门工作 范围的日益扩展 人力资源经理专业要求的日益提升 使得计算机等先进技术手段的 作用日益显现 因此 开发人力资源管理系统 HRMS HumanResourceManagementSystem 是非常有必要的 它不仅能够完成日常繁琐的业务 而 且可以准确及时地搜集各种人力资源信息以供管理者进行决策 1 2 课题开发的意义 人力资源管理系统是以先进的软件和高速 大容量的硬件为基础的 新的人力 资源管理模式 通过集中式的信息库 自动处理信息 员工自助服务 外协以及服 务共享 达到降低成本 提高效率 改进员工服务模式的目的 它通过与企业现有 的网络技术相联系 保证人力资源与日新月异的技术环境同步发展 一般来说 可 以分四个部分来理解人力资源管理系统 1 管理人员角色和目标的改变 传统的人力资源管理中 管理人员的绝大部分精力将耗费在繁琐的日常行政事 务处理上 而作为企业管理层的参谋角色应该做的咨询和策略制定的工作相对缺乏 通过人力资源管理人员将可以将绝大部分精力放在为管理层提供咨询 建议上 而 在行政事务上的工作可以由电子化系统完成 只需占用管理人员极少的精力和时间 2 提供更好的服务 7 人力资源管理系统可以迅速 有效地收集各种信息 加强内部的信息沟通 各 种用户可以直接从系统中获得自己的需的各种信息 并根据相关信息做出决策和相 应的行动方案 3 降低成本 人力资源管理系统通过减少人力资源管理工作的操作成本 降低员工流动率 减少通讯费用等途径达到降低企业运作成本的目的 4 革新管理理念 人力资源管理系统的最终目的是达到革新企业的管理理念而不仅仅是改进管理 方式 优化人力资源管理 先进技术应用于人力资源管理时 并不仅仅是为了将现 有的人力资源工作做得更好 更重要的是 做些对于企业来讲更有效率的事情 成 为管理层的决策支持者 为决策提供信息和解决方案 1 3 本文研究目标的内容 基于以上分析 本文开发的人力资源管理系统目标 1 实现信息处理的准确 快捷和顺畅 2 可随时掌握企业机构部门信息 员工的基本信息 奖惩记录 工资发放 状况 轻松计算当月工资 3 系统操作简单易行 可多条件查询 灵活方便 4 通过该系统的实施 可逐步提高管理水平 5 系统维护方便可靠 有较高的安全性 满足实用性的需求 本文使用 SQL Server2000 和 Visual Basic NET 语言平台具体作了如下工作 1 建立为系统提供数据的数据库 创建数据表及存储过程 2 创建窗体 为窗体添加代码 3 系统测试 打包发布 8 2 需求分析 2 1 系统需求 1 建立机构编制管理 利用计算机实现机构的管理 部门的添加 更改与删除 2 建立职员信息管理 实现计算机化的人事管理体制 3 建立薪资福利管理 完成计算机自动化薪资福利管理体制 2 2 功能需求 人力资源管理系统完成的任务虽然随着企业的不同而有所差异 但对其任务进行 归纳和划分后可将系统分为几个共同的功能需求模块 人力资源管理系统主要功能需 求为下列六大部分 每个部分具体的功能需求如下 1 机构编制管理部分 可以进行设置 修改 删除 查看企业的组织机构信息 2 职员信息管理部分 可以进行增加 修改 删除 查询企业的职员各种信息 3 薪资福利管理部分 可以进行职员工资的计算 发放 查询 奖惩信息的增加 删除 修改 2 3 数据需求 在分析了人力资源系统的基本功能需求以后 根据每类具体的功能 分析实现该 功能所需要的数据 按照数据库的设计思想 数据是以记录的形式存储在数据库中 因此系统的数据需求分析实际上就是分析系统所需要的数据库表 包括用户清单 权限清单 组织机构编码表 职员基本信息表 月工资统计表 个人的所得税表 工资发放历史表 职员奖励表 职员惩罚表共 9 张表单 2 4 性能需求 系统的运行对计算机软硬件配置的要求 2 4 1 硬件环境 1 处理器 Intel Pentium 166M 或更高 2 内存 256MB 建议 3 硬盘 1GB 或更大 2 4 2 软件环境 9 1 操作系统 Windows2000 XP 2 软件 NET framework Visual Basic NET 3 数据库 SQL Server2000 3 系统平台 3 1 SQL Sever2000 简介 Microsoft SQL Server 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 不仅继承了 Visual Basic 6 0 的使用简 便 功能强大 效率高等特点 而且 Visual Basic NET 提供了一流的面向对象的程 序设计语言特性 诸如实现继承 重载和参数化的构造器 此外 开发人员可以通 过显示式的自由线程编写具有高度可伸缩性的代码 同时通过其他现代化的语言概 念 如结构化的异常处理等 编写具有较高可维护性的代码 Visual Basic NET 将 为开发人员提供创建强壮 可伸缩的分布式 Web 应用所需要的所有语言特性 因此 是目前最为优秀的应用系统开发工具之一 10 4 总体设计 4 1 基本设计思想及系统处理流程 4 1 1 模块功能的设计 基于以上分析 本文开发的企业人力资源管理系统 分为六大功能模块 用户 登录模块 机构编制管理模块 人员信息管理模块 薪资福利管理模块 系统管理 模块 帮助系统 其功能分别为 1 用户登录模块 提供用户登录界面 输入用户名称 填写正确的密码 进入系 统主窗体 2 构编制管理模块 用于设置企业的组织机构及其详细信息 新增部门 同时还 可以编辑 删除 修改已有部门信息 以及根据部门层次设置建立一个部门树结构 使上下级关系在这里一览无余 其中包括机构设置及编码 机构详细信息两个子模 块分别进行处理 3 人员信息管理模块 用于管理和添加 浏览 修改以及删除企业员工的相关信 息 其中包括职员信息维护 职员信息查询两个子功能模块 职员信息维护子模块用于输入和修改职员的资料 职员信息查询子功能模块用于查 询职员的资料 4 薪资福利管理模块 用于管理企业薪资和福利计算的全过程 其中包括企业的 薪资和福利设定 自动计算社会保险等代扣代缴项目 而且还可以根据公司的政策设 置并计算由年假 事假 病假等带薪假以及迟到 早退 旷工等形成的对薪资和福 利的扣减 还能存储完备的历史信息以供查询 其中包括当月工资管理 个人所得税 率 发放工资历史 职员奖励管理 职员惩罚管理五个子功能模块 5 系统管理模块 包含权限管理和退出系统两个子模块 其中权限管理用于设置 各操作员使用系统的权限 提高系统保密性和安全性 退出系统即结束人力资源管 理系统的运行和使用 6 帮助系统 主要是向用户介绍系统运行环境 使用方法 这样 不仅减少了人 力资源管理人员使用困难 也较好的保证了使用质量工作速度 包含关于和帮助主题 两个子模块 11 4 1 2 系统处理流程 本系统基本的处理流程是 用户登录 主界面 选择各项子系统 整个系统流程图如图 4 1 所示 No Yes 图 4 1 人力资源管理系统流程图 4 2 数据库设计 创建数据库名为 hrmbook 开发本系统共需要 9 张表 其中组织机构编码表和 职员基本信息表是该系统的关键表 用于存放基础的数据信息 其他涉及组织机构 信息和职员信息的数据表 都只记录机构或职员的编号 根据作为外键的编号字段 和组织机构编码表或职员基本信息表相对应 因此 这两张表和其他数据表间的关 系是 1 N 的关系 其他各表均与这两张表通过 单位编号 或 职员编号 字段进 显示登录界面 机 构 编 制 管 理 理 帮 助 人 员 信 息 管 理 薪 资 福 利 管 理 系 统 管 理 用户名和密码正确 显示系统主窗体 退出系统 人力资源管理系统 12 行多对一的关联 4 2 1 数据表的设计 系统数据表及其用途说明见表 4 2 数据表结构见表 4 3 4 4 数据表创建代码 见附录 表 4 2 系统数据表及其用途 数据表名称 数据表用途 数据来源 用户清单 保存系统使用者的信息 在数据库中增加记录 组织机构编码表 用于保存企业组织机构的详细信息 机构编制管理模块 职员基本信息表 用于保存企业员工的基本信息 职员信息管理模块 月工资统计表 用于保存 计算当月的员工工资 当月工资计算模块 个人所得税表 用于保存个人所得税的税率数据 个人所得税率模块 工资发放历史表 用于保存所有月份工资发放的历史 工资发放历史模块 职员奖励表 用于保存员工的奖励情况 职员奖励管理模块 职员惩罚表 用于保存员工的惩罚情况 职员惩罚管理模块 权限清单 保存系统使用都的权限信息 可指定菜单级权限权限管理模块 2 名称 组织机构编码表 见表 4 3 表 4 3 组织机构编码表 名 称 类 型 宽度 主 键 非 空 内部编号 Int 4 No Yes 类 别 Varchar 100 No No AbsIndex Int 4 No No ItemIndex Int 4 No No ItemLever Int 4 No No ParentIndex 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 13 4 职员基本信息表 见表 4 4 表 4 4 职员基本信息表 名 称 类 型 宽度 主 键 非 空 内部编号 Int 4 No Yes 职员编号 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 50 No No 电子邮箱 Varchaar 50 No No 职工帐号 Varchar 20 No No 备 注 Varchar 100 No No 4 2 2 数据表的外部关键字 为系统创建 4 个外部关键字 FK 月工资统计表 职员基本信息表 FK 工资发放 历史表 职员基本信息表 FK 职员奖励表 职员基本信息表 FK 职员惩罚表 职员 基本信息表 用于将月工资统计表 工资发放历史表 职员奖励表 职员惩罚表与 职员基本信息表通过 职员编号 字段进行多对一的关联 14 其中主要代码如下 因为其他于此雷同 这里就不在赘述 ALTER TABLE dbo 月工资统计表 ADD CONSTRAINT FK 月工资统计表 职员基本信息表 FOREIGN KEY 职员编号 REFERENCES dbo 职员基本信息表 职员编号 GO 4 2 3 存储过程的设计 为系统设计了四个存储过程 分别实现从历史导入工资明细 计算当月工资和 工资发放的功能 这些存储过程都在 当月工资管理 模块中使用 15 5 系统详细设计 5 1 主控制模块 1 功能简介 主控制平台使用简单直观的布局 它主要实现对模块的调用和显示 提供了菜 单和按钮两种操作方式 利用系统默认生成的窗体作为主窗体 文件名 frmMain vb 为其添加一个主菜单 MainMenu 控件 2 主控制模块功能树如图 5 1 所示 图 5 1 人力资源管理系统功能树 3 窗体部分属性设置如表 5 2 所示 表 5 2 主窗体属性设置 控件名 属性 取值 frmMain Name frmMain frmMain Text 人力资源管理系统 frmMain IsMdiContainer True frmMain WindowState Maximized frmMain StartPosition CenterScreen StatusBar Text 欢迎使用本系统 4 在主菜单控件上单击鼠标左键进入菜单编辑模式 设置如表 5 3 所示 表 5 3 主窗体属性设置 菜单栏 菜单项 属性 取值 机 构 编 制 管 理 理 帮 助 人 员 信 息 管 理 薪 资 福 利 管 理 系 统 管 理 人力资源管理系统 16 MenuItemDep Text 机构编制管理 Integrated Security SSPI database hrmbook server local Connect Timeout 30 Public Sub Dispose Implements System IDisposable Dispose Dispose True 18 GC SuppressFinalize True End Sub Protected Sub Dispose ByVal disposing As 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 如果数据库连接对象不为空则关闭数据库连接 If SqlConn Is Nothing False Then SqlConn Close End If End Sub Public Function RunSelectSQL ByVal sSQLString As System String As DataView Me Open 19 Dim SqlDS As DataSet New DataSet Dim SqlDA As SqlDataAdapter New SqlDataAdapter sSQLString Me SqlConn SqlDA Fill SqlDS Return SqlDS 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 Function End Class 5 3 登录模块 系统的管理应考虑安全性 于是本系统设计了登录模块用以控制合法用户进入 主控平台 用户登录窗体启动后 等待用户输入用户号和密码 根据登录的用户号在系统 用户清单表中查找相应记录并自动添加用户名 然后系统检查密码的正确性 是系 统合法授权用户 允许进入系统 否则无法进入退出系统 主要代码如下 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 密码 姓名 from 用户清单 where 用户编号 Me txbUserId Text Trim 判断用户ID是否存在 If dv Count 0 Then 20 用户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 Dispose 3 登录窗体效果如图 5 5 所示 图 5 5 登录模块效果图 5 45 4 机构编制管理 对于大型企业 集团公司等用户 组织机构往往非常复杂 总公司下属可能有 多级子公司 子公司下又设置有各种部门 因此需要机构编制管理可以灵活的定义 这些层次和属性 同时对应机构的编码可以根据所从属的上级机构自动生成 机构编制管理模块用于设置企业的组织机构 其中包括机构设置及编码 机构 详细信息两个子功能模块 如图 5 6 所示 机构编制管理 机构设置及编码 21 图 5 6 机构编制管理功能模块图 5 4 1 机构设置及编码 机构设置及编码子模块用于生成企业组织机构的层次关系和编码 在这个模块 中建立起组织的管理结构 上下级关系在这里一览无余 而个人信息会与这个组织 架构连接起来 机构设置及编码模块实现的四个主要功能包括 显示 增加 修改 删除机构 机构合成编码会根据所从属的部门机构自动生成 并且保存修改后其设置将返回到 组织机构编码表中 当触发 frmDepManage 窗体事件后会调用方法 InitTree 用树形显示数据库中 存在的各个机构及其从属机构关系 具体代码如下 InitTree是用递归方法初始化TreeView控件的节点 Private Sub InitTree ByRef nodes As TreeNodeCollection ByVal sParentIndex As String Try 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 tmpNode Text dr 类别 用TreeNode的Tag属性保存与此节点相关的数据 tmpNode Tag CType New TreeNodeData dr AbsIndex dr ItemIndex dr ItemLevel 机构详细信息 22 dr ParentIndex dr 类别号 dr 单位编号 Object absIndex dr AbsIndex 添加节点 nodes Add tmpNode 递归调用 InitTree nodes nodes Count 1 Nodes absIndex Next Catch ex As Exception MessageBox Show 初始化TreeView失败 End Try End Sub 管理原可通过按键方式调用相应的触发函数来实现对机构的增加 删除 修改 等功能 机构设置及编码模块的窗体效果如图 5 7 所示 图 5 7 机构设置及编码窗休设计效果图 5 4 2 机构详细信息 机构详细信息子模块用于管理对应组织机构的详细信息 显示企业所有机构部 门地址 电话 账号等信息 机构详细信息模块实现的二个主要功能包括 显示 修改机构的信息 不能删 除 其所列单位信息都是在组织机构编码表中的记录 只能在机构设置及编码中增 加部门 在这里不能新增部门信息 操作完成后按保存按钮其值将返回到组织机构 23 编码表 主要代码如下 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 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 GridColumnStyles Add aColumnTextColumn Next 隔行灰白显示 ts AlternatingBackColor Color LightGray ts AllowSorting False dgdDepInfo TableStyles Add ts SqlConnection1 ConnectionString DataBase sConn SqlDataAdapter1 Fill DataSet11 组织机构编码表 24 设置dgdDepInfo的数据源 ts MappingName dt TableName dt DefaultView 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 职员信息维护 职员信息维护子模块用于输入和修改职员的姓名 性别 年龄 籍贯 文化程 度 毕业院校 婚姻状况 家庭电话 办公电话 单位编号等资料 职员信息维护模块实现的四个主要功能包括 显示 增加 修改 删除职员信 息 其数据来源是职员基本信息表 操作后值返回职员基本信息表 1 绑定数据至相应控件 从工具箱中拖动一个 SqlDataAdapter 对象到窗体上 连接 hrmbook 数据 添加 人员信息管理 职员信息查询 职员信息维护 25 职员基本信息表并选择职员基本信息表的所有字段 如图 5 10 所示 在 SqlDataAdapter1 对象上右击 在弹出的快捷菜单中选择 生成数据 命令 在 生成数据集 对话框中单击 确定 按钮 如图 5 11 所示 为 TextBox 控件以及 ComboBox 控件设置数据源 在控件上右击弹出快快捷菜单 中单击 属性 命令 在 属性 设计器中对 TextBox 的属性 DataBindings 与 Text 进行数据绑定 如图 5 12 所示 图 5 10 查询生成器窗口 图 5 11 生成数据集对话框 图 5 12 数据绑定 2 编写代码 通过 SQL 语句及自定义方法 SetDataGrid 将数据库中职员信息表在 DataGrid 代码与 frmDepInfo Load 中代码基本一致 显示出来 编写代码使得按键响应相应事件 使得修改的数据保存或者删除数据 具体代 26 码如下 Private Sub ToolBar1 ButtonClick ByVal sender As System Object ByVal e As System Windows Forms ToolBarButtonClickEventArgs 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 职员基本信息表 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 dgdPeopleInfo CurrentRowIndex If MessageBox Show 你确认要删除此条记录吗 Confirm MessageBoxButtons YesNo DialogResult Yes Then 27 从职员基本信息表表删除当前被选中记录 DataSet11 Tables 职员基本信息表 Rows iRow Delete Else Exit Sub End If Try If DataSet11 HasChanges Then 用SqlDataAdapter1更新数据库 SqlDataAdapter1 Update DataSet11 MessageBox Show 数据删除成功 Else MessageBox Show 无修改的数据 End If Catch ex As Exception MessageBox Show 删除数据出错 MessageBox Show ex ToString End Try Catch ex As Exception MessageBox Show 删除数据出错 End Try E