超市进销存管理系统论文终稿.doc

《超市进销存管理系统论文终稿.doc》由会员分享，可在线阅读，更多相关《超市进销存管理系统论文终稿.doc（55页珍藏版）》请在三一办公上搜索。

1、四川理工学院毕业设计（论文） 超市进销存管理系统学 生：吴 思 思学 号：05101017624专 业：计算机科学与技术班 级：2005级6班指导教师：朱 文 忠 四川理工学院计算机学院二O 0 九年六月毕业设计（论文）任务书设计（论文）题目： 超市进销存管理系统 学院：计算机学院 专业：计算机科学与技术 班级：05级6班 学号：05101017624 学生： 吴思思 指导教师： 朱文忠 接受任务时间 2009年1月5日 系主任 （签名）教学院长 （签名）1毕业设计（论文）的主要内容及基本要求此系统采用Microsoft Visual Basic 6.0开发，利用VB实现各模块的功能，利用SQ

2、L管理后台数据。此系统将实现的主要功能有：资料管理，采购管理，系统管理，销售管理，库存管理。2指定查阅的主要参考文献及说明【1】郑海春,谢维城.Visual Basic编程及实例分析教程M.北京：清华大学出版社,2007年【2】李玉林.Visual Basic毕业设计指南与项目实践M.北京：北京科海电子出版社,2008年【3】赛奎春,宋坤,李严. SQL Server数据库开发实例解析M.北京：机械工业出版社,2006年3进度安排设计（论文）各阶段名称起 止 日 期1收集资料2009年01月05日2009年02月20日2需求分析2009年02月21日2009年03月01日3撰写开题报告2009

3、年03月02日2007年03月10日4完成初稿2009年03月11日2009年04月30日5完成第二稿2009年05月01日2009年05月15日6完成正式稿2009年05月16日2009年05月31日7装订准备答辩2009年06月01日2009年06月10日超市进销存管理系统摘 要本文首先简单介绍开发超市进销存管理系统的背景，分析进销存管理系统的业务流程和开发进销存管理系统的金济可行性，并对系统进行需求分析和数据建模，其次详细阐述进销存管理系统的设计与实现。在设计部分，主要分析系统涉及的功能和代码的编写；在实现部分，主要介绍系统开发运用的主要技术：visual basic和SQL数据库，通过

4、这些技术实现超市进销存管理系统的资源管理、采够管理购、销售管理、库存管理、系统管理等功能。关键词：进销存管理系统；数据库Supermarket purchase-sell-stock management systemABSTRACTThis paper briefly introduced the background of developing the supermarket purchase-sell-stock management system. Analysed the operation flow of purchase-sell-stock management system

5、and the feasibility of economy of developing this system. Also did analyses of the requirement of the system and built data modelings. Next, the paper described the design and realization of this system particularly. In design part, mainly analysed the function dealing with the system and code writi

6、ng .In realization part, mainly introduced the main technics of the development and exertion of the system: visual basic and SQL database. By these technics realized the resource management of the supermarket purchase-sell-stock management system, also purchase management,sales management, inventory

7、 management,system management, etc.Keywords: purchase-sell-stock management system; database目 录第1章 引言11.1 课题背景11.2 系统分析11.2.1 需求分析11.2.2 可行性分析21.3 开发软件介绍21.3.1 Visual Basic 6.021.3.2 Microsoft SQL Server 20003第2章 系统设计52.1 系统开发的目标和思想52.2 系统功能设计52.2.1 资料管理52.2.2 采购管理62.2.3 销售管理72.2.4 库存管理82.2.5 系统管理92

8、.3 数据库设计9第3章 系统设计143.1 界面设计143.1.1 主窗体界面143.1.2 登录界面153.1.3 资料管理163.1.4 采购管理203.1.5 销售管理233.1.6 库存管理273.1.7 系统管理313.1.8 查询打印323.2 关键技术323.2.1采购入库移动平均价的实现323.2.2 库存盘点功能的实现333.2.3 销售利润统计的实现35第4章 运行与维护364.1 系统的运行364.2 系统的维护364.2.1数据库备份与恢复364.2.2 初期建账374.2.3 密码维护37结束语38致 谢39参考文献40附 录41附录A: 主要源程序41附录B: 软

9、件使用说明书48第1章 引言1.1 课题背景 随着经济的全球化以及中国改革的逐渐深化，中小型超市面临着越来越激烈的市场竞争，改善超市系统中供应环节的管理、调度及资源配置、迅速适应客服的新需求和市场的新机遇的能力，是中小型超市赢得竞争胜利的决定因素。在信息广泛使用的背景下，必须借助于信息管理技术，使用超市进销存管理系统来实现超市管理。超市进销存管理系统用计算机管理超市库存进出管理的一种计算机应用技术的创新,在计算机还未普及之前库存管理都是由工作人员手工书写的方式来操作的。现在一般的超市都采用计算机智能化管理,采用计算机作为工具的实用的计算机超市库存管理程序来帮助管理员进行更有效的超市库存管理工作

10、。超市进销存管理系统是典型的信息管理系统(MIS),其开发主要包括后台数据库的建立和维护以及前端应用程序的开发两个方面。因此，开发这样一套进销存管理系统软件成为很有必要的事情,实现超市的信息化管理的同时又可以减少盲目采购，降低采购成本，合理控制库存，减少资金占用并提高超市市场竞争力。1.2 系统分析1.2.1 需求分析 进销存管理系统能够记录并统计超市存货的出入库，及时准确地掌握商品的库存的情况，并可动态的反应存货资金的增减变动，为超市的决策提供基础数据，同时通过集中式的信息数据库，将“进、销、存”等超市的经营业务有机的结合起来，达到数据共享、降低成本、改善服务等目的，并且能够降低采购成本，准

11、去及时地了解采购情况和销售动态，及时调整营销策略，为管理者提供决策依据，加强了对商品资料的管理及价格管理，加速了资金周转，提高资料利用率。本系统主要依据通用的进销存管理方式来进行分析和设计，一个完善的进销存管理系统的功能主要有以下几项：l 资源管理，主要负责管理供应商资料，商品资料，以及客户资料。l 采购管理，主要负责管理采购管理，包括采购单，采购入库，采购查询。l 销售管理，主要负责管理销售管理，包括销售单，销售出库，销售查询，销售利润。l 库存管理，主要负责库管理存维护，价格管理，库存盘点。l 系统管理，主要负责管理用户信息和用户登录，初期建账，密码维护以及数据库备份与恢复。l 查询打印，

12、主要负责打印销售单和采购单的信息。1.2.2 可行性分析通过超市进销存管理系统对超市进行全面的管理，满足了超市进销存管理的系统化，规范化和自动化。l 经济性超市营运过程中信息的系统化管理，记录并统计超市存货的出入库，及时准确地掌握商品的库存的情况，并可动态的反应存货资金的增减变动，为超市的经营决策提供了大量的、有效数据；强大的账单结功能，简化了员工的日常工作，提高了工作效率，避免了人工管理过程中数据易错所带来的一系列的连锁反映，提高超市的经济效益。l 技术性本系统后台数据库采用目前比较流行的Microsoft SQL Server 2000，该数据库系统在安全性、准确性、运行速度方面有绝对的优

13、势，并且处理数据库量大，前台采用Microsoft Visual Basic 6.0作为主要的开发工具。实际情况下，管理员很容易通过软件管理和了解整个超市的运作情况，界面简单用户操作起来也很方便。完全满足日常经营、管理的要求。1.3 开发软件介绍1.3.1 Visual Basic 6.0Visual Basic 6.0是Micrsoft公司出品的开发工具，Visual Basic是一种可视化的，面向对象的Windows开发语言，它具有易用，通用和开发效率高的特点。随着微软对它不断地改进以及计算机本身性能的提高，使得Visual Basic越来越适合一般的应用程序开发。VB具有以下有点：l 开

14、发的高效l 语言的高效l 编译的高效l 执行的高效l 维护的高效Visual Basic6.0连接数据库的主要方式以下几种方式：一是：用data控件进行数据库链接 ，二是利用adodc（ADO Data Control)进行数据库链接 。三是: 利用DataEnvironment进行数据库链接.四是：利用ADO(ActiveX Data Objects)进行编程。现在我们来大致对这几种技术应用介绍：1. 用data控件进行数据库链接：第一步：给窗体添加一个Data控件。第二步：用Access建立一个名为Pad的数据库，在库中建立一个表Myset，给表添加四个字段：backcolor（数据），f

15、orecolor(文本），fontname(文本）,fontsize（文本）。2. 利用adodc（ADO Data Control)进行数据库链接：使用adodata控件访问数据库可以完全不用编写代码,只需要通过简单的设置和操作其属性就可以实现与数据库的连接,通过绑定数据感知控件,就能提供一个访问数据库的界面,用来实现对数据库的浏览,贴加,删除,修改等操作。3. 利用DAO对数据库进行操纵：在visual basic 中提供了两种与jet数据引擎接口的方法:data控件与数据访问对象(DAO)DAO是database object的英文缩写,要访问数据库一方面数据库要提供访问接口,另一方面要

16、在编程环境中有对数据库的支持。DAO模型是设计关系数据库系统结构的对象类的集合.他们提供了管理关系型数据库系统所需要的全部操作属性和方法,这其中包括建立数据库,定义表,字段和建立表间关系,定位和查询数据库等。1.3.2 Microsoft SQL Server 2000关系数据库是目前各类数据库中最重要、最流行的数据库，他应用数学方法来处理数据库数据，是目前使用最广泛的数据库系统。20世纪70年代以后开发的数据库管理系统产品几乎都是基于关系的。在数据库发展的历史上，最重要的成就就是关系模型。关系数据库系统与非关系数据库系统的区别是：关系系统只有“表“这一种数据结构；而非关系数据库系统还有其他数

17、据结构，对这些数据结构有其他的操作。结构化查询语言SQL（Structured Query Language）是一种介于关系代数与关系演算之间的语言，其功能包括查询、操纵、定义和控制四个方面，是一个通用的、功能极强的关系数据库语言。目前已成为关系数据库的标准语言。SQL Server是Micrsoft公司推出的使用于大型网络环境的数据库产品，SQL Server 2000充分考虑了数据库应用背景的变化，为用户Internet应用提供了完善的数据库管理和数据分析解决方案，极大的方便了用户电子商务和数据仓库应用的开发。SQL Server 2000还提供了对XML和HTTP的全方位支持。SQL S

18、erver 2000提供了四种基本的服务类型分别是：SQL Server、SQL Server Agent（代理服务）、Distributed Transaction Coordinator（DTC,分布式事务协调器）和Microsoft Search（全文检索服务）。下面简单介绍这四个服务的功能：1. SQL ServerSQL Server服务是SQL Server 2000最核心的服务，它直接管理和维护数据库，负责处理所有来自客户端的Transact-SQL语句并管理服务器上构成数据库的所有文件，同时还负责处理存储过程，并将执行结果返回给客户端。所有其他SQL服务都依赖于此服务。2. S

19、QL Server Agent对需要定期进行的管理工具，SQL Server 2000提供了代理的功能，这个代理能够根据系统管理员预先设定好的计划自动执行相应的功能。同时它还能对系统管理员设定好的错误等特定时间自动报警，而且代理服务还能通过电子邮件等方式把系统存在的各种问题发送给指定的用户。这个服务器能很好的帮助管理员对系统进行监视和管理。3. Distributed Transaction Coordinator（DTC）分布式事务协调器是一个事务管理器，在DTC支持下，客户可以在一个事务中访问不同服务器上的数据库。在这种情况下，客户的事务被提交给分布式事务协调器，分布式事务协调器能够保证一

20、个事务中的所有操作在所有的服务器上全部成功，或者，当在某个服务器上不成功时，确保所有服务器上的操作均被取消，是全部服务器均回到事务开始前的状态。4. Microsoft Search一直以来，从数据表的列或文件系统检索特定文本数据曾经是麻烦且开销很大的过程，通常需要借助第三方工具。现在SQL Server 2000提供了全文检索服务，能够对字符数据进行检索。第2章 系统设计2.1 系统开发的目标和思想本系统开发目标是服务于超市管理人员,方便管理人员及时了解采购情况和销售动态，及时调整营销策略，加强管理人员对商品资料的管理以及价格的管理，加速了资金的周转，提供资金利用率。2.2 系统功能设计根据

21、对系统的分析，超市进销存管理系统应该具有的基本功能包含资料管理，采购管理，销售管理，库存管理，系统功能管理，如图2.1所示：超市进销存管理系统系统管理库存管理销售管理采购管理资料管理图2.1超市进销存管理系统功能2.2.1 资料管理资料管理资料管理模块用来管理供应商资料，商品资料以及客户资料，其功能结构如图2.2所示：客户资料商品资料供应商资料图2.2资料管理功能模块1. 供应商资料 供应商资料功能负责维护供应商的基本资料。良好的供应商资料管理有助于超市对采购的管理和控制，降低超市的采购成本，对于采购而言非常重要，是进销存管理系统的重要资料。2. 商品资料 商品资料功能负责维护商品基本信息。3

22、. 客户资料客户资料功能负责维护超市客户的基本信息。客户是超市生存的根本，可以是个人或者企业，客户信息是超市重点维护的资料。客户资料变动比较大，开发系统是应注意系统的可扩展性和可维护性。2.2.2 采购管理采购管理模块主要负责采购管理，由采购单，采购入库，采购查询等子模块组成，涉及的信息主要包括采购单，入库单，销售单，采购单入库和核销等。采购管理是超市为了实现销售计划，在确保合适的商品品质下，以适合的价格、合适的时间，从供应商那里购入合适数量的商品所采取的管理活动，其功能结构如图2.3所示。整个数据流程如图2.4所示：采购管理采购单采购查询采购入库图2.3采购管理动能模块工作人员填写采购单添加

23、采购明细采购入库采购单表采购单明细表采购查询工作人员商品库存表图2.4采购管理数据流程图1. 采购单采购单功能用于录入采购单和采购单明细。2. 采购入库采购入库功能负责管理商品的采购入库。采购入库时，需要将采购单明细中的采购数量添加到商品库存数量中去，同时库存中的商品成本价将进行移动平均处理，即成本价（原库存总金额采购总共金额）/（原库存数采购数量），而采购单的”是否核销”标志同时也变成”已核销”。3. 采购查询采购查询功能负责查询采购单信息以及采购单核销情况。2.2.3 销售管理销售管理模块主要负责销售单，销售出库，销售查询和销售利润等，包括销售单的详细资料，销售出库时的库存数量处理，以及销

24、售利润的计算。其功能结构如图2.5所示。整个数据流程如图2.6所示：销售管理销售利润销售查询销售出库销售单图2.5销售管理功能模块工作人员填写销售单添加销售明细销售出库销售单表销售单明细表销售查询工作人员商品库存表图2.6销售管理数据流程图1. 销售单销售单功能负责录入销售单和销售单明细。2. 销售出库销售出库功能负责管理商品的销售出库。销售出库时需要将商品库存数量减去销售单明细中的销售数量，同时销售单的”是否核销”表示变成”已核销”。3. 销售查询销售查询功能负责查询销售单信息，以及销售单核销情况，便于统计信息。4. 销售利润销售利润功能负责提供某一段时间超市内各商品的销售利润。销售利润的主

25、要根据是已核销的销售单中的成本价、销售价、销售数量，以及税额等。销售利润（销售价成本价）*销售数量税额。销售管理模块以销售为中心，主要是工作人员在整个销售过程中对销售单、销售明细、出库以及销售查询的处理。2.2.4 库存管理库存管理模块用于管理超市的库存信息，主要负责库存维护、价格管理以及库存盘点，涉及的信息包括维护商品状态、最低储备、正常储备、最高储备、销售价，以及核对实际盘存的商品数量和库存数量，其功能结构如图2.7所示：库存管理库存维护价格管理库存盘点图2.7库存管理功能模块1. 库存维护库存维护功能主要用于维护商品库存信息。库存维护通常只对商品状态、最低储备、正常储备、最高储备进行维护

26、，其他信息只有在第一次初始化是进行维护。2. 价格管理价格管理功能主要用于维护商品的销售价。根据成本价、市场行情和利润等因素来制定和管理销售价。3. 库存盘点库存盘点功能主要用于管理超市商品库存的盘点工作，即将实际盘存的商品数量和库存数量进行核对，统计盘盈、盘亏信息。针对盘盈和盘亏情况要求能够提供盘点调整，盘盈时做入库处理，盘亏时作出库处理。2.2.5 系统管理系统管理模块用于用户权限管理，主要负责用户管理、密码维护、重新登录以及初期建账，包括管理用户信息和密码信息，提供重新登录和初始化数据功能，其功能结构如图2.8所示：系统管理 初期建账重新登录密码维护用户管理图2.8系统管理功能模块1.

27、用户管理用户管理功能负责管理用户信息的相关内容。2. 密码维护密码维护功能负责维护用户密码信息，提供修改、设置密码信息等功能。3. 重新登录重新登录功能主要为用户提供重新登录的权限，满足不同用户的切换。4. 初期建账初期建账功能主要为用户提供初期建账的权限，可以选择性地初始化数据表。2.3 数据库设计1. 供应商资料表供应商资料表负责维护供应商的基本信息，主要包括供应商的基本信息、主要包括供应商编号、供应商名称、地址、电话、传真、信誉等级、提供商品、简介等，表结构如2.9图所示：图2.9供应商资料表2. 商品资料表商品资料表负责维护商品基本信息，主要包括商品编号、商品名称、条形码、计量单位、供

28、应商编号、供应商地址、商品说明等，表结果如图2.10所示：图2.10商品资料表3. 客户资料表客户资料表主要负责维护超市客户的基本信息，主要包括客户编号、客户名称、地址、电话、传真、信誉等级、所需商品、简介等，表结构如图2.11所示： 图2.11客户资料表4. 采购单表采购单表主要包括采购单号、供应商编号、采购日期、采购员、是否核销、操作人员、总共金额、不含税价、税额等，表结构如图2.12所示：图2.12采购单表5. 采购单明细表采购单明细表主要包括编号ID、采购单号、商品编号、采购数量、采购单价、总共金额、不含税价、税额等，表结构如图2.13所示：图2.13采购单明细表6. 销售单表销售单表

29、负责销售记录，主要包括销售单号、客户编号、销售日期、销售员、是否核销、操作人员、总共金额、不含税价、税额等，表结构如图2.14所示：图2.14销售单表7. 销售单明细表销售单明细表主要包括编号ID、销售单号、商品编号、销售数量、成本单价、销售单价、总共金额、不含税价、税额等，表结构如图2.15所示：图2.15销售单明细表8. 商品库存表商品库存表用于维护商品库存信息，主要包括商品编号、商品状态、成本价、销售价、库存数量、库存总金额、最低储备、正常储备、最高储备、最近操作人员、操作人员、备注等，如表结构如图2.16所示：图2.16商品库存表9. 盘点明细表盘点明细表用于超市商品库存的盘点工作，主

30、要包括编号ID、商品编号、调整数量、成本价、调整总金额、操作日期、操作人员、标志等，表结构如图2.17所示：图2.17盘点信息表10. 用户信息表用户信息表负责管理用户信息的相关内容，包括用户ID、用户名称、用户类别、密码、权限、身份证、住址、电话、邮箱等，表结构如图2.18所示：图2.18用户信息列表第3章 系统设计3.1 界面设计3.1.1 主窗体界面图3.1主窗体界面主窗体界面的主要控件如表3.1所示：表3.1主窗体界面的主要控件控件属性属性值超市进销存管理系统NameFrmBLMSCaption超市进销存管理系统StartUpPosition0-ManualWindowState0-N

31、ormal在窗体运行时触发Load事件中，得到用户信息的代码如下： Private Sub MDIForm_Load()SQL = select competence from 用户信息表 where userID= & UserID & Set rst = SelectSQL(SQL, msg) If rst.RecordCount 0 Then rights = Trim(rst.Fields(0) rst.Close Else MsgBox (没有用户信息！) Exit SubEnd IfEnd Sub3.1.2 登录界面登录负责提供登录功能。用户登录系统后，单击系统管理|登录命令，弹出

32、登录界面。登录界面是系统的启动界面。用户选择用户名称，输入密码后，单击确定按钮将进入系统主界面。登录界面如图3.2所示，登录界面的主要控件如表3.2所示：图3. 2登录界面登录界面的主要控件如表3.2所示：表3.2登录界面的主要控件控件属性属性值F登录（From）NameFrmBLMSCaption超市进销存管理系统txtPassword（TextBox 密码）Password0-ManualMaxLength0-NormalCmdOkCaptionCmdCancelCaption输入密码后单击确定按钮，将触发CmdOk_Click事件，代码如下：Private Sub CmdOK_Click

33、() Dim rst As ADODB.Recordset Dim password As StringUserID = Left(Trim(CboName.Text), 4) SQL = select userID,password from 用户信息表 where userID= & UserID & Set rst = SelectSQL(SQL, msg) If rst.RecordCount 0 Then password = Trim(rst.Fields(1) rst.Close Else MsgBox (数据库操作错误！) Exit Sub End IfIf password

34、= Trim(txtPassword.Text) Then LoginSucceeded = True frmBLMS.Show Unload MeElse MsgBox (密码错误！) LoginSucceeded = False End IfEnd Sub3.1.3 资料管理1. 供应商资料供应商资料模块主要负责维护供应商资料，并对其进行添加、删除、修改、查询等操作。用户登录系统后，单击资料管理|供应商资料命令，弹出供应商资料界面。l 用户可以添加、修改、删除供应商信息。单击保存按钮可以保存操作信息，单击取消按钮可以取消操作。用户可以通过移动按钮来查找所需要的信息。l 用户也可以根据需要选

35、择查询条件，然后输入查询值，单击查询按钮，所查询的结果将会以表格显示，如图3.3所示。图3. 3供应商资料界面供应商资料界面的主要控件如表3.3所示：表3.3资料管理界面的主要控件控件属性属性值A供应商资料(From)NamefrmsupplierInfoCaption供应商资料txt(0)(TextBox供应商编号)MaxLength4CmdAddCaption添加CmdModifyCaption修改CmdDeleteCaption删除CmdSaveCaption保存cmdCancleCaption取消CmdExitCaption退出CmdQueryCaption查询当用户单击保存按钮时，触

36、发CmdSave_Click事件中的更新数据代码如下： Private Sub CmdDelete_Click()rs.Update For Index = 0 To 3 CmdMove(Index).Enabled = True Next Index CmdModify.Enabled = True: CmdDelete.Enabled = True: CmdAdd.Enabled = True CmdSave.Enabled = False: CmdCancel.Enabled = False If flag = Add Then MsgBox (成功添加数据!) Else MsgBox

37、(成功更新数据!) End IfCall LoadData If rs.RecordCount 0 Then rs.MoveFirst rs.Find (supplierID= & Trim(Me.txt(0).Text) & ) If Not rs.EOF Then Call ShowData End IfEnd Sub2. 商品资料商品资料模块负责维护商品资料，并对其进行添加、删除、修改、查询等操作。用户登录系统后，单击资料管理|商品资料命令，弹出商品资料界面。l 用户可以添加、修改、删除供应商信息。单击保存按钮可以保存操作信息，单击取消按钮可以取消操作。用户可以通过移动按钮来查找所需要的

38、信息。l 用户也可以根据需要选择查询条件，然后输入查询值，单击查询按钮，所查询的结果将会以表格显示，如图3.4所示：图3. 4商品资料界面商品资料界面的主要控件如表3.4所示：表3.4商品资料界面的主要控件控件属性属性值A商品资料（From）NamefrmcommodityInfoCaption商品资料Txt(5)(TextBox商品编号)MaxLength6CmdAddCaption添加CmdModifyCaption修改CmdDeleteCaption删除CmdSaveCaption保存CmdCancelCaption取消CmdExitCaption退出CmdQueryCaption查询D

39、ataGrid1Caption商品资料信息列表3. 客户资料客户资料模块负责维护客户资料，并对他们进行添加、删除、修改、查询等操作。用户登录系统后，单击资料管理|客户资料命令，弹出客户资料界面。l 用户可以添加、修改、删除供应商信息。单击保存按钮可以保存操作信息，单击取消按钮可以取消操作。用户可以通过移动按钮来查找所需要的信息。l 用户也可以根据需要选择查询条件，然后输入查询值，单击查询按钮，所查询的结果将会以表格显示。如图3.5所示：图3. 5客户资料界面客户资料界面的主要控件如图3.5所示：表3.5客户资料界面的主要控件控件属性属性值A客户资料(From)NamefrmcustomerIn

40、foCaption客户资料Txt(0)(TextBox客户编号)MaxLength4CmdAddCaption添加CmdModifyCaption修改CmdDeleteCaption删除CmdSaveCaption保存CmdCancleCaption取消CmdExitCaption退出CmdQueryCaption查询3.1.4 采购管理1. 采购单采购单模块主要负责录入采购单和采购单明细。用户登录系统后，单击采购管理|采购单命令，弹出采购单界面。l 用户可以添加、修改、删除采购单信息。l 用户也可以根据需要选择查询条件，然后输入查询值，单击查询按钮，所查询的结果将会以表格显示。l 单击采购单

41、明细，将会弹出采购单明细的界面，用户可以通过移动按钮来查找所需要的信息，如图3.6所示：图3. 6采购单界面采购单界面的主要控件如表3.6所示：表3.6采购单界面的主要控件控件属性属性值B采购单(From)NamefrmpurchaseListCaption采购单DataGrid1(DataGrid)Caption采购单信息列表txt(0)(TextBox采购单号)MaxLength6CmdAddCaption添加CmdModifyCaption修改CmdDeleteCaption删除CmdSaveCaption保存CmdCancelCaption取消CmdLookCaption采购单明细Cm

42、dExitCaption退出Txt(2),Txt(3),Txt(4),Txt(5),Txt(6)BackColor&H800000000&CmdQueryCaption查询显示数据时将触发ShowData事件，其代码如下：Private Sub ShowData() If rs.RecordCount 0 Then txt(0).Text = rs.Fields(purchaseID) For Index = 0 To CboGYID.ListCount - 1 If Left(Trim(CboGYID.List(Index), 4) = rs.Fields(supplierID) Then CboGYID.ListIndex = Index Exit For End If Next Index DTPicker1.Value = rs.Fields(purchaseDate)