《毕业设计-VB辅料物资管理信息系统》

1、 论文提纲绪论1.背景知识 1.1程序设计及运行环境 为Microsoft Windows 2000 Professional Visual Basic 6.0 Microsoft Access 2000 Microsoft Excel 20001.2 Visual Basic 6.0 简介 “Visual指的是开发图形用户界面GUI的方法，它不需要编写大量的代码去描述界面元素的外观和位置，而只要把预先建立的对象拖放到屏幕上的一点既可。“Basic指的是Beginners All-Purpose Symbolit Instruction Code 的简称，这是一种在计算技术开展历史上应用的最为

2、广泛的语言。Visual Basic包含数百条语句、函数和关键词，其中很多和Windows GUI有直接关系。1.3 Microsoft Access 2000简介 作为Microsoft Office 2000 专业版的重要组件，Microsoft Access 2000 是开发中小型关系数据库系统的最强大平台之一，它的功能包含了，建立整齐的资料表格、对资料做处理、对需要的资料做查询、资料的输出、打印报表。1.4 Microsoft Excel 2000简介 Microsoft Excel表格是微软公司Microsoft Office套件中专门用作电子表格处理的软件，也称电子表格，它的特长是

3、处理比较规那么的数据，例如人事、档案、工资信息，还可以对这些信息进行分析、计算、处理，而且操作起来也很方便例如增加、删除、复制等都很容易，而且它的数据都是一些独立的文件，可以很方便地复制、传输，因此在实际的办公中，Microsoft Excel的到了很广泛的应用 根据对辅料物资管理部门工作人员需求的分析,经归纳后。3.系统结构设计 Access 2000构建的数据库，以及用于打印和预览报表的Excel 2000工作表构成3.1系统结构 3.2辅料物资管理系统模型 3.2.1辅料物资管理系统子系统设计 辅料物资信息管理系统包含4个子系统：它们是流水账处理模块、明细账处理模块、报表处理模块、字典处

4、理模块。3.2.2 E-R信息模型的设计 结合具体DBMS所提供的数据模型类型，导出关系数据模型，从而进行数据库设计。4.辅料物资管理系统功能介绍 4.1进入辅料物资管理系统 由于本系统只对仓库管理员和相关领导及管理人员开放，因此，为了保证数据的平安性，本系统专门设计了用户密码，只有拥有密码者方可进入系统。4.2系统主界面简介 4.3流水账处理 4.4明细账查询 4.5打印月报表 字典处理模块的主要功能是对物资进行分类管理，通过该模块，用户可以对系统的数据信息进行维护，可以添加、删除和修改有关的数据信息，并且在添加数据信息时，为方便用户的操作与管理，用户只需要输入相应的数据名称，而数据的编号是

5、系统根据现有编号直接按顺序生成的，简化了操作过程，有效的减少了输入中可能产生的错误。5.实现 5.1如何实现与数据库之间的链接 5.2如何利用Visual Basic 6.0 实现报表的创立 结束语 辅料物资管理信息系统摘 要由于长期以来，物资管理部门的各类物资管理工作都是采用手工管理，这不仅工作效率低、层次多、重复劳动多、管理复杂、数据统计缓慢，而且非常容易出过失。同时，由于在手工管理方式下，各种账目繁多，信息处理速度慢，特别是综合数据处理速度更慢，并且管理复杂，难以及时的得到反应信息，使各种库存信息不能有效的应用于企业管理，造成了企业资源的浪费和管理本钱的提高。因此，出于解决上述问题的目的

6、，本文阐述了基于Visual Basic 6.0、Microsoft Access 2000和Microsoft Excel 2000模式下的辅料物资管理系统的实现。本套系统包括对辅料物资的入库情况、出库情况即领用情况、库存情况的管理，各种报表系统的打印，以及字典处理等各种功能。在实现上，主要是应用Visual Basic 开发整套系统的整体架构，用Microsoft Access 2000对辅料物资和领料单位的各种数据进行存储，用Microsoft Excel 2000来进行报表的设计。关键词：辅料物资管理，信息系统，Visual Basic 6.0 绪 论一个企业的生产运转，离不开各类物资

7、作根底，而各类物资的管理水平又是生产后勤保障的关键因素之一。企业中的物资可分成原料、辅料、产品三大类，而其中辅料物资的种类和数量都是最复杂的，工作人员在对近上千种辅料物资进行管理时,要开展许多琐碎而繁杂的工作。每天除了要记录当天物资的入库和出库情况外,还要对库存进行统计,以便及时地对某些短缺物资进行购置,同时对所拥有的物资所占的资金数进行统计。然而,由于物资种类繁多,型号也有很多差异,使得管理工作非常复杂,鉴于这种情况有必要开发一个物资管理系统以减轻工作人员的工作难度。因此，为了适应企业生产的需要，提高工作效率，迅速、准确地为用户提供各类物资信息，笔者在Visual Basic 6.0前台工作

8、环境下，以Microsoft Access 2000作为后台数据库，开发出本辅料物资管理系统，方案利用计算机对各类物资信息进行辅助管理。该系统作为一种管理信息系统主要解决的问题是对企业的辅料物资的管理问题。主要包括对辅料物资的入库情况、出库情况即领用情况、库存情况的管理。其所要达成的目的就是通过对辅料物资的严格管理和控制，来到达为企业节约本钱、提供准确详实的库存信息和部门消耗信息，以实现经济效益的增长和管理本钱的降低。程序设计及运行环境Microsoft Windows 2000 ProfessionalMicrosoft Access 2000Microsoft Excel 20001.2

9、Visual Basic 6.0 简介从字面上看，“Visual指的是开发图形用户界面GUI的方法，它不需要编写大量的代码去描述界面元素的外观和位置，而只要把预先建立的对象拖放到屏幕上的一点既可。“Basic指的是Beginners All-Purpose Symbolit Instruction Code 的简称，这是一种在计算技术开展历史上应用的最为广泛的语言。Visual Basic包含数百条语句、函数和关键词，其中很多和Windows GUI有直接关系。Visual Basic具有以下特点：1、真正的面向对象编程，是开发人员在维护系统运行时只需修改很小的代码，同时也加快了系统开发的速度

10、。2、可视化的编程方法，以及向导的功能，使开发人员几乎不用参加太多代码就可以开发出标准的Windows程序。3、数据访问特性允许包括Microsoft SQL Server、Microsoft Access 2000以及其他企业数据库在内的大局部数据库格式建立数据库和前端应用程序。4、通过ActiveX技术可使用其他应用程序提供的功能，例如Microsoft Word字处理器，Microsoft Excel电子数据表及其他Windows应用程序，甚至可直接使用Visual Basic创立的应用程序和对象。5、Internet能力强大，使得在应用程序内很容易通过Internet访问文档和应用程序

11、。6、已完成的应用程序是真正的.exe文件，供运行时的可自由发布的动态链接库DLL。当前，Microsoft Windows 操作平台上的可编程数据库管理系统DBMS的种类越来越多，从Power soft Power Builder、Borland Paradox、Microsoft FoxPro到Microsoft Access，其中大多数产品都是既能访问本地数据，也能访问中央计算机上的远程数据，而进行后一种访问还需要“数据库效劳器的支持，例如：Oracle、Microsoft SQL Server或Sybase等软件。Visual Basic能够读取和访问Access、Excel、Dbas

12、eX、FoxPro、Btrieve和ODBC等多种数据库，并能利用VB自身所带的数据库引擎创立Access数据库。所以VB在管理信息系统MIS的开发和建设方面得到了非常广泛的应用。VB访问数据库通常有三种途径：第一，通过数据库控制控件Data Control访问；第二，通过VB提供的数据库对象变量编程访问；第三，通过ODBC接口访问ODBC API函数。在这三种方法中，第一种方法操作起来最方便、灵活、易于掌握，同时也最能表达Visual Basic面向对象的特色，只给出有限的不需要编程就能实现访问现存数据库功能。第二种方法即DAO模型那么是全面控制数据库的完整编程接口。我们主要是通过第二种方法

13、把数据和程序设计联系起来。 1.3 Microsoft Access 2000简介随着信息时代的到来，数据作为信息的重要载体，在生产、生活中得到了越来越多应用。数据结构越来越复杂，数据量越来越庞大，数据管理要求越来越严格，数据的共享成为数据管理开展的趋势。数据库技术就是随着开展起来的一门计算机应用技术。作为Microsoft Office 2000 专业版的重要组件，Microsoft Access 2000 是开发中小型关系数据库系统的最强大平台之一，它的功能包含了，建立整齐的资料表格、对资料做处理、对需要的资料做查询、资料的输出、打印报表。除此之外，Access所拥有的接口，在操作上也非常

14、的简易。1.4 Microsoft Excel 2000简介Microsoft Excel表格是微软公司Microsoft Office套件中专门用作电子表格处理的软件，也称电子表格，它的特长是处理比较规那么的数据，例如人事、档案、工资信息，还可以对这些信息进行分析、计算、处理，而且操作起来也很方便例如增加、删除、复制等都很容易，而且它的数据都是一些独立的文件，可以很方便地复制、传输，因此在实际的办公中，Microsoft Excel的到了很广泛的应用。在VB中，打印报表经常交由Crystal Report来做，当然，前提是有资料库的资料，如果不通过Crystal Report，那也得用Pri

15、nter物件来做，如果表格复杂者，设计尤其复杂。使用Microsoft Office 2000中的Excel来做可能是另一个选择。2.需求分析根据对辅料物资管理部门工作人员需求的分析,经归纳后，我认为对系统的主要需求如下:1、可以对辅料物资的出入库信息,即入库信息和出库信息进行录入、保存、查询等操作,即仓库管理员可以在入库单处理、出库单处理、入库信息查询、出库信息查询等界面上进行一般的数据操作;2、能够方便、迅速地浏览系统提供的各项相关信息,且提供良好的用户界面,方便不同层次的用户的使用，尽可能符合目前辅料物资管理工作的流程,迎合用户的工作习惯,简化用户的工作量;3、在入库和出库时，可对物资信

16、息按不同方式进行查询，并可以使用不完全关键字查询,方便用户操作;4、有一定的可扩展性,可对数据的局部工程进行修改(如代码),为以后对系统的一些使用功能的升级做准备;5、对数据库有数据维护能力,用户可以方便的进行字典处理，增加、修改和删除相关的部门和材料信息;6、有强大的报表处理功能,可满足目前物资金额统计的要求,如计算各种物资的库存数量、消耗情况,所占的金额等,能把物资库存结果统计出来,并能将需要的信息打印出来。3.系统结构设计系统结构该辅料物资管理系统主要是由前台的利用Access 2000构建的数据库，以及用于打印和预览报表的Excel 2000工作表构成，如图3.1所示：主程序Excel

17、 2000Access 2000图3.1 系统结构图辅料物资管理系统模型辅料物资管理系统子系统设计如下图：辅料物资信息管理系统包含4个子系统：它们是流水账处理模块、明细账处理模块、报表处理模块、字典处理模块。流水账处理模块包括入库单处理、出库单处理、入库信息查询、出库信息查询四个子模块；明细账处理模块目前只有明细账查询子模块，其包括库存物品类别明细账、库存物品种类明细账和库存物品明细账等三个子模块；打印报表模块目前只包括打印月报表子模块，其又包括打印材料消耗月报表、打印部门消耗月报表、打印库存量明细月报表和打印库存量汇总月报表四个字模块；字典处理模块包括材料科目字典处理、领料单位字典处理两个模

18、块，其中材料科目字典处理包括一级、二级、和三级处理模块，而领料单位字典处理只包括一级处理模块。辅料物资管理信息系统报表处理模块字典处理模块明细账处理模块流水账处理模块打印报表领料单位字典处理材料科目字典处理明细帐查询出库信息查询入库信息查询出库单处理入库单处理材料科目名称字典处理材料科目种类字典处理材料科目类别字典处理打印库存量汇总月报打印库存量明细月报表打印部门消耗月报表打印材料消耗月报表库存物品类别明细帐库存物品明细帐库存物品种类明细帐图3.2 辅料物资管理信息系统程序模块框图3.2.2 E-R信息模型的设计：E-R方法是entity-relationship approach 的简称，是

19、由P.P.Chen于1976年提出的，通称实体-联系方法，通过E-R图可以建立信息世界的实体、属性和关系的模型，因此，笔者在对系统的相关情况进行分析后，得出本系统的E-R模型，图3.3即表示了该辅料物资管理系统的E-R图，根据E-R图，结合具体DBMS所提供的数据模型类型，导出关系数据模型，从而进行数据库设计。E-R表结构： 序号字段名长度字段类型1仓库4Integer2入库4Integer3入库日期14Date4入库数量14Date5辅料物资Integer6类别8Integer7名称8Varchar8种类14Varchar9规格14Date10单位4Integer11数量14Date12单价

20、14Date13出库日期14Date14出库数量14Date15领料部门18Varchar4.辅料物资管理系统功能介绍进入辅料物资管理系统“密码错误“退出按钮，系统会自动关闭。在这里有一点遗憾的是，限于制作本钱和时间的关系，并未对用户权限和级别进行划分，但这并不影响系统的平安和使用。图4.1 请求输入密码界面 图4.2 密码正确消息框 图4.3 密码错误消息框系统主界面简介用户在进入系统后，系统会显示出如图4.4a所示的主界面，在界面的菜单栏内，共有五个菜单，如图4.4b所示，分别为流水账处理菜单、明细账处理菜单、打印报表菜单、字典处理菜单和退出菜单。其中，流水账处理菜单又包括入库单处理、出库

21、单处理、出库信息查询和入库信息查询四个子菜单，如图4.4c所示；明细账处理菜单目前只有一个明细账查询子菜单，在明细账查询子菜单下又有库存物品类别明细账、库存物品种类明细账和库存物品明细账三个子菜单，如图4.4d所示，这样进行设置是想事先留出一定的空间，以方便日后对明细账处理的功能进行升级和改良；打印报表菜单只有打印月报表一个子菜单，其又包括了打印材料消耗月报表、打印部门消耗月报表、打印库存量明细月报表和打印库存量汇总月报表四个子菜单，如图4.4e所示；字典处理菜单包括材料科目字典处理和领料单位字典处理两个子菜单，在材料科目字典处理菜单之下，还有材料科目类别字典、材料科目种类字典和材料科目名称字

22、典三个子菜单，如图4.4f所示。a系统主界面b系统总菜单c流水账菜单d明细账菜单e打印报表菜单f字典处理菜单图4.4 系统主界面介绍图流水账处理本系统的第一个模块是流水账处理模块，该模块的主要功能是录入入库和出库信息，并对其进行保存和查询，其主要有入库单处理、出库单处理、入库信息查询和出库信息查询四个功能。首先，入库单处理功能。图4.5 入库单界面的入库单界面，在录入时，用户只要按顺序从材料类别框架中选出材料的一级目录类别、从材料种类框架中选出材料的二级目录种类，并在材料名称框架中使用“上一条和“下一条两个浏览按钮选出材料的三级目录名称，便可以查找到所要入库的材料，在输入相应的数量和单价后，点

23、击“入库按钮，如果入库成功，系统便会弹出如图4.6所示的入库成功消息框，通知用户入库成功，完成入库单的录入工作；如果图4.6 入库成功消息框入库失败，将不会有消息框弹出，用户需要重新进行入库操作。此外,该模块还提供了模糊查询功能，在用户选好一级和二级目录后，如果三级目录过于庞大或者难于找到所需材料名称，可以利用系统提供的查询功能，在查询材料名称框架中按名称或材料编号对所需信息进行查询,在查询时,用户只要点击“按名称查询和“按编号查询的单项选择按钮,选择好查询方式,在文本框中输入入库材料的相关信息,便可以查询到所需材料信息。由于本查询功能提供的是模糊查询,因此当用户输入的信息不完整时,系统显示的

24、是包含该信息的所有信息条目中的第一条,用户可以使用“上一条和“下一条图4.7 查询出错消息框所示。另外,由该窗体进行录入，还可以防止用户输入非法的数据，因为在入库单界面中，用户在进行录入操作时，除了材料的数量和单价是可以自行输入和更改的外，其它的工程都是不可更改的，由此可以保证数据库不会被无意的破坏，而且该窗体还具有数据的自动计算功能，当用户输入材料的数量和单价时，系统自动计算材料的总金额，杜绝了人工计算可能产生的错误。对于入库日期，系统会自动参加入库时的系统时间，减少了录入的工作量和潜在的错误。其次，出库单处理功能。用户可以通过出库单窗体完成辅料物资的出库事务录入工作。如图4.8所示，出库单

25、界面与入库单界面根本相同，从图中可以看出，其录入操作中选择与查询材料的操作根本上与入库单的录入操作相同；而不同的地方有：第一，在出库时，用户只需要输入出库物资的数量而不需要输入单价，因为单价会由系统给出其自动计算出的物资库存单价。第二，由于在出库单中多显示了一条材料库存信息，而在出库时，对于库存量为零的材料，在出库单中是不会显示的，所以对它是不能进行出库操作的；而如果用户在出库时所录入的出库数量大于库存量的话，系统便会弹出如图4.9所示的消息框提示用户，因此对于这样的操作，系统也是不会允许的。这可以有效的保障数据的平安，杜绝非法数据产生。第三，根据物资管理的需要，在进行出库操作时还需要选择领用

26、单位的名称，用以统计各部门的物资消耗情况，因此这也是入库单录入时所没有的。对于其它的功能，例如总金额的自动计算和出库日期的自动添加等，出库单模块也同样具有。 图4.8 出库单界面图4.9 出库数量错误消息框再次，出库信息查询。当用户选择流水账处理菜单中的出库信息查询子菜单时，系统会显示出如图4.10所示的界面，用户可以通过该窗体来查询各种辅料物资的出库情图4.10 出库信息查询界面况，包括出库材料的名称、编号、规格、出库数量、单价、总金额、出库日期和领用单位等，这样可以使用户和管理者清楚的了解出库信息，以备查询和核对。最后，入库信息查询。入库信息查询功能主要是向用户提供材料的入库信息，具体包括

27、材料的名称、编号、规格、入库数量、单价、总金额、入库日期等信息，其界面与出库信息查询界面根本一样。总的来说，用户可以通过入库信息查询功能了解到各种辅料物资的供给情况，掌握每一次入库的详细信息，方便用户和管理者的管理。明细账查询的主要功能是提供给用户准确、详实的库存信息，以方便用的查询与管理。其具体功能有：首先，库存物品类别明细账。库存物品类别明细账的主要作用是为用户提供库存物资的一级目录材料类别的库存信息，主要包括库存物资的类别名称、编号和各类库存物资的总金额等信息。其次，库存物品种类明细账。库存物品种类明细账界面的主要作用是为用户提供库存物资的一级目录材料类别的库存信息和二级目录材料种类的库

28、存信息，主要包括库存物资的类别名称、编号、种类名称、编号和各类库存物资的总金额信息，其界面如图4.11所示，它可以方便的为用户提供各类汇图4.11 库存物品种类明细账图4.12 库存物品明细账的界面，用户只需从两个下拉列表框中选择好材料的类别和种类，系统便会自动显示出相应范围内的材料库存信息，例如材料的编号、名称、规格、单位、库存数量、单价、总金额等信息。该模块取代了手工记账的复杂和繁琐程序，简化的操作，降低了工作量，方便了相关账目的查找，提高了仓库管理员的工作效率。打印月报表模块的主要功能在于对每个月的材料消耗信息、部门消耗信息、库存量的明细信息和汇总信息按月进行打印，并以Excel 工作表

29、的形式保存在报表文件夹中，方便用户观察与打印。首先，打印材料消耗月报表。打印材料消耗月报表窗体主要是用于打印材料月消耗情况的报表，其界面如图4.13所示，在操作时，用户只需要在文本图4.13 打印材料消耗月报表界面框中输入所需要打印的年份与月份，点击打印按钮，只需稍等片刻，系统便会自动完成报表的创立过程，显示出如图4.14所示的报表，其所显示的主要信息包括材料编号、图4.14 材料消耗月报表材料名称、领用单位名称、领用单位编号、材料编号、单位、消耗数量、总金额和出库日期等信息，用户可以对该报表进行预览与页面设置等操作。用户在预览完报表后，便可以选择其所想要进行的操作，如想打印报表，只需单击打印

30、按钮即可，系统会自动完成打印；如暂时不想打印，用户可在观察后关闭报表，系统会自动将刚刚所显示的报表保存在报表文件夹中，用户可以在日后手动打印该报表。而当用户输入的年份与月份没有材料消耗信息时，系统会显示出如图4.15所示的消息框，提示用户当月没有记录。图4.15 无记录警告消息框用户在点击确认按钮后，回到打印部门消耗月报表界面，用户可以重新输入年份与月份信息。而当用户在文本框中输入了非数字的信息时，系统会显示出如图4.16所示的消息框，提示用户录入信息出错，有效的防止了非法信息被录入的情况发生。图4.16 录入信息出错消息框其次，打印部门消耗月报表。打印部门消耗月报表界面主要是用于打印部门月消

31、耗材料的情况的报表，其界面与操作方法与打印材料消耗月报表根本相同，在录入相关信息后，系统会自动显示所输入年月的各部门消耗情况，详细记录各部门的消耗信息并进行简单的汇总。再次，打印库存量明细月报表。打印库存量明细月报表主要是用于打印和观察库存量的明细信息，库存信息包括材料的名称、编号、规格、单位、库存量、单价和总金额等信息。用户只要点选打印库存量明细月报表的菜单，系统便会自动生成库存量的明细月报表，用户在预览后，可以选择打印，也可以不打印而关闭报表，系统会自动用Excel的形式保存月报表，用户可以在关闭系统后进入报表文件夹自己手动打印报表。该报表是用户和管理人员了解和掌握库存信息的主要渠道之一。

32、最后，打印库存量汇总月报表。打印库存量汇总月报表主要是用于打印和观察库存量的汇总信息，可以观察材料的名称、编号和总金额，其操作方法与打印库存量明细月报表完全相同，系统会自动按月份予以记录和保存。字典处理模块的主要功能是对物资进行分类管理，通过该模块，用户可以对系统的数据信息进行维护，可以添加、删除和修改有关的数据信息，并且在添加数据信息时，为方便用户的操作与管理，用户只需要输入相应的数据名称，而数据的编号是系统根据现有编号直接按顺序生成的，简化了操作过程，有效的减少了输入中可能产生的错误。首先，材料科目类别字典。材料科目类别字典界面的主要功能是对材料的一级目录材料类别进行管理和维护，它的界面如

33、图4.17所示，用户通过该界面可以浏览数图4.17 材料科目类别字典界面据库中所有的材料类别信息，并可以添加、删除和修改材料类别的相关信息。用户在点击添加和修改按钮后，界面上的按钮如图4.18所示，除保存和取消按钮外，其它按钮图4.18 添加材料类别界面都变成不可选，这样可以保护数据库的平安，防止重复操作发生。另外，如上图所示，在添加材料类别时，类别编号由系统自动生成，用户只需输入材料类别名称即可，这不仅可以简化用户操作，还可以防止非法信息的产生。用户在添加和修改材料信息后，如点击保存按钮可以保存操作结果，假设点击取消按钮那么取消此次操作。另外，用户在进行删除操作时，系统会弹出如图4.19所示

34、确实认对话框，让用户确认是否对数据进行删图4.19 确认删除对话框除操作，如果用户确定要删除当前数据，那么可以点击确认按钮，删除操作完成。这主要是为了确保数据库不会被无意的破坏。图4.20 材料科目种类字典界面示，不同之处在于其增加了一个选择材料类别的下拉列表框，用户可以通过该下拉列表框选择要操作的类别，在此类别下，用户通过对各个浏览按钮的操作，可以对此类别内的材料种类进行浏览，并可以对其进行添加、删除和修改操作。再次，材料科目名称字典。材料科目名称字典的主要功能是对物资的三级目录材料名称进行管理和维护，其界面和功能与材料科目种类字典根本相同，用户在用下拉列表框选定相应的材料类别和种类后，便可

35、以通过浏览按钮浏览此范围内的相应材料信息，包括材料的名称、编号、规格和单位信息，并且用户还可以通过添加、删除和修改按钮进行相应的操作，完成对具体物资信息的管理和维护。最后，领料单位字典处理。领料单位字典处理的主要功能是对领料单位的信息进行管理和维护，其界面和功能与材料科目类别字典大致相同，用户可以利用首记录、上一记录、下一记录和尾记录等浏览按钮对领料单位进行浏览，并可以利用添加、删除和修改按钮来完成对领料单位名称的相关操作，点击保存按钮保存操作结果，点击取消按钮取消操作。在进行删除时，系统同样会弹出确认对话框，让用户确认是否删除，防止数据库因操作的疏忽和失误而被破坏。对于辅料物资系统的实现来讲

36、,如何建立与数据库之间的链接,以及如何访问数据库是最为关键的环节,本系统在处理这一问题时,主要是采用编程和利用提供的数据库控件两种方式实现的。具体来讲，首先，在实现与数据库的链接这一环节上，一种方式就是使用编程语句来实现与数据库之间的链接，主要关键语句如下：Public ConnectString As StringConnectString = Provider=Microsoft.Jet.OLEDB.4.0;Data Source= + App.Path + + flwzDB.mdb;Persist Security Info=FalseWith dbcn .ConnectionStrin

37、g = ConnectString .CursorLocation = adUseClient .OpenEnd Withrep.ActiveConnection = dbcnrep.CursorLocation = adUseClientrep.CursorType = adOpenStaticrep.LockType = adLockBatchOptimistic通过这一方式建立与数据库的链接的好处在于：使用灵活，一旦建立了与数据库的链接，随时可以对数据进行调用；面向全局，只要进行一次链接，便可以在工程中的任一个窗体中实现对数据的调用。本系统中的大局部数据调用都是通过此种链接进行的，例如出

38、库单、入库单以及报表中显示的数据等等。另一种与数据库之间的链接方式是通过数据库控件实现的，主要是应用Adodc控件来完成的。具体操作是将Adodc控件的ConnectionString属性设置为使用链接字符串：Provider=Microsoft.Jet.OLEDB.4.0;Data Source=.flwzDB.mdb;Persist Security Info=False来实现这一功能。事实上，即便是使用Adodc控件来建立于数据库的链接，也可以用编程的方式实现，例如在系统中所用通过下拉列表框显示数据的地方，其调用数据全部都是采用例如下面这样的语句来实现的。Adodc1.Connectio

39、nString=Provider=Microsoft.Jet.OLEDB.4.0;Data Source=.flwzDB.mdb;Persist Security Info=FalseAdodc1.CommandType = adCmdTextAdodc1.RecordSource = select * from clkm where clkmsl 0 and clkmbh not like _00 and clkmbh like & ch_clkmbh & 其次，对数据的调用也主要是通过编程和Adodc 控件两种方式实现的。其中，通过编程对数据库的调用主要是通过先前定义的rep变量和SQL语

40、句实现的。例如如下的这段出库单的材料类别下拉列表框中的数据调用语句：If rep.State adStateClosed ThenEnd Ifrep.Source = select clkmbh,clkmmc from clkm where clkmbh like _0000 Combo1.AddItem rep.Fields(clkmmc) Level1(I) = rep.Fields(clkmbh) I = I + 1If Not rep.EOF ThenEnd IfLoop而使用Adodc控件调用数据那么主要是通过将SQL语句写入其RecordSource属性框中，并采用对相应的数据显示

41、控件的DataSource和DataField属性进行设置的方式来实现数据的调用与显示。Visual Basic 6.0 实现报表的创立以为工具将Microsoft Access 2000中的数据调用出并显示在Microsoft Excel 2000中，是本系统的另一关键技术所在。其具体实现过程如下：首先，建立报表。建立一张报表主要是通过以下语句实现的：Public xlbook As Excel.Workbook定义Excel工作簿对象Public xlsheet As Excel.Worksheet定义Excel工作表对象Dim CellsMaxLen(1 To 9) As Integer

42、字段共有9项Dim Row As IntegerSet VBExcel = CreateObject(excel.application)Set xlbook = NothingSet xlsheet = NothingSet xlsheet = xlbook.Worksheets(sheet1)其次，调出数据。从数据库中调出数据主要是通过如下语句来实现的。MDIMain.rep.Source = select distinct lldwbh,lldwmc,rkdclmc,rkdclmcbh,rkdclmcgg,rkdclmcdw,sum(rkdclsl),sum(rkdclzje),left(rkrq,10) from rkd where flag=出库 and left(rkrq,7)= & Left(Month, 7) & group by rkdclmcbh,lldwbh,lldwmc,rkdclmc,rkdclmcbh,rkdclmcgg,rkdclmcdw,left(rkrq,10) order by lldwbh,rkdclmcbh,left(rkrq,10)再次，绘制工作表。其步骤如下以绘制部门消耗月报表为例：先通过语句来将工作表激活，再用语句xlsheet.Cells(1, 1).Va