员工培训管理系统.docx
《员工培训管理系统.docx》由会员分享，可在线阅读，更多相关《员工培训管理系统.docx（57页珍藏版）》请在冰点文库上搜索。
员工培训管理系统
ＸＸＸ毕业设计
员工培训管理系统
学生
ＸＸＸ
系部名称
ＸＸＸ系
专业班级
ＸＸＸ班
学号
ＸＸＸＸＸＸＸＸＸ
指导教师
ＸＸＸ
ＸＸＸＸＸＸ教务处
二○一一年三月
摘要
随着人类社会的开展，社会不断的在进步，对知识的渴望越来越大，人类已经逐步进入信息化社会。
信息增长的速度越来越快，人们希望利用先进的管理理论方法和手段来处理越来越多的信息，员工培训也是其中一组成局部，想以提高工作管理水平。
因此，学习与再学习始终伴随着我们，其中有关的培训机构有着不可替代的作用，在这种形势下，如何更好的对培训工作进展管理，就成了我们需要解决的一个问题，因此，开发一套完善的员工培训管理系统就成不可少了，本文介绍了在visualbasic6.0环境下利用其提供的各种面向对象的开发工具开发本系统的详细过程，从软件工程的角度进展了科学而严谨的阐述。
关键词：
员工培训；管理系统；visualbasic6.0
Abstract
Withthedevelopmentofthehuman,thesocietygetsprogresscontinuouslyandthedesireofknowlegebeemoreandmorelarge.Thehumanbeinghavebeenintotheinformationalstagestepbystep.Furthermore,theincreaseofinformationspeeduptoo.Peoplewouldliketousetheadvancedmeansandmethodsofmanagementtodowiththeinformationwhichgetsmoreandlarger.Amatterofcourse,stafftrainisthesamewanttoimprovetheirlevelofmanagementandwork.Asaresult,studyandrestudyealongwithusfrombeginningtoend.Thetrainorganizationinithavebeentheimportantrolethatcan'treplace.Inthissituation,itisaproblemforustosolvehowtomanagethestafftrainmoreefficient.Inaword,itisindispensabletodevelopaperfectsystemofmanagementofstafftrain.Thisarticleexplainsthedetaileddevelopedprocessandtheuseoftoolsopeninguptheobjectsintheplatformofvisualbasic6.0,expoundingitscientificlyandstrictlyinthedirectionofsoftengineering.
Keyword：
stafftrain；Managementsystem；visualbasic6.0
第一章前言
1.1本课题的意义
随着经济全球化开展、知识更新速度加快、国际企业的开展，企业员工培训将日益成为企业的一项重要业务。
可以说，今后企业的竞争将是企业员工素质的竞争。
因此，开发一个功能先进、完善的培训管理软件来辅助企业管理培训业务是增强企业竞争力的一项重要措施。
1.2当前培训管理软件的现状
近年来，有关员工培训管理的软件很多。
但大局部是培训中介组织的一项面向企业的效劳，而且还是一些网络版本。
比方，在美国有ASTD---AmericanSocietyforTrainingandDevelopment、TheDistanceandEducationTrainingCouncilOnline、TCM’sHRCareers、ResourceSoftware、SafetySoftware&puterBasedTrainingSoftwareSkillsTestingSoftware等；在国，网络学校及其培训管理软件比拟盛行。
但真正由企业自身组织的员工培训，据调查的资料可知，到目前为止只有一些国外国企业以及在中国的跨国企业，拥有自己的员工培训管理软件，而且这些也只是作为企业其他软件的一个组成局部出现，如摩托罗拉的员工培训管理就是其人力资源管理软件的一个组成局部，且还只实现了员工个人信息管理很小的一局部功能。
在国企业中，尽管领导们都认识到员工培训的重要性，也有一些企业采取了一些有益的措施。
他们购置了计算机，也建立起自己的部网，对员工培训管理采用了一些简单的应用程序，但离使用计算机系统和专门软件来管理还有一段距离。
综上所述，无论在国外，目前还没有一套比拟完善的、专门的、适用于各种企业自己使用的企业员工培训管理软件。
因此，研究开发出一套比拟通用、功能比拟完善的企业员工培训管理软件，力求在这一领域取得一些新的成果。
1.3选择本课题的目的
企业在面临全球化、高质量、高效率的工作系统挑战中，培训管理显得更为重要。
通过一个先进的、完善的员工培训管理系统，使企业的培训工作系统化、规化、自动化，从而到达提高企业培训管理效率的目的。
培训使员工的知识、技能与态度明显提高与改善，由此提高企业效益，获得竞争优势。
具体表达在以下方面：
1.能提高员工的职业能力。
2.有利于企业获得竞争优势。
3.有利于改善企业的工作质量。
4.有利于高效工作绩效系统的构建。
5.满足员工实现自我价值的需要。
员工培训管理系统通过制定合理的培训方案，运用正确的方法收集相关的数据和信息，善于发现员工的绩效现状和公司管理层对员工的期望之间的差距，共同为提高企业绩效而努力。
此外,计算机管理系统具有检索速度快、查找方便、可靠性高、性好等优点。
因此，开发本系统具有重要的意义。
第二章开发运行环境及相关理论知识
软件环境：
Windows98/2000/XP/win7。
硬件环境：
Pentium2以上处理器。
2.1运行环境和开发工具及平台
软件环境：
Windows98/2000/XP/win7。
硬件环境：
Pentium2以上处理器。
微软公司的VisualBasic6．0。
分布式的关系型数据库管理系统--MicrosoftSQLServer2000。
2.2相关理论知识
2.2.1VisualBasic6．0简介
微软公司的VisualBasic6．0是Windows应用程序开发工具，是目前最为广泛的、易学易用的面向对象的开发工具。
VisualBasic提供了大量的控件，这些控件可用于设计界面和实现各种功能，减少了编程人员的工作量，也简化了界面设计过程，从而有效的提高了应用程序的运行效率和可靠性。
MicrosoftVisualBasic，它提供了开发MicrosoftWindows（R）应用程序的最迅速、最简捷的方法。
不管是MicrosoftWindows应用程序的资深专业开发人员还是初学者，VisualBasic都为他们提供了整套工具，以方便开发应用程序。
数据访问特性允许对包括MicrosoftSQLServer和其它企业数据库在的大局部数据库格式建立数据库和前端应用程序，以及可调整的效劳器端部件。
故而，实现本系统VB是一个较好的选择。
2.2.2关系型数据库--SQL
信息技术的飞速开展大大推动了社会的进步，已经逐渐改变了人类的生活、工作、学习等方式。
数据库技术和网络技术是信息技术中最重要的两大支柱。
在当前热门的信息系统开发领域，MicrosoftSQLServer2000由于不断采纳新技术来满足用户不断增长和变化的需求，该产品的功能越来越强大、系统的可靠性也越来越高，从而该产品的应用也越来越广泛。
SQL是构造化查询语言〔StrutureQueryLanguage〕的简称，是关系型数据库管理系统中最流行的数据查询和更新语言。
用户可使用SQL语言在数据库中执行各种操作。
SQL查询语言包括了所有对数据库的操作，这些操作可以分为四个局部：
即数据定义语言、数据操纵语言、数据控制语言和嵌入式SQL语言。
MicrosoftSQLServer2000是一个分布式的关系型数据库管理系统，具有客户机/效劳器体系构造，采用了一种称为：
Transact-SQL的SQL语言在客户机和效劳器之间传递客户机的请求和效劳器的处理结果。
MicrosoftSQLServer2000是一个应用广泛的数据库管理系统，它为用户提供了一个完整的数据库解决方案，具有许多显著的优点，例如，用户喜欢的易用性、适合分布式组织的可伸缩性、用于决策支持的数据仓库功能、与许多其他效劳器软件严密关联的集成性、良好的性能价格比等。
MicrosoftSQLServer2000的高度可扩展性和高可靠性。
MicrosoftSQLServer2000使用了业界最先进的数据构造，能够为要求最苛刻的Web应用和企业应用提供高度的可扩展性和高可靠性。
MicrosoftSQLServer2000在许多工业基准测试中的性能都创立了新世界纪录。
2.2.3二者的结合——ADO
ADO〔ActiveXDataObjects〕是微软提供的数据库访问技术,实际上是一种访问各种类型数据库的连接机制。
它被设计用来同新的数据访问层OLEDBProvider一起协同工作，以提供通用数据访问〔UniversalDataAccess〕能力。
ADO设计为一种极简单的格式,通过ODBC的方法同数据库接口相连。
用户可以使用任何一种ODBC数据源,即不仅适合于SQlSERVER,Oracle,Access等数据库应用程序,也适合于Excel表格，文本文件，图形文件和无格式数据文件。
ADO是基于OLE－DB之上的技术。
因此ADO通过其部的属性和方法提供统一的数据访问接口。
ADO集中了DAO和RDO的优点，可以使用一样的编程模式连接到不同的数据提供者，而不管给定提供者的特定特性，具有高度的灵活性。
第三章系统功能需求分析
系统分析〔又称逻辑设计〕是管理信息系统开发的关键环节，要求在系统调查的根底上，对新系统的功能进展细致的分析，并建立一个新系统的逻辑模型。
系统分析阶段主要任务是确定系统的总体设计方案、划分子系统功能、确定共享数据的组织，然后进展详细设计。
员工培训管理系统功能需求主要有：
员工信息管理功能、培训方案管理功能、课程信息管理功能、培训效果评价功能、查询管理功能、及使用系统的用户管理功能、复原数据和备份数据、帮助功能等。
3.1员工信息管理功能需求
●包括员工各种信息的输入和删除，包括员工根本信息、职称、岗位、已经培训过的课程和成绩、培训方案等。
●员工各种信息的查询、修改，包括员工根本信息、职称、岗位、几经培训过的课程和成绩、培训方案等。
3.2培训方案管理及效果评价功能需求
●培训方案的制定，包括培训工程、时间、地点等。
●培训方案的查询。
●培训效果评价包括培训工程、及培训效果等。
●培训工程效果查询。
3.3课程信息管理功能需求
●课程信息设置，包括课程根本信息和课程查询，如课程编号、名称、类型及课程描述等。
●课程培训需求，包括课程需求分析、课程需求名称及需求删除等。
3.4用户查询管理功能需求
●查询管理功能包括培训方案查询、课程信息查询、成绩信息查询和员工信息查询。
●用户管理包括用户添加、用户删除和密码修改等，用户权限分系统管理员、超级用户和普通用户。
3.7文件功能需求
●文件功能包括备份数据库、复原数据库、及用户注销、退出系统等。
第四章系统总体设计方案
4.1系统功能总体方案
我们采用面向对象的分析和设计方案，面向对象分析和面向对象设计之间有密切的衔接关系，从面向对象分析到面向对象设计是一个逐渐扩大模型的过程。
分析处理是以问题为中心的，可以不考虑任何与特定计算机有关的问题，而面向对象设计那么把我们带进了面向计算机的“实地〞开发活动中去。
通常，面向对象设计分为两个阶段：
高层设计和低层设计。
高层设计包括像用户界面那样的问题解决局部，低层设计集中于类的详细设计阶段。
通常，利用面向对象设计得到的系统框架如图3-1所示：
图4-1面向对象设计得到的系统框架图
4.2系统的目标
系统开发的总体任务是实现员工培训管理各种信息的系统化、规化和自动化。
主要包括：
1、员工根本信息的查询,删除,修改和添加；
2、员工成绩信息的查询,删除,修改和添加；
3、员工培训评价查询,删除,修改和添加；
4、员工培训方案的信息和管理功能；
5、员工信息报表打印功能；
6、用户权限的管理和用户的添加,删除；
7、友好.方便.美观的界面设计。
4.3系统的设计思想
实用性:
在各项根本功能实用的上进一步开发完善系统；
先进性:
简化代码去处冗余,引入先进的编译方式；
易用性:
授权实体在需要时可以简单快捷的访问数据；
性:
确保信息不暴露给未授权的实体或者进程；
系统性:
将各功能模块有机融合成一个系统的整体。
4.4系统的功能模块构造
图4-1系统功能模块图
系统功能细分如图4-1所示，可概括分为5个模块，即：
用户登录模块，添加修改模块，查询显示模块、数据录入模块、打印报表模块。
1）用户登录模块：
完成用户身份的验证,设定指定用户的操作权限。
2）添加修改模块：
完成各种对各种员工数据的添加和修改。
3）查询显示模块：
根据不同的查询条件对数据进展挑选,进一步加工后加以显示。
4）数据录入模块：
将录入数据保存到相应的数据库。
5）打印报表模块：
将员工根本信息和培训方案等以报表的方式打印出来。
4.5数据库的设计
在数据库应用系统的开发过程中，数据库的构造设计是一个非常重要的问题。
数据库构造设计的好坏将直接对应用系统的效率以及实现的效果产生影响，好的数据库构造设计会减少数据库的存储量，数据的完整性和一致性比拟高，系统具有较快的响应速度，简化基于此数据库的应用程序的实现等。
在数据库系统开场设计的时候我们应该尽量考虑全面，尤其应该仔细考虑用户的各种需求，防止浪费人力和物力。
4.5.1数据库需求分析
数据库需求分析是数据库构造设计的第一个阶段，是非常重要的一个阶段。
在这个阶段主要是收集根本数据、数据构造以及数据处理的流程，组成一份详尽的数据字典，为以后进一步设计打下根底。
在经过仔细调查研究企业员工培训管理过程的根底上，我们得到本系统所处理的数据流如图4－2所示。
图4-2 数据流程图
4.5.2数据库概念构造设计
这一设计阶段是在需求分析的根底上，设计出能够满足用户需求的各种褓，以及它们之间的关系，为后面的逻辑构造设计打下根底。
由上面的设计规划出的实体有：
部门实体、员工实体、课程实体、资源实体。
实体和实体之间的关系E－R图如图4－3所示。
图4-3 实体之间关系E－R图
4.5.3数据库逻辑构造设计
数据库共包括7个表，具体数据字典见表1-7。
表4-1course_info课程信息表
属性名
数据类型
大小
允许空
说明
Course_No
Int
4
否
课程号
Course_Name
Char
10
是
课程名
Course_Type
Char
10
是
课程类型
Course_Des
Char
15
是
课程注释
表4-2course_need培训需求分析表
属性名
数据类型
大小
允许空
说明
Course_Name
Char
10
否
培训课程名
Course_Des
Varchar
50
是
培训需求
表4-3plan_info培训方案表
属性名
数据类型
大小
允许空
说明
Project
Char
10
否
培训工程
Time
Datetime
8
是
培训时间
Place
Char
10
是
培训地点
表4-4result_info员工成绩表
属性名
数据类型
大小
允许空
说明
Exam_no
Char
10
否
考试编号
Student_id
Int
4
是
员工号
Student_name
Char
10
是
员工名
Course_no
Int
4
是
课程号
Course_name
Char
10
是
课程名
Result
Float
8
是
成绩
表4-5student_info员工根本信息表
属性名
数据类型
大小
允许空
说明
Student_id
Int
4
否
员工号
Student_name
Char
10
是
员工名
Student_sex
Char
2
是
性别
Birth_date
Datetime
8
是
出生日期
Depart
Char
10
是
部门
Tele_number
Char
10
是
In_date
Datetime
8
是
就职日期
Address
varChar
50
是
家庭地址
ment
varChar
100
是
注释
表4-6trainresult_info员工培训评价表
属性名
数据类型
大小
允许空
说明
Pro
char
10
否
培训工程
Effect
Varchar
50
是
培训效果评价
表4-7user_info用户密码表
属性名
数据类型
大小
允许空
说明
user_id
Char
10
否
用户id
user_pwd
Char
10
是
用户密码
user_name
Char
10
是
用户名
user_level
Int
4
是
权限等级
user_des
Char
10
是
用户描述
第五章系统的具体设计
5.1欢送主界面及代码设计
运行员工培训管理系统后，首先将出现欢送主界面，如下列图。
图5-1欢送主界面
欢送主界面实现的代码设计如下：
DimDelayTimeAsInteger’定义计时器
PrivateSubForm_Load（）
DelayTime=0
Timer1.Enabled=True
EndSub
PrivateSubTimer1_Timer（）
IfDelayTime>3Then’延迟三秒载入登录界面
Timer1.Enabled=False
LoadFrmLogin
FrmLogin.Show
UnloadMe
Else
DelayTime=DelayTime+1
EndIf
EndSub
5.2登录界面及代码设计
图5-2登录界面
登录界面实现的代码设计如下：
DimMyLoginAsOpenRs’定义变量
DimUseridSQLAsString
DimLevelAsInteger
PublicCurrentUserAsString
PrivateSubCmdcancel_Click（）’取消按钮命令
UnloadMe’释放当前表
EndSub
PrivateSubcmdOK_Click（）’确定密码命令
IftxtUserID.Text="administrator"AndtxtPass.Text=""Then
UnloadMe
FrmMain.Show
ExitSub
EndIf’如权限符合,准予登陆
IftxtUserID.Text=""Then
MsgBox"请输入用户编号！
",vbOKOnly+vbInformation,"用户登陆"
txtUserID.SetFocus
ExitSub’用户为空时提示,聚焦
Else
UseridSQL="select*fromUser_Infowhereuser_Id='"&txtUserID.Text&"'"
’用户非空时启用数据库
MyLogin.rsDK1UseridSQL’把sql语句传给函数
IfMyLogin.rs1.EOF=FalseThen’列表未到底从数据库中取值
txtUserName.Text=Trim（MyLogin.rs1!
user_name）
Level=MyLogin.rs1!
user_level
IftxtPass.Text=Trim（MyLogin.rs1!
user_pwd）Then’密码符合
CurrentUser=Trim（MyLogin.rs1!
user_name）
CallDisplayMenu
UnloadMe
FrmMain.Show’载入主界面
ElseMsgBox"密码错误！
"&vbCrLf&vbCrLf&"请重新输入！
",vbOKOnly+vbInformation,"用户登陆"’密码错误提示
txtPass.Text=""
txtPass.SetFocus
ExitSub
EndIf
Else
MsgBox"用户编号不存在！
"&vbCrLf&vbCrLf&"请重新输入！
",vbOKOnly+vbInformation,"用户登陆"’用户不存在提示,清空聚焦
txtUserID.Text=""
txtUserID.SetFocus
ExitSub
EndIf
EndIf
EndSub
PrivateSubForm_Load（）
SetMyLogin=NewOpenRs’引用类函数
EndSub
PrivateSubtxtPass_KeyPress（KeyAsciiAsInteger）
IfKeyAscii=13Then’输密码时回车确定
CallcmdOK_Click
EndIf
EndSub
PrivateSubtxtUserId_Change（）’用户名改变文本框清空
txtPass.Text=""
txtUserName.Text=""
EndSub
PrivateSubtxtUserId_LostFocus（）’焦点从用户id转移时从数据库读入用户名
UseridSQL="select*fromUser_Infowhereuser_Id='"&txtUserID.Text&"'"
MyLogin.rsDK1UseridSQL
IfMyLogin.rs1.EOF=FalseThen
txtUserName.Text=T
升级会员 