毕业设计（论文）-VB.NET企业员工劳动合同管理系统的设计与实现

1、企业员工劳动合同管理系统的设计与实现摘 要：随着计算机技术的飞速开展，企业内相关数据信息也急剧增长，因此企业应建立一套完整的现代化、网络化、标准化的员工劳动合同管理系统来改变传统手工办理员工劳动合同相关业务速度慢、效率低以及资料容易丧失的弊端，提高工作效率，优化员工劳动合同管理，降低劳动本钱，从而为企业不断地创造出更多的经济效益。员工劳动合同管理系统的管理模块，是一个根据参考资料以及通过对中大型公司进行实际调研，采用Microsoft VB.NET编程，运用SQL Server 2000数据库系统开发的系统。本系统操作简便，界面友好，灵活实用.系统管理模块主要提供了灵活有效的信息输入方式，快速

2、的信息检索能力，有效地解决了公司内部员工合同的信息管理、信息共享、信息检索，信息保密问题。本课题能实现对企业员工劳动合同进行管理的功能，便于工作人员操作，能够优化企业管理能力，提高企业工作效率，并加大与同行之间的竞争力。关键词：企业 劳动合同管理 数据库The Design and Implement of enterprise employee labor contract management systemAbstract: Along with the rapid development of computer technology, the inside relevant data i

3、nformation in business enterprise also grows sharply, the enterprise shall establish a complete set of modernization and network and standardization of the labor contract management systems to change the traditional manual related business deal with employees contract which is inefficient and materi

4、al easily lost defects, improving work efficiency, optimizing the employee contract management, reduce the labor cost, thus for enterprise constantly create more economic benefits. Employee contract management system management module, is a reference material and based on according to the actual inv

5、estigation, are evaluated by Microsoft , using SQL Server 2000 database system development erface flexible, practical, this module provides flexible and effective Lord the information input methods, rapid information retrieval capabilities, and further effectively solved in a companys inte

6、rnal employee contract information management, information sharing, information retrieval and information confidential problems. This topic can realize the functions of enterprise employee labor contract management, facilitating personnels to work, optimizing the ability of enterprise management, st

7、rengthening the enterprise efficiency, and increasing the competitiveness between peers.Keywords: enterprise labor contract management database目 录前 言1第1章 绪 论21.1 系统开发背景21.2 系统实现要求21.3 系统开发平台31.4 系统开发工具简介3第2章 系统可行性分析42.1 经济和市场可行性分析42.2 技术可行性分析42.3 系统需求分析4第3章 需求分析53.1 系统设计目标53.2 系统主要功能53.2.1 用户管理53.2.

8、2 数据维护53.2.3 数据查询53.2.4 数据统计53.2.5 续签查询功能6第4章 概要设计74.1 系统体系结构设计74.2 开发工具的选择74.3 用户管理功能模块84.4 数据库结构设计84.4.1 数据库概念结构设计84.4.2 数据库逻辑结构设计94.5 所需实用技术10第5章 系统界面设计与实现115.1 界面设计原那么115.2 用户管理的界面设计115.2.1 登录及注册的界面设计115.2.2 修改密码的界面设计135.3 主界面的界面设计135.3.1 员工根本信息界面135.3.2 员工根本信息录入修改界面155.3.3 员工根本信息查看界面165.3.4 员工根

9、本信息导出EXCEL界面165.3.5 员工根本信息删除界面175.3.6 员工根本信息查询及到期提醒界面18第6章 系统测试及分析206.1 单元测试206.2 集成测试20总 结21致 谢22参 考 文 献23附 录24前 言随着企业管理水平的提高和市场竞争的加剧，企业管理系统在提高企业的竞争能力方面发挥的作用越来越大。首先，企业的管理方式走向智能化。随着信息技术和互联网的开展，企业内部会产生各种业务信息包括文字、图片、业务数据等。面对海量信息，如何迅速找到有价值的信息是人们最关心的问题。通过智能化管理，可实现信息从原始存储状态到不同效劳类型的自动组织、归类。其次，由于非结构化信息比结构化

10、信息更难标准化并且被人理解，所以对其进行存储、检索、发布以及利用也就需要更加智能化的IT 技术，比方海量存储、智能检索、信息挖掘、内容保护、信息的增值开发利用等等。现代社会企业管理能力进一步提高，企业应建立一套完整的现代化、网络化、标准化的员工劳动合同管理系统来改变传统手工办理员工合同相关业务的速度慢、效率低以及资料容易丧失的弊端，提高工作效率、优化员工合同管理、降低劳动本钱，从而为企业不断地创造出更多的经济效益。对于企事业单位的人事管理系统来说，不需要大型的数据库系统，只需要一个操作方便，功能实用，能满足企业对数据进行管理的系统。我们的目标就是在于开发一个功能实用、操作方便的企业员工劳动合同

11、管理系统。该系统能够录入员工合同及本人的根本信息，在操作上能完成诸如添加、修改、删除、查看功能。同时能按各种条件查询、实现分类统计，续签提醒，并打印出花名册及用户的注册登录及修改密码等方面的工作，根本满足员工合同管理的日常需要。该系统的规模是中等偏下。技术上主要涉及界面设计和数据库设计，开发工具可采用应用软件开发工具VB.NET，后台数据库选择SQL Server 2000。利用Visual Basic.NET的一些特性如跨语言调试以及Visual Basic.NET与公共类型系统和公共语言运行库的一致性，尤其是在数据库开发方面具有很大优势，它能够支持大多数数据库的链接，通过ADO技术足以方便

12、快捷的实现数据库链接，并进行有效的访问。第1章 绪 论1.1 系统开发背景随着科学技术的不断提高，计算机科学日渐成熟，其强大的功能已为人们深刻认识，它已进入人类社会的各个领域并发挥着越来越重要的作用。企业应建立一套完整的现代化、网络化、标准化的员工劳动合同管理系统来改变传统手工办理员工合同相关业务速度慢、效率低以及资料容易丧失的弊端，该工程开发的系统为企业员工劳动合同管理系统。员工劳动合同管理系统是一个单位不可缺少的局部。一个功能齐全、简单实用的信息管理系统不但能有效减轻公司相关工作人员的工作负担，而且它的内容对于公司管理者来说都至关重要。所以员工劳动合同管理系统应该能够为用户提供充足的信息和

13、快捷的查询手段。但一直以来人们使用传统的方式管理员工劳动合同信息、统计和查询数据，这种管理方式存在着许多缺点，如：效率低、保密性差，人工的大量浪费，另外时间一长，将产生大量的文件和数据，这对于查找、更新和维护都带来了不少困难。该系统完成后可用于公司的员工劳动合同信息的管理，可提高工作效率，优化员工合同管理，降低劳动本钱。作为计算机应用的一局部，使用计算机对企事业单位的各类信息进行管理，具有手工管理无法比较的优点，例如：检索迅速、查询方便、效率高、可靠性好、存储量大、保密性好、寿命长、本钱低等。这些优点能够极大地提高公司信息管理的效率，也是一个单位科学化、正规化管理，与世界接轨的重要条件。1.2

14、 系统实现要求1. 根本功能1对员工劳动合同信息的录入，修改；对员工的增加，删减。2对劳动合同到期人员提前三十日予以提醒，对新签劳动合同员工的试用期到达提前十日予以提醒。3对合同到期人员是否续签进行系统登记，如续签或解除，如续签，登记续签劳动合同的起止时间，对首签员工试用期考核结果进行系统登记，如合格或不合格。2. 辅助功能1对劳动合同信息可实现分类统计，如按用工类型，按合同签订年限长短，按合同起止时间等。2按单项条件或组合条件查询符合条件的劳动合同信息。3具备以花名册形式打印，用户名密码登录的功能。 系统开发平台效劳器端平台软件全部采用Microsoft的产品，便于维护和管理。1. 效劳器端

15、平台操作系统：Microsoft Windows 2003 Server数据库系统：Microsoft SQL Server 2000开发语言：Microsoft 开发工具：Visual Studio 20052. 客户端运行环境操作系统：Microsoft Windows 2003及更高版本 系统开发工具简介VB.NET是Microsoft环境下简单、易学、高效的一种编程语言，其快速开发的特性深受程序员的喜爱。但是.NET以前版本的Visual Basic面向对象的能力远远不能满足程序员的需要，这也是越大工程越少用到Visual Basic的原因。Visual Basic.NET新增和将强了

16、许多新的面向对象的特性比方继承、重载等等。语言的新特点也包括了对进程的控制和底层结构的操作，这些新特点使得Visual Basic.NET再次成为程序员关注的焦点。VB.NET的特点：构造函数、封装特性、自由线程、继承、初始化函数、基于对象、面向对象、重载、覆盖、多态性。SQL server2000的常见版本有：企业版、标准版、个人版、开发版，其中企业版功能全面，应用于大中型产品效劳处理器，能够支持大型网站联机事务处理、以及联机分析处理。SQL server2000的特点：Internet 集成、可伸缩性和可用性、企业级数据库功能、易于安装、部署和使用。第2章 系统可行性分析 2.1 经济和市

17、场可行性分析目前企业管理系统在提高企业的竞争能力方面发挥的作用越来越大，企业的管理方式走向智能化。随着信息技术和互联网的开展，企业内部会产生各种业务信息包括文字、图片、业务数据等。通过智能化管理，可实现信息从原始存储状态到不同效劳类型的自动组织、归类。因此开发一个小型的管理系统，用开发工具在短时间内完成，具有经济和市场可行性。2.2 技术可行性分析该工程的规模是中等偏下。技术上主要涉及界面设计和数据库设计，开发工具可采用应用软件开发工具VB.NET，利用Visual Basic.NET的一些特性如跨语言调试以及Visual Basic.NET与公共类型系统和公共语言运行库的一致性，尤其是在数据

18、库开发方面具有很大优势，它能够支持大多数数据库的链接，通过ADO技术足以方便快捷的实现数据库链接，并进行有效的访问。2.3 系统需求分析企业员工劳动合同管理系统包括员工根本信息管理，和数据查询统计等主要功能。具体功能如下：1. 员工根本信息的新增、修改、删除、查看，打印等操作，根本信息包括姓名，身份证号码，签订合同的时间等内容。此功能为合同管理系统和数据库设计模块提供了依据。此外，还包含有提醒功能和续签查询。2. 数据查询统计按单项条件或组合条件查询或统计符合条件的员工劳动合同信息。3. 用户管理即管理员的信息管理，主要功能为登录系统用户名和密码的注册和修改的功能。第3章 需求分析要开发一个管

19、理系统，首先要进行需求分析和总体设计，分析系统的适用对象和用户需求，设计系统的体系结构和数据库结构，选择实用的开发工具和后台数据库，规划工程开发进度等这些工作在实际的工程开发过程中是非常重要的。而系统的每一项需求都必须在系统中表达出来。系统功能的全面性，平安性是系统的生产至关重要的前提，它决定了系统的可靠性和对客户的效劳能力。系统建设虽是在Visual B 环境下设计的，但应用系统都需要后台数据库的支持，而Visual B 和SQL Server 2000数据库也是系统开发常用的比较广泛的组合之一。3.1 系统设计目标随着现代社会企业管理能力的进一步提高，企业应建立一套完整的现代化、网络化、标

20、准化的员工劳动合同管理系统来改变传统手工办理员工合同相关业务速度慢、效率低以及资料容易丧失的弊端，这样可以提高工作效率，优化员工合同管理，降低劳动本钱，从而为企业不断地创造出更多的经济效益。3.2 系统主要功能3 用户管理即管理员的信息管理，主要功能为登录系统用户的注册以及用户名和密码的修改。3 数据维护即对企业员工根本信息的新增、修改、删除、查看，打印等操作。3 数据查询该功能是对劳动合同信息可实现分类查询，如按用工类型，按合同签订年限长短，按合同起止时间等；按单项条件或组合条件查询符合条件的劳动合同信息。3 数据统计该功能是对劳动合同信息可实现分类统计如按用工类型，按合同签订年限长短，按合

21、同起止时间等；按单项条件或组合条件查询符合条件的劳动合同信息提醒功能对劳动合同到期人员提前三十日予以提醒，对新签劳动合同员工的试用期到达提前十日予以提醒。3 续签查询功能对合同到期人员是否续签进行系统登记，如续签或解除，如续签，登记续签劳动合同的起止时间，对首签员工试用期考核结果进行系统登记，如合格或不合格。第4章 概要设计4.1 系统体系结构设计本章将根据需求分析中总结的用户需求设计系统的体系结构。系统的功能模块图如4.1所示。在功能模块示意图的树状结构中，每一个叶结点都是一个最小的功能模块。每一个功能模块都需要针对不同的表完成不同的数据库操作，即添加记录，修改记录，删除记录查询显示记录信息

22、，以及统计记录信息等。如图4.1所示。图4.1 系统功能模块示意图4.2 开发工具的选择开发数据库原理信息系统需要选择两种工具，即前台开发语言和后台数据库。选择开发工具时应该考虑用户需求、系统功能和性能的需求。1. 前台开发工具选择Visual B。2. 后台数据库选择SQL Server 2000。3. 中间层采用ADO数据访问技术，将对数据库的操作定义在模块中。4.3 用户管理功能模块运行系统后，首先会看到登录窗体，对用户的身份进行认证。用户管理模块的功能比较简单，在系统开始使用时，默认用户为admin,密码为11，进入主界面以后，可以进行用户注册，或修改密码等操作。 4.4 数据库结构设

23、计4.4.1 数据库概念结构设计数据库结构设计是总体设计阶段非常重要的环节，好的数据库结构可以简化开发过程，使系统功能清晰明确。因为数据库结构的变化会造成编码的改动，所以必须认真设计数据库结构后再进行编码，从而防止无谓的重复工作。在仔细调查本系统运作过程的根底上，得到本系统的数据处理流程。如图4.2所示。图4.2 数据流程图数据库中包含2个表，即员工根本信息表EmpInfo，包括的数据项有员工姓名、性别、身份证号码、生日、籍贯、民族、家庭住址、联系 ，首签合同时间、试用期、签订合同时间，合同年限等。用户根本信息表Admin，包括的数据项有用户名、密码。下面详细介绍本系统主要的实体以及主要实体之

24、间的关系。1员工劳动合同信息实体E-R图，如图4.3所示。图 员工合同信息实体E-R图2管理员实体E-R图，如图4.4所示。图4.4 管理员实体E-R图4 数据库逻辑结构设计我们需要将上面的数据库概念结构转化为数据库系统所支持的实际数据模型，也就是数据库的逻辑结构。在上面的实体与实体之间关系的根底上，我们就可以在数据库中设计表，本系统中主要的数据库表如下列图所示。1员工劳动合同根本信息表，该表用来存放所有员工合同根本信息。如表4.1所示。表4.1 员工合同根本信息表2管理员信息表，该表用来存放本系统管理员的信息。如表4.2所示。表4.2 管理员信息表4.5 所需实用技术所选开发工具的根本编程方

25、法：1. 根本的后台数据库管理方法。例如创立数据库、创立表、创立查询、返回数据库等2. 常用SQL语句的使用。3. ADO数据库访问技术。第5章 系统界面设计与实现5.1 界面设计原那么程序通过用户界面与用户实现交互。用户界面不仅需要从视觉上看起来美观，而且要求方便用户的操作。通常一个用户界面是由假设干个对象组成的,Windows应用程序的用户界面一般都是由窗体、控件等对象构成的，各个对象之间的联系完全取决于操作者所做的操作。也就是说，程序的运行并没有固定的顺序，这种工作模式，称为事件驱动方式。5.2 用户管理的界面设计5.2.1 登录及注册的界面设计当系统运行时，首先翻开登录窗体，只有通过登

26、录才能进入系统。登录成功后，将显示系统主界面。登录窗体的名称为Login，它的界面布局如图5.1所示。图5.1 登录界面员工合同管理系统登录主要代码如下：Private Sub login_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles login.Click If Me.TextBox1.Text = Or Me.TextBox2.Text = Then MsgBox(请输入用户名和密码) End If Dim conn As New conn.ConnectionString = serve

27、r=.;database=employeeDB;integrated security=true; Dim cmd As New cmd mandText = select * from admin where userid= + Me.TextBox1.Text.Trim() + and password = + Me.TextBox2.Text.Trim() + cmd.Connection = conn conn.Open() Dim dr As dr = cmd.ExecuteReader() Try If dr.Read() Then Me.TextBox2.Text.Trim()

28、Then MsgBox(登录成功！) Main.Show() i = 1 End If dr.Close() conn.Close() Catch ex As Exception MsgBox(ex.Message) End Try If i = 0 Then MsgBox(输入错误,请重新输入或注册) Me.TextBox1.Text = Me.TextBox2.Text = Me.TextBox1.Focus() End If End Sub当管理员运行该程序时，系统判断是否输入了用户名和密码，如果没有输入，输错或没有输入，要求用户输入或者注册。注册界面的名称是register, 它的界面

29、布局如图5.2所示。图5.2 注册界面5 修改密码的界面设计修改密码界面可以重新设定用户登录的密码。窗体的名称为p_edit，如图5.3所示。图5.3 修改密码界面5.3 主界面的界面设计主界面中一级菜单分别为员工根本信息管理，用户管理。一级菜单用户管理的字菜单分别为用户注册，修改密码。窗体的名称为main，如图5.4所示。图5.4 主界面5.3.1 员工根本信息界面员工根本信息模块包含新增，删除，修改，详细信息，导出EXCEL，刷新等功能。其中包含员工根本信息以及重要的合同信息，并包含根本查询模块，组合查询模块，以及按照首签提前十日或续签提前三十日提醒的提醒模块。使用DataGridView

30、来显示员工根本信息，窗体的名称为look，如图5.5所示。图5.5 员工根本信息界面员工根本信息界面主要代码如下：Private Sub look_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Call dgv() 把表填充 Dim i As Integer With Me.DataGridView1 .RowsDefaultCellStyle.BackColor = Color.Beige .AlternatingRowsDefaultCellStyle.BackCol

31、or = Color.LightCyan .AllowUserToAddRows = False .CurrentCell = Nothing .TopLeftHeaderCell.Value = 行号 .RowHeadersWidth = 50 For i = 1 To .RowCount Next End WithEnd SubPrivate Sub dgv()将datagridview填充数据的填充函数 Dim dgvds As New DataSet Dim da As SqlDataAdapter Dim strdgv As String Call DBopen() strdgv =

32、 select emp_id as 合同编号,emp_name as 姓名,emp_sex as 性别,emp_birthday as 出生日期, strdgv = strdgv & emp_comedate as 首签日期,emp_yglx as 用工类型,emp_probation as 试用期,emp_grade as 考核成绩,emp_yn as 是否续签,emp_signdate as 签订合同日期,emp_htime as 合同年限, strdgv = strdgv & emp_folk as 民族,emp_np as 籍贯,emp_did as 身份证号码,emp_rpraddr

33、 as 现在户口所在地, strdgv = strdgv & emp_phone as 联系 ,emp_e_mail as 邮箱,emp_famliy_addr as 家庭住址,emp_remark as 备注from empinfo da = New SqlDataAdapter(strdgv, connection) da.Fill(dgvds, empinfo) DataGridView1.DataSource = dgvds.Tables(empinfo) DataGridView1.CurrentCell = Nothing Dim i As Integer For i = 1 To

34、 Next ta = dgvds.Tables(empinfo) Call DBclose() End Sub5.3.2 员工根本信息录入修改界面员工信息的录入修改，窗体的名称为edit。如图5.6所示。图5.6 员工根本信息录入界面5.3.3 员工根本信息查看界面员工根本信息的查看，此时将其所有信息设置为只读，可按照姓名或合同编号查询，窗体名称为edit。如图5.7所示。图5.7 员工根本信息查看界面5.3.4 员工根本信息导出EXCEL界面此模块将DataGridview中的员工根本信息导出到EXCEL中来实现打印功能。如图5.8所示。图5.8 员工根本信息导出到EXCEL界面员工根本信息

35、导出到EXCEL界面主要代码如下：Private Sub OutExcel(ByVal dt As DataTable) Dim xlsApp As xlsApp = Nothing Dim xlsBook As xlsBook = Nothing Dim xlsSheet As xlsSheet = Nothing Try xlsApp = New xlsBook = xlsApp.Workbooks.Add(True) xlsSheet = xlsBook.Worksheets(1) xlsSheet.Activate() Catch ex As Exception Throw New N

36、ullReferenceException(ex.Message) End Try Dim i, k As Integer Dim table As DataTable table = New DataTable(empinfo) For k = 0 To DataGridView1.Columns.Count - 1 xlsSheet.Cells(1, k + 1) = DataGridView1.Columns(k).HeaderText Next If dt.Columns.CanRemove(dt.Columns.Item(照片) Then dt.Columns.Remove(照片)

37、End If table = dt For i = 0 To table.Rows.Count - 1 For k = 0 To table.Rows(i).ItemArray.Length - 1 xlsApp.Cells(i + 2, k + 1) = table.Rows(i).ItemArray(k) Next Next xlsApp.Visible = True End Sub5.3.5 员工根本信息删除界面当点击DataGridView中的索引号时，选择删除，会出现对话框确定管理员是否要删除选择的员工根本信息。窗体名称为edit。如图5.9所示。图5.9 员工根本信息删除界面5.

38、员工根本信息查询及到期提醒界面根本查询可按照姓名或身份证号码实现员工根本信息查询；组合查询模块可按照首签日期，用工类型，合同年限，签订合同日期来实现单个或组合查询；到期提醒实现首签提前十日提醒，签订正式合同提前三十日提醒。点击提醒后返回员工的根本信息便于查看。窗体名称为edit。如图5.10所示。图5.10 员工根本信息查询及到期提醒界面员工根本信息查询及到期提醒界面主要代码如下：Private Sub query_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles query.Click Dim

39、sql As String Dim dgvds As New DataSet Dim da As SqlDataAdapter Dim strTime As String = Me sql = select emp_id as 合同编号,emp_name as 姓名,emp_sex as 性别,emp_birthday as 出生日期,emp_comedate as 首签日期,emp_yglx as 用工类型,emp_probation as 试用期,emp_grade as 考核成绩,emp_yn as 是否续签,emp_signdate as 签订合同日期,emp_htime as 合同年

40、限, emp_folk as 民族,emp_np as 籍贯,emp_did as 身份证号码,emp_rpraddr as 现在户口所在地,emp_phone as 联系 ,emp_e_mail as 邮箱,emp_famliy_addr as 家庭住址,emp_remark as 备注from empinfo where 1 = 1 If Me boBox1.Text.Trim() Then sql += and emp_yglx = & Trim(ComboBox1.Text) & End If If (DateTimePicker1.Checked = True) Then sql +

41、= and emp_signdate = & DateValue(DateTimePicker1.Value.Date.ToString).ToShortDateString & End If If (DateTimePicker2.Checked = True) Then sql += and emp_comedate= & DateValue(DateTimePicker2.Value.Date.ToString).ToShortDateString & End If If Me.TextBox1.Text.Trim() Then sql += and emp_htime = & Trim

42、(TextBox1.Text) & End If da = New SqlDataAdapter(sql, connection) da.Fill(dgvds, empinfo) DataGridView1.DataSource = dgvds.Tables(empinfo) DataGridView1.CurrentCell = Nothing Dim i As Integer For i = 1 To Next ta = dgvds.Tables(empinfo) Call DBclose() If DataGridView1.RowCount = 0 Then MsgBox(对不起,没有

43、查询到该数据!, , 提示) End If End Sub第6章 系统测试及分析6.1 单元测试系统完成之后，我对各个单元的功能进行了详细的测试，在进行输入数据和预测输出数据相比时发现了一些问题，主要是在查询过程中预计查询结果和实际结果的不一致。有时候达不到要求，这是对数据库的操作表考虑得不够周到，因此往往会出现一些小的错误。还有查询条件的前后数据类型不一致也是一个很常见的错误，需要靠一步一步的查找解决。6.2 集成测试各个单元集成后，在进行集成测试时又会出现一些问题。比方在操作到期提醒的这个过程中，由于录入到数据库中的时间是长整型，而所需的匹配时间是当前日期的短整型，所以很容易造成数据混乱，

44、必须对相应的数据关系理清楚，一些关键查询统计的SQL语句也必须反复斟酌才能放在程序中使用。在测试过程中，经过单元测试和集成测试，排除了系统的大局部错误。当然排除所有错误是不太可能的，我想应该还有些不易检测到的错误还没有被发现，需要在使用的过程中进一步的完善，数据库的加密是一个重要的概念，在实际的应用过程中是一个尚待解决的问题，应该做好数据库的完善工作，特别是备份和平安工作。总 结本系统采用Visual Studio 2005为主要开发工具，结合了Microsoft Server 2000数据库管理系统与XP操作系统。系统设计简单，安装和配置比较方便，根本实现了预期的功能需求。对于维护性而言，后

45、台管理界面做的比较友好，很方便管理员的管理，根本实现了员工合同管理的功能，也根本满足了企业员工劳动合同管理的需求。在整个系统开发过程中，我深刻体会到作为一个应用程序开发者的艰辛。因为在开发前首先要系统分析，进行初步调查，确定需应用的开发软件，制定数据流程图及系统的功能模块图，接着要进行系统设计系统实现。当程序代码编完，还必须对程序进行仔细检查和认真调试，从而使该应用程序的功能更加完善。任何一个系统的开发与设计，都会遇到很多问题，在具体设计中就是要解决这些问题，关键是要有冷静的头脑和坚持不懈的努力以及解决问题的方法，绝不能半途而废，遇到问题要善于思考，分析问题产生的原因，积极向指导老师和其他同学

46、请教并及后时总结经验。毕业设计是本科学习阶段一次非常难得的理论与实际相结合的时机，通过这次企业员工合同管理系统的设计与实现，我将平时所学和实际设计相结合，这不仅锻炼了我综合运用所学专业根底知识解决实际问题的能力，同时也提高了我查阅文献资料及论文写作的能力。虽然即将毕业，但在以后的学习和工作中，一定要继续坚持学习新的专业知识及相关的非专业知识，只有这样才能不断充实自己，获得更多的收获。致 谢经过三个多月的学习和研究，本次毕业设计已接近尾声。本课题的研究设计及学术论文的撰写是在老师的指导下完成的。从选题到开题报告，从写作提纲，到一遍又一遍地指出每稿中的具体问题，给予我极大的帮助，她严格把关，循循善

47、诱，使我的理论和实践能力都有了较大的提高。整个毕业设计的过程中，在相关问题的解决上始终受到的启发，在调试程序时也得到了不积跬步无以至千里，这次毕业论文最终能够顺利完成，归功于各位老师四年间认真负责的教导，使我能够很好的掌握专业知识，并在毕业论文中得以表达。也正是你们长期不懈的支持和帮助才使得我的毕业论文最终顺利完成。因此，我再次向计算机科学与技术系的全体老师们表示衷心感谢：谢谢你们，谢谢你们四年的辛勤栽培！最后，感谢学校为我们提供了丰富的参考资料及学习环境，使我可以潜心学习和研究。在今后的学习和工作中，我会继续努力，争取更好的报答母校。参 考 文 献M.冶金工业出版社,2007.2王华杰.VB

48、.NET.编程实例详解M.中国铁道出版社,2002.3戚庆余.企业合同管理实务：制度与操作M.中国法制出版社，2021.4陈宏刚.软件开发过程与实例M.清华大学出版社,20025李春葆.VB.NET2005程序设计教程M.清华大学出版社，2021.J.2005,(1).7王珊等.数据库系统概论M.高等教育出版社,2006.8张明虎.J.2006,(2).9陈丽洁,叶小忠.企业合同管理操作实务M.法律出版,2021-11.10张海藩,倪宁.软件工程M.人民邮电出版社,2021-02.11普雷斯曼,郑人杰,马素霞,白晓颖.软件工程实践者的研究方法M. 机械工业出版社,2007-01.12章立民.S

49、QL Server 数据库开发实践M.北京：机械工业出版社,2007. 13李春.VB.NET2005程序设计教程M.北京：清华大学出版社,2021.14徐安东等.Visual Basic数据库应用开发教程M.清华大学出版,2006.15黄明,梁旭,曹利超.高等院校计算机专业毕业设计指导及开发实例丛书报J.2005.16苏国彬.M.机械工业出版社.2002.17邓良松等.软件工程M.西安电子科技大学出版社.2005.18Shelley Erickson. Steven Mandel. Should you switch to VB .NET? J. Test & Measurement Wor

50、ld , 2002, 22(13).19Alok Mehta. Create and Update Web Services Using VB .NET and ADO.NETJ. Access VB - SQL Advisor, 2004, 12(1).20P.Zhang,G.M.vonDran.SatisfiersandDissatisfiers:ATwo2Factor Model for Website Design and EvaluationJ.JOURNAL OF THE AMERICAN SOCIETY FOR INFORMATION SCIENCE,2000,(14).附 录局

51、部代码如下：Imports 翻开或关闭数据库ImportsModule Module1 Public userid As String 用户ID Public userPwd As String 用户密码 Public Conn As String = server=.;database=employeeDB;integrated security=true; Public connection As Public Function DBopen() As Boolean 翻开数据库 Try connection = New connection.ConnectionString = Conn

52、 connection.Open() Return True Catch ex As Exception MsgBox(ex.ToString) Return False End Try End Function Public Function DBclose() As Boolean 关闭数据库 Try connection = New connection.ConnectionString = Conn connection.Close() Return True Catch ex As Exception MsgBox(ex.ToString) Return False End Try

53、End FunctionEnd ModulePrivate Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click 修改用户信息或新增用户If update_id = 1 Then Call DBopen() Dim str_update As String str_update = update empinfo set emp_name= & Trim(TextBox1.Text) & ,emp_sex= & Trim(ComboBox2.Text)

54、 & , str_update = str_update & emp_birthday= & DateValue(dt2).ToShortDateString & ,emp_htime= & Trim(TextBox2.Text) & , str_update = str_update & emp_comedate= & DateValue(dt1).ToShortDateString & ,emp_grade= & Trim(ComboBox3.Text) & , str_update = str_update & emp_folk= & Trim(TextBox7.Text) & ,emp

55、_np= & Trim(TextBox6.Text) & ,emp_yn= & Trim(ComboBox4.Text) & , str_update = str_update & emp_did= & Trim(TextBox9.Text) & ,emp_probation= & Trim(TextBox4.Text) & , str_update = str_update & emp_rpraddr= & Trim(TextBox10.Text) & ,emp_phone= & Trim(TextBox15.Text) & ,emp_dqdate= & str1 & , str_updat

56、e = str_update & emp_e_mail= & Trim(TextBox17.Text) & ,emp_famliy_addr= & Trim(TextBox18.Text) & ,emp_signdate= & dt3 & , str_update = str_update & emp_yglx= & Trim(ComboBox1.Text) & ,emp_remark= & Trim(TextBox20.Text) & str_update = str_update & where emp_id= & Trim(TextBox3.Text) & Dim cmd As New

57、SqlCommand(str_update, connection) cmd.ExecuteNonQuery() Call DBclose() MsgBox(修改个人根本信息成功!, , 提示) Call text_ReadOnly_true() ToolBar1.Enabled = True ds.Clear() Else Call DBopen() Dim str_insert_empinfo As String str_insert_empinfo = insert into empinfo(emp_id,emp_name,emp_sex,emp_birthday,emp_htime,

58、str_insert_empinfo = str_insert_empinfo & emp_comedate,emp_folk,emp_np, str_insert_empinfo = str_insert_empinfo & emp_did,emp_rpraddr,emp_phone,emp_dqdate, str_insert_empinfo = str_insert_empinfo & emp_e_mail,emp_famliy_addr,emp_yglx,emp_probation,emp_grade,emp_yn,emp_signdate,emp_remark) values ( &

59、 Trim(TextBox3.Text) & , str_insert_empinfo = str_insert_empinfo & & Trim(TextBox1.Text) & , & Trim(ComboBox2.Text) & , & dt2 & , & Trim(TextBox2.Text) & , str_insert_empinfo = str_insert_empinfo & & dt1 & , & Trim(TextBox7.Text) & , str_insert_empinfo = str_insert_empinfo & & Trim(TextBox6.Text) &

60、, & Trim(TextBox9.Text) & , str_insert_empinfo = str_insert_empinfo & & Trim(TextBox10.Text) & , str_insert_empinfo = str_insert_empinfo & & Trim(TextBox15.Text) & , & str1 & , str_insert_empinfo = str_insert_empinfo & & Trim(TextBox17.Text) & , & Trim(TextBox18.Text) & , str_insert_empinfo = str_in