工资管理信息系统的设计_毕业设计论文.doc

工资管理系统摘 要本论文的主要容是小型企业工资管理系统的设计与开发。该系统对工资信息进行管理,具有手工管理所无法比拟的优点。可以存储所有有关工资、津贴、奖金等容,安全高效；实现报表功能。该系统是典型的信息管理系统,其开发主要包括后台数据库的建立、维护以及前端应用程序的开发两个方面。对于数据库要求具有数据一致性和完整性强、数据安全性好的特点；而对于应用程序,则要求系统功能完备、易操作、界面友好等特点。关键词：管理信息系统；数据库；VB6.0AbstractThe present paper primary coverage is the small business wages management system management system design and the development.This system carries onthe management to the wages information, has merit which the manual administration center is unable to compare.It may save all related contents and so on wages, allowance, bonus, safe highly effective; rapidly needs the information; Realization report form function.This system is the typical information management , Its development mainly includes the backstage database the establishment, the maintenance as well as front end the application procedure development two aspects.Requests regarding the database to have the data uniformity and the integrity strong, the data security good characteristic; But regarding application procedure, then requests the system function complete, easy to operate, the contact surface in a friendly way and so on the characteristics.Key word: Management information system; Database目 录摘要11.1 管理信息系统的历史和发展51.2 本系统开发的目的和意义51.3 本系统的假设、限制和要求62.1 用户需求分析72.2.2 工资管理信息系统业务流程图72.3.2 后台数据库的选择92.3.3 什么是ADO93系统概要设计113.1 系统结构描述113.2 系统总体功能图113.3 模块设计113.4 数据库设计123.4.1 概念设计123.4.3物理设计144. 详细设计与模块的实现164.1 创建数据库164.2 系统标准模块184.3.2 设计与实现194.4 人员管理模块的设计与实现204.4.1 创建添加员工窗体204.4.2 创建修改员工窗体214.5 职位管理模块的设计与实现224.5.1 创建添加职位窗体234.5.2 创建修改职位窗体234.6 特殊项管理模块的设计与实现244.6.1 创建添加特殊项窗体254.6.2 创建修改特殊项窗体254.7 工资发放管理模块的设计与实现264.8 统计报表模块的设计与实现275. 结束语30致31参考文献32附录源程序清单331前言1.1 管理信息系统的历史和发展管理信息系统MIS,Management Information System,是一个由人、计算机等组成的能进行信息的收集、传送、储存、维护和使用的系统,能够实测企业的各种运行情况,并利用过去的历史数据预测未来,从企业全局的角度出发辅助企业进行决策,利用信息控制企业的行为,帮助企业实现其规划目标。管理信息系统通过对企业当前运行的数据进行处理来获得有关信息,以控制企业的行为；利用过去和现在的数据及相应的模型,对未来的发展进行预测；能从全局目标出发,对企业的管理决策活动予以辅助。从工业发达国家来看,管理信息系统的发展经历了以下几个阶段。第一阶段：1953年至1965年单项数据处理阶段,也称电子数据处理EDP阶段。这是电子计算机在管理领域应用的起步阶段。这一阶段,由于当时计算机硬、软件的限制,数据处理的性质只是使用计算机代替人的手工劳动,进行简单的单项数据处理工作,如计算工资、数据统计、报表登记、编制计划等。这个阶段的处理方式主要是集中式的批处理。第二阶段：1965年至1970年综合数据处理阶段,也称事务处理系统TPS阶段。这个阶段计算机硬、软件有了很大的发展,出现了多用户的分时系统,计算机开始应用于对某一个管理子系统的控制,并具有一定的反馈功能。如库存管理系统、生产调度系统、物资管理系统等。这个阶段的处理方式已发展为面向终端的联机实时处理。第三阶段：1970年至今管理信息系统MIS阶段。这个阶段是在企业中全面的使用计算机把各种管理子系统的功能集中起来,构成了计算机化的全方位的信息系统,即现代管理信息系统。这个阶段的处理方式是在数据库和网络基础上组成分布式处理系统。它的特点是使用数据库和分时处理的计算机网络,并充分利用运筹学等数学方法,实现了硬件、软件和数据资源的共享。1.2 本系统开发的目的和意义工资管理系统是一个企业单位不可缺少的部分,它的容对于企业的决策者和管理者来说都至关重要。所以工资管理系统应该能够为用户提供充足的信息和快捷的查询手段。但一直以来人们使用传统人工的方式管理文件档案,这种管理方式存在着许多缺点,如:效率低、性差等。另外时间一长,将产生大量的文件和数据,这对于查找、更新和维护都带来了不少的困难。随着科学技术的不断提高,计算机科学日渐成熟,其强大的功能已为人们深刻认识,它已进入人类社会的各个领域并发挥着越来越重要的作用。作为计算机应用的一部分,使用计算机对工资信息进行管理,具有手工管理所无法比拟优点。例如：检索迅速、查找方便、可靠性高、存储量大、性好、寿命长、成本低等。这些优点能够极地提高工资管理的效率,也是企业的科学化、正规化管理,与世界接轨的重要条件。因此,开发这样一套工资管理软件成为很有必要的事情。1.3 本系统的假设、限制和要求本论文所讨论的是一个毕业设计示例软件系统,因此将重点放在功能的实现上,即不重复相同模式的功能实现。所以系统的核心输出结果,即工资只与职工基本信息的职位栏和职工绩效考核成绩有关。基本表字段的设计只取其重点,初始版本将重点放在系统的实现上,后续版本才能最终适用。所开发的软件系统应该满足如下基本要求：1) 功能：管理员工基本信息、绩效考核、职位管理和工资发放记录。2) 性能：能够支持数据存储,使用方便。3) 输入：员工基本信息、考核详细记录等相关信息。4) 输出：员工信息、员工工资,报表等。基本数据流程和处理流程：1) 用户输入员工信息,包括、性别、出生日期、职位等。2) 职位管理输入和修改跟职位有关的信息,如基本工资等。3) 每月考核员工的成绩,包括迟到、早退、旷工等信息。4) 系统根据职位和考核成绩自动生成工资单2.系统需求分析需求分析是对系统开发提出明确要求的过程,其结果是后续系统开发工作的基础。需求分析是在用户调查的基础上,通过分析,逐步明确用户对系统的需求,包括数据需求和围绕这些数据的业务需求。2.1 用户需求分析本文的主要容是编制出一个实用的程序来帮助小型公司进行更有效的工资管理。 归纳起来,好处大约有以下几点：<1> 可以存储职员的档案,安全、高效；<2> 只需一到二名会计人员经过基本培训即可操作系统,节省大量人力；在假设的条件下,用户的需求可分为如下几个方面：第1方面是员工的管理,包括员工的、性别、职位等信息；第2方面是职位的管理,每个职位对应着相应的工资和津贴；第3方面是绩效考评的管理,包括各种奖惩措施,以及项目提成等容；第4方面是工资发放；第5方面是各种各样的统计报表,方便用户对以往数据的把握和管理；2.2 业务流程2.2.1 业务流程图图示说明图2.1业务流程图图示说明2.2.2 工资管理信息系统业务流程图根据假设条件,设工资发放的业务流程如图2.2所示。我们所开发的工资管理信息系统是基于这一业务流程的。图2.2 工资管理信息系统业务流程图首先员工将自己的个人档案提交给系统管理人员企业管理人员,管理员将档案信息录入系统；职位信息统一修改由职位确定的基本工资等信息,对系统来说,属于静态工资；绩效信息是对一段时间比如一个月对员工的考评成绩,系统将根据员工的档案信息和考评成绩自动确定员工的工资数量,最后生成工资清单。通过业务流程图我们可以看到,档案信息、职位信息和绩效考核信息的生成是工资清单的前提条件。因此,在每一期工资清单生成前,都必须考核相应的员工,否则,系统将不允许生成该员工的工资清单。这是也是需要说明的业务规则。2.3技术要求2.3.1 前台开发语言的选择Visual Basic 继承了BASIC语言简单易学的优点,又增加了许多新的功能,它采用面向对象与事件驱动的程序设计思想,使编程变得更加方便、快捷。Visual Basic是国外最流行的程序设计语言之一,它是可视化开发工具的先驱与典,它所具有的可视化、面向对象、组件开发等特性,大大缩短了应用软件的开发周期,因此,深受广大软件开发人员的厚爱。Visual Basic 6.0的特点：1.可视化：Visual Basic是可视化开发工具的先驱与典,实际上,Visual Basic所展现出来的可视性风格,已经成为了诸多可视性继承开发工具的参照标准。可视化环境下创作前端界面就如同做拼图游戏那样简单,Visual Basic之所以成为Windows环境下快捷、便利的前端开发工具,并获得最广泛的用户群体支持,其所具有高度智能的人性化开发环境起了很大的作用。2.面向对象：面向对象编程思想OOP诞生与20世纪80年代初期,并先期在Ada、Small Talk、C+等程序设计语言中实现。它是建立在类模块基础上的,并通过类的封装、继承、多态性获得代码重用。这个特点尤其体现在它所具有的基于部件的编程方法上。3.部件编程：基于部件的编程方法是分布式构架思想体系的具体化。在Visual Basic中进行部件编程是通过微软的部件对象模型COM,Componet Object Model实现的。COM是建立在二进制标准上的对象模型,其具有通用性。因此,在Visual Basic中创建的部件可以自用,也可以在其他开发环境中使用,同时Visual Basic也可以引用由其他开发工具建立的部件。4.事件驱动：基于事件驱动的编程方法体现在程序的执行是依靠系统能够被识别的触发事件启动的。用户操作、系统信息,以及程序等各种因素都可能触发事件。当对象由一种状态过渡到另一种状态时,可能会发生许多个与时间相关的有序事件,而事件顺序又将决定着代码执行顺序,因此,基于事件编写程序也就成为了根据有待解决的问题性质合理安排事件和根据事件顺序有效地组织程序。Visual Basic 6.0是一个非常优秀的数据库应用前端开发工具,它能通过ODBC、Jet、ADO等中间连接件而获得对数据库的前端操作。在数据库应用系统的创建过程中,Visual Basic 6.0能够出色地承担起前端界面层和中间连接层的创建任务。2.3.2 后台数据库的选择Access是Office软件包的成员之一,擅长对数据进行处理,例如建立,排序,分类及汇总数据等操作。Access最重要的特征是不必编写程序。Access中数据库文件不是简单的存储数据的表,其数据库文件还包括操作或控制数据的其他对象如查询,窗体和报表等。数据库应用总是会涉及到这3个方面的问题：前端程序、数据库结构、前端程序和数据库之间的连接, 在这里Visual Basic 6.0通过ADO这一中间连接件而实现对数据库操作的。2.3.3 什么是ADOADOActive Data Objects：Active数据对象。是DAO/RDO的后继产物,ADO"扩展"了DAO和RDO所使用的对象模型,这意味着它包含较少的对象、更多的属性、方法和参数,以及事件。ADO实际上是一种提供访问各种数据类型的连接机制。在使用 Visual Basic进行数据库程序的开发时,必须建立与数据库的连接。Visual Basic中有三种可用的数据访问接口：ActiveX 数据对象<ADO>、远程数据对象<RDO> 和数据访问对象<DAO>。数据访问接口是一个对象模型,它包含了用于访问数据库的各种变量和函数。Visual Basic 中的三种数据访问接口分别代表了该技术的不同发展阶段。最新的是 ADO,它是比RDO和 DAO 更加简单,然而更加灵活的对象模型。目前普遍使用 ADO 作为数据访问接口。3系统概要设计3.1 系统结构描述开发此系统的目的就是帮助小企业管理人员提高工作效率,实现工资管理的系统化、规化和自动化。根据这个系统所要实现的目的和任务,总结出这个系统最终实现的主要功能如下：1) 员工档案管理。主要员工基本档案信息的管理。2) 职位信息管理。主要用来统一管理各个职位的与工资有关的基本信息。3) 绩效考核。主要完成每期对员工进行考核。4) 工资发放。完成对员工的工资管理功能。5) 报表功能。主要完成查看历史工资发放信息。3.2 系统总体功能图概要设计阶段,我们可以得到系统总体功能图如图3.1所示：图3.1 系统总体功能图3.3 模块设计根据上面的分析,工资管理信息系统各个模块的名称和功能概要说明如下：1) 员工档案信息管理。增加、修改和删除员工基本档案信息。2) 职位信息管理。主要用来统一各个职位的与工资有关的基本信息。用户功能包括增加、修改和查看基本职位的各项工资信息。3) 特殊项管理。每期对员工进行考核,考核成绩包括迟到、早退、加班等方面。管理人员可以根据条件增加、修改和查看员工考核记录。4) 工资发放。管理人员选择员工、日期,系统生成该员工在该期的工资。5) 报表功能。根据条件罗列、统计已经发放的工资。3.4 数据库设计3.4.1 概念设计系统在概念设计阶段常用E-R图表现。E-R图即实体关系图<Entity relationship diagram>。实体关系图可以定义为两个层次,即可以从逻辑数据模型转移到实施模型。E-R图涉及两个方面,一是实体,二是关系。实体关系图中的实体有三种：一般实体normal entity,表示逻辑或物理数据集；联系实体associate entity,表示含有多对多关系的关系表；分解实体decompositions,表示一组将在下层实体关系图中细化的数据。实体通过关系而相连。一个"关系"可加两个标识labels,指出各自的关系指向。"关系"的基数类型Cardinality可以改变,而不必删除这个关系然后再重新生成一个新关系。"关系"的基数类型有三种：一对一关系；一对多关系即实体B的多个实例可以与实体A的一个实例存在关系,反之亦然；多对多关系即实体B的多个实例可以与实体A的多个实例存在关系,反之亦然。"任意关系"optional relationship是指两个实体的关系可以不存在。"子型关系"subtype relationship是"父实体"与"子实体"间的关系,指明"父实体"的属性可以被"子实体"所继承。与现存物理数据库有关的实体关系图可以自动生成。要实现这一点,必须能够自动生成实体表示物理意义的表以及基于表间关系的实体间关系。在此基础上,数据建模软件便可以自动生成图。通过含有实体和相互间关系的浏览器,可以看到哪些关系是强制的,哪些是任意的。本系统的E-R如图3.3所示：职工XX性别出生年月工作年月职位职工IDn属性1职位职位基本工资津贴11发放考核1n工资特殊项时间金额名称职工ID职工ID工资取毕合计工资图3.3 系统实体关系图3.4.2逻辑设计关系模式1：员工档案员工ID,职位,性别,出生年月,工作年月>主键：员工ID外键：职位关系模式2：工资<员工ID,工资取毕,合计工资>主键：员工ID关系模式3：特殊项<特殊项ID,职工ID,特殊项名称,特殊项金额,特殊项时间>主键：特殊项ID外键：员工ID关系模式4：职位<职位,基本工资,津贴>主键：职位3.4.3物理设计根据上面分析的各种功能要求,以下列出数据库中所建立的各个表的具体设置：1、职工表名称职工字段名称类型<宽度>关键字可为空编码规则取值围职工ID文本10PKnot null文本<10>性别文本<2>男,女职位文本<10>FKNot null出生年月日期<8>工作年月日期<8>2、工资表名称工资字段名称类型<宽度>关键字可为空编码规则取值围缺省值职工ID文本<10>PKnot null工资取毕是否合计工资货币3、职位表名称职位字段名称类型<宽度>关键字可为空编码规则取值围缺省值职位文本<10>PKnot null津贴货币补助货币4、特殊项表名称特殊项字段名称类型<宽度>关键字可为空编码规则取值围缺省值特殊项ID文本10PKnot null职工ID文本<10>FK特殊项名称文本<100>特殊项金额货币特殊项时间日期<8>4. 详细设计与模块的实现4.1 创建数据库打开Access,创建数据库,命名为职工工资管理系统。如图4.1所示图4.1 创建数据库使用设计器创建数据库所需各个表格。如图4.2所示：图 4.2 创建表：职工点击保存确定后,可以在职工工资管理系统数据库的目录下看到职工表,如图图4.3. 保存后职工表接着按照设计好的E-R创建其他的表,具体过程与此相同,在此处略。创建好所需表后建立数据库表之间的关系,如图： 图4.4 职工工资管理系统数据库表之间的关系4.2 系统标准模块使用VB开发管理信息系统,首先创建标准模块。标准模块文件扩展名为.bas,是用来存放公用变量和公用函数的模块。一个过程可能用来响应几个不同对象中的事件,应该将这个过程放在标准模块中,而不应在每一个对象的事件过程中重复相同的代码。在该系统中,标准模块包括打开数据库连接,关闭数据库连接,打开数据库集合和关闭数据库集合等操作：'变量要求声明Option Explicit'数据库文件的名称Public gFile As String'数据库连接对象 Public gCon As New ADODB.Connection '数据库集合对象Public gRst As New ADODB.Recordset'程序对象Public gX As Excel.Application4.3 系统主界面4.3.1 界面设计启动工资管理信息系统后,系统进入主界面。如图4.4所示：图 4.5 系统主界面主界面没有包含控件,但是包含一个菜单,菜单中包括：人员管理窗体,职位管理窗体,特殊项管理窗体,工资发放窗体,统计报表窗体和退出程序。4.3.2设计与实现相应MDIForm对象的Load事件,对整体进行初始化'设置启动参数Private Sub MDIForm_Load<> gFile = App.Path & "职工工资管理系统.mdb" Set gX = CreateObject<"Excel.Application">End Sub调用主界面中的各个窗体,如调用"人员管理"窗体：Private Sub HRManage_Click<> HRForm.ShowEnd Sub 其他窗体同上方法。4.4 人员管理模块的设计与实现人员管理窗体的功能主要实现人员的增改删功能。如图 4.5所示：图4.6 人员管理窗体用户重新选择DataGrid1控件中的行列,则记录用户所在的行。用户单击"添加员工"按钮,则显示添加员工窗体。用户单击"删除员工"按钮,则弹出对话框确认,无误之后执行SQL语句,删除员工。然后刷新ADO数据控件,保证数据库和DataGrid控件中的数据一致性。用户单击"修改员工"按钮,则显示修改员工窗体,并将相关的用户选定信息传递给修改员工窗体。操作完毕,用户单击"取消"按钮,可以退出本窗体。编写窗体代码：首先定义窗体的成员变量,为了让其他窗体使用这个变量,设置其属性为Public:'当前选定行号Public CurEm As Integer4.4.1 创建添加员工窗体本窗体实现添加一条记录到职工表,并刷新人员管理窗体中的ADO数据控件,保持数据的一直性。首先新建一个窗体,添加员工窗体包含两个控件数组,lblField是一个Label控件数组,用于显示字段名称,txtValue用于输入这些字段的值；另外还有一个"添加"按钮和"取消"按钮,分别实现添加员工和退出窗体的功能。如图4.6所示：图4.7 添加员工窗体4.4.2 创建修改员工窗体 在窗体显示的时候,保证窗体上面的数据与在人员管理窗体上选定的行的数据一致,同时保证职工ID不可改动。当用户单击"修改"按钮时,生成并执行对应的修改语句。窗体初始化时,会把"人员管理"窗体中选中的数据显示到TxtValue控件数组中,用户修改 txtValue控件数组中的文字容。单击"修改"按钮,则生成并执行语句,实现修改功能。单击"取消"按钮,退出该窗体。如图.7所示：图4.8修改员工窗体4.5 职位管理模块的设计与实现点击主窗口"职位"菜单后,显示职位信息管理窗口。该模块实现职位信息的添加、删除、修改功能。如图4.8所示：图4.9 职位管理窗体用户重新选择DataGrid1控件中的行列,则记录用户所在的行。用户单击"添加职位"按钮,则显示添加职位窗体。用户单击"删除职位"按钮,则弹出对话框确认,无误之后执行SQL语句,删除职位,然后刷新ADO数据控件,保证数据一致性。用户单击"修改职位"按钮,则显示修改职位窗体,并将相关用户选定信息传递给修改职位窗体。操作完毕,用户单击"取消"按钮,可以退出本窗体。其中为了保证数据库和DataGrid控件中的数据一致性,实现DataGrid控件的数据显示要进行以下操作：SQL = "SELECT * FROM 职位"Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & gFile & "Mode=ReadWrite;Persist Security Info=False" Adodc1.RecordSource = SQLAdodc1.RefreshSet DataGrid1.DataSource = Adodc1DataGrid1.Refresh4.5.1 创建添加职位窗体本窗体实现添加一条记录到职位表,并刷新人员管理窗体中的ADO数据控件,保持数据的一致性。在窗体初始化的时候,初始化为1b1Field控件数组。用户对txtValue控件数组的属性进行修改,当用户单击"添加"时,生成SQL语句并执行,同时刷新职位管理窗体的数据。如图4.9所示:图4.10 添加职位窗体4.5.2 创建修改职位窗体本窗体在显示的时候,保证窗体上面的数据与在职位管理窗体上选定的行的数据一致,同时保证职位不可改动。窗体初始化时,会把"职位管理"窗体中选中的数据显示到TxtValue控件数组中。用户单击"修改"按钮,则生成并执行SQL语句,实现修改的功能。用户单击"取消"按钮,退出该窗体。如图4.10所示：图4.11 修改职位窗体4.6 特殊项管理模块的设计与实现点击主界面"特殊项管理"菜单后,显示特殊项窗口。该窗口实现对特殊项的添加,删除和修改功能。其界面如下图所示：图4.12 特殊项管理界面初始进入界面时,界面左侧显示表所有查询记录,右侧设有4个按钮,分别实现增改删的功能。用户单击"添加特殊项"按钮,则显示添加特殊项窗体。用户单击"删除特殊项"按钮,则弹出对话框确认,无误后执行SQL语句,删除特殊项,刷新ADO数据控件,保证数据的一致性。用户单击"修改特殊项"按钮,则显示修改特殊项窗体,并将相关的用户选定信息传递给修改特殊项窗体。操作完毕,用户单击"取消"按钮,可以退出本窗体。4.6.1 创建添加特殊项窗体本窗体实现添加一条记录到特殊项表,并刷新人员管理窗体中的ADO数据控件,保持数据的一致性。在窗体初始化的时候,初始化1b1Field控件数组。用户选择对应的员工,程序能够自动查找到对应的职工ID：响应cmbName的单击事件,单击的时候会自动查找相对应的职工ID。'保证与ID一致Private Sub cmbName_Click<> cmbID.Text = cmbID.List<cmbName.ListIndex>End Sub 如图4.12所示：图4.13 添加特殊项窗体4.6.2 创建修改特殊项窗体窗体初始化时,会把"特殊项管理"窗体中选种的数据显示到TxtValue控件数组中。用户单击"修改"按钮,则生成并执行SQL语句,实现修改的功能。用户单击"取消"按钮,退出该窗体。如图4.13所示：图4.14 修改特殊项窗体4.7 工资发放管理模块的设计与实现用户点击主界面"工资"菜单,显示发放工资窗口。本窗体实现的具体功能如下：动态生成当月的工资表,查询指定员工的工资信息,发放工资,打印工资凭条。如图4.14所示：图4.15 工资发放界面用户进入界面,首先选择要发工资的月份和职工的,点击"生成月表"按钮,系统便将生成的工资记录显示在界面左侧的数据栅格中。单击"发放工资"按钮,发放工资,即将工资月表中的"发放完毕"字段设置为1。编写窗体代码,首先要声明两个窗体变量。分别是月表的名称和员工的工资总额：Option Explicit'月表的名称'动态生成'在cmbMonth中用户可以填入2003-6, 2003-06, 2003-06-01等格式'而月表的名称都会变为200306Public mTableName As String'员工工资总额'计算得到Public mSum As Double4.8 统计报表模块的设计与实现用户点击主界面"报表"菜单,系统显示报表。如下图所示：图4.16 统计报表运行时界面本系统中只实现了前3个按钮的功能。本窗体的工作流程就是在用户单击需要的按钮,显示相应的窗体。窗体的代码如下：Private Sub cmdMonthAll_Click<> ThisMonthSumForm.ShowEnd SubPrivate Sub cmdMonthSpecial_Click<> ThisMonthSpecialForm.ShowEnd SubPrivate Sub cmdThisMonthSalary_Click<> ThisMonthSalaryForm.ShowEnd SubPrivate Sub cmdYears_Click<>End SubPrivate Sub Form_Load<>End Sub5. 结束语本系统从开始到完成用了几个月的时间,其中包括熟悉环境,设计编程与程序调试,最后撰写毕业论文。通过这次毕业设计的实际"练兵",使我对管理信息系统和数据库有了更深刻更直观的认识。平时课堂上的理论经过自己的亲身实践,我对管理系统的开发过程包括需求分析、概要设计、详细设计、代码编写、测试等都有深刻的体验和全面的认识。经过这段时间的设计和开发,工资管理系统基本开发完毕。其功能基本符合用户需求,能够完成公司人员档案的存储和工资的查询。对于数据的一致性的问题也通过程序进行了有效的解决。但是由于毕业设计时间较短,所以该系统还有许多不尽如人意的地方,比如联机文档比较少,用户界面不够美观,出错处理不够等多方面问题。这些都有待在以后的版本中进一步改善。致 首先我要感我的指导老师王贵珍。其次,我还要感我的同事,当我遇到难题时他们帮助我一起解决,使我能在最短的时间里解决这些难题。在此,对于这些给予我帮助的人们表达我深深地意！并祝他们永远快乐！参考文献1、VB6.0数据库开发典型实例王兴晶,：电子工业,出版日期：2002.92、数据库设计Ryan K.Stephens,Ronald R.Plew,何玉洁 武欣 邓一凡 等译,：机械工业,出版时间：2001.33、Visual Basic 数据库应用系统开发从基础到实践长林 丽华 王红,：电子工业,出版时间：2005.94、VB 6.0中文版教程 新智工作室编著,：电子工业,出版时间：2002.15、数据库应用基础 Access 2003 平主编,：人民邮电,出版时间：2007.26、数据库原理与系统开发教程 伍俊良主编,：清华大学,出版时间：2007.27、VB语言程序设计 林卓然编著,：电子工业,出版时间：2003.98、VB6.0程序设计实训教程 克玉主编,：机械工业,出版时间：2005.29、VB6.0程序设计教程 罗朝盛主编,：人民邮电,出版时间：2004.210、Scot Hillier's COM+ Programming with Visual Basic Scot Hillier,：Sams,出版时间：2000.911、毕业设计过程中查阅的：.51cmm./附录 源程序清单一、标准模块'变量要求声明Option Explicit'Access数据库文件的名称Public gFile As String'数据库连接对象Public gCon As New ADODB.Connection'数据库集合对象Public gRst As New ADODB.Recordset'Excel程序对象Public gX As Excel.Application'打开数据库文件Public Sub OpenDBFile<>'打开错误处理陷阱Dim intErrFileNo As Integer '自由文件号On Error GoTo ErrGoto'-gCon.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & gFile & "Mode=ReadWrite;Persist Security Info=False"'- Exit Sub '-ErrGoto:'把错误信息保存在文件里 intErrFileNo = FreeFile<>Open "YFSystem.ini" For Append As intErrFileNo Print #intErrFileNo, Chr<34> + Format<Now, "YYYY-MM-DD HH:MM:SS"> + Chr<34>, Chr<34> + "信息" + Chr<34>, Chr<34> + Err.Description + Chr<34>, Chr<34> + "OpenDBFile<Module1>" + Chr<34>, Chr<34> + App.Title + Chr<34> Close #intErrFileNoEnd Sub '关闭数据库连接 'Public Sub CloseDBFile<> '打开错误处理陷阱 Dim intErrFileNo As Integer '自由文件号 On Error GoTo ErrGoto '- gCon.Close '- Exit Sub '-ErrGoto:'把错误信息保存在文件里 intErrFileNo = FreeFile<> Open "YFSystem.ini" For Append As intErrFileNo Print #intErrFileNo, Chr<34> + Format<Now, "YYYY-MM-DD HH:MM:SS"> + Chr<34>, Chr<34> + "信息" + Chr<34>, Chr<34>