超市进销存管理系统分析与设计

{店铺管理}超市进销存管理系统分析与设计毕业论文（设计）对经济和科技等诸多因素进行分析对实现此系统的技术经济和管理可行性做了深入分析。最后总体介绍了超市进销存管理所包括的基本功能模块，并详细阐述了其主要功能、设计思路及实现方法。超市进销存管理系统主要包括入库出库退货订货超市统计查询等等。、库存量、报警数量进货计划数是否允许打折表、本月本季本年的销售报表等功能。关键词：VisualBasic；Access数据库；管理系统目录引言11系统概述22需求分析42.1系统功能分析42.2系统性能分析42.3系统功能模块设计52.4技术可行性分析62.5系统流程图63设计74数据库设计104.1数据库需求分析104.2数据库概念结构设计104.3数据库逻辑结构设计104.4数据库的生成与配置144.5创建应用程序结构145详细设计145.1开发业务逻辑处理组件145.1.1信息管理类加集合类的设计思想155.1.2商品类型信息管理模块155.1.3商品信息管理模块165.1.4供货商信息管理模块185.1.5进货信息管理模块195.1.6销售信息管理模块215.1.7报损信息管理模块215.1.8管理员信息管理模块225.2开发基本界面组件235.2.1信息输入界面加操作类的设计思想235.3界面端应用程序设计255.3.1公共模块的设计255.3.2用户登入模块的设计255.3.3系统主界面的设计275.3.4添加主界面模块285.3.5用户管理模块315.3.6经营分析模块326测试分析356.1强制变量声明356.2常见错误的避免35总结36参考文献37引言水平和工作效率，同时也可以最大限度地减少手工操作带来的错误。于是，进销存管理信息系统便应运而生采购库存投入生产相应的生产、库存、销售、和报损等环节。在其他非生产性单位，如超市、商店等，则主要涉及到进货、库存、销售和报损4个方面。、企业在这里本文仅涉及工业企业的产品超市。超市进销存管理系统按分类分级的模式对仓库进行全面的管理和监控，、系统还可进行材料超市ABC分类汇总，减少资金积压。完善的超市管理功场竞争力。在设计一个系统时，首先要做好需求分析。合理地运用好VisualBasic的基本方法，建立一个适合企业或公司的进销存管理系统。1系统概述超市进销存管理系统按分类分级的模式对仓库进行全面的管理和监控，、系统还可进行材料超市ABC分类汇总，减少资金积压。完善的超市管理功场竞争力。库、出库、退货、订货、超市统计查询等等。根据工作流程，超市进销存管理系统将包含以下内容：（1）能对企业内的各类货物进行ABC分类管理，并提供最低超市量、最高超市量、安全超市量的预警功能。（2）可以存储各类信息档案包括物资产品基本信息供货单位信息使用单位信息等。（3）可以方便快捷的进行物资入库管理\物资出库管理等等，安全、支持各种类型的出/入库业务：生产入库、委外加工入库、采购入库、其他入库、生产领料出库、委外领料出库、销售出库和其他出库等（4）提供退货管理功能（5）货,影响生产。另外，还提供经济订货量计算功能和打印订货采购单功能。（6）支持超市盘点功能，可按仓库、物料进行盘点，自动汇总盘点数据，及时生成盘赢亏调整单（7）可及时打印超市余额，方便领导决策或安排及时定货.开发环境:VB是微软公司出品的一个快速可视化程序开发工具软件，借助微软在操作系统和办公软件的垄断地位，VB在短短的几年内风靡全球。VB是极的设计方法，极短的软件开发周期，较易维护的生成代码。美国微软公司在1991年推出VB1.0至今已经经历了6个版本，VB6.0运行在Win9x或Winme，Win2000，Winxp，WindowsNT等操作系统下，是一个32位的应用程序开发工具。Access2000询、存储和检索。Access的优点在于它能使用数据表示图或自定义窗体收集信息数据表示图提供了一种类似于Excel目了然。另外，Access允许创建自定义报表用于打印或输出数据库中的信息。Access也提供了数据存储库，可以使用桌面数据库文件把数据库文件置于网络文件服务器，与其他网络用户共享数据库。Access是一种关系数如上所述，Access据库的便利和关系数据库的强大功能。2需求分析2.1系统功能分析(1)基本信息的维护修改和删除等商品基本信息管理：包括商品基本信息的新建、修改和删除等。供货商信息管理：包括供货商信息的新建、修改和删除等。加、删除和修改密码等。(2)进货管理单价供货商等。商品进货管理功能完成进货信息登记、修改和删除等。商品类型来查看某种商品的进货情况。到库存的变化。的前几项商品。的前几项商品。(3)销售管理、单价、统计日期等。商品销售管理功能完成销售信息登记、修改和删除等。根据商品类型来查看某种商品的销售情况。关系到库存的变化。最少的前几项商品。(4)报损管理、报损原因等。商品报损管理功能完成报损信息登记、修改和删除等。品类型来查看某种商品的报损情况。系到库存的变化。少的前几项商品。2.2系统性能分析(1)多层结构设计业务逻辑处理层和数据存储层本系统采用的上有三层结构进一步扩展而成的多层结构。(2)面向对象设计在系统中将商品类型扩展性。(3)指导经营的功能存最多的商品，从而起到指导经营的作用。2.3系统功能模块设计按结构化程序设计思想，分析得本系统有以下几大部分货，销售管理，报损管理，销售分析等。图2.1系统功能模块图2.4技术可行性分析本系统是一个典型的数据库应用程序现有的数据库应用程序开发技术已非常成熟，利用现有技术完全可以实现预定的功能。VisualBasic语言简单功能强大并容易掌握,而Access是一个非常优秀的小型数据库管理软件，VisualBasic+Acess技术完全能够实现本系统的开发。本系统在使用上比较方便、较容易，如要对功能模块方面作修改，则无需进行整个系统的重新架构2.5系统流程图超市管理系统的基本流程---运输---货物到达后测试检验---送货单---库管人员查收入库---、委外加工入库、信息。出库：超市统计表---各使用单位---领料单----库管人员出库---出库单、委外领料、其他出库等出库业务；按出库类型可以分别在不同模块录入出库单据信息。退货：产品不合格通知书---各使用单位----领料单存根---库管人员退货---退货单---采购部门向供应单位传递订货单---供应单位组织发货---运输----货物到达后测试检验---入库、批次进行盘点，并根据盘点表生成盘盈、盘亏表，调整超市账。盘点的功能是检查仓库现有超市量与帐面数量是否一致若盘点结果是单。如图2.2供货单位管理物资登记使用单位管理基本信息录入基本信息管理物资调配

出库管理入库管理退货管理超市盘点

订货管理图2.2系统流程图3设计库、出库、退货、订货、超市统计查询等等。超市进销存管理系统将包含以下内容：(1)能对企业内的各类货物进行ABC最高超市量、安全超市量的预警功能。(2)可以存储各类信息档案包括物资、产品基本信息、供货单位信息、使用单位信息等。(3)可以方便快捷的进行物资入库管理\支持各种类型的出/入库业务：生产入库、委外加工入库、采购入库、其他入库、生产领料出库、委外领料出库、销售出库和其他出库等(4)提供退货管理功能(5)通过查询超市，及时了解超市余额信息，便于订货下单，以免由于缺货,影响生产。(6)及时生成盘赢亏调整单。(7)可及时打印超市余额，方便领导决策或安排及时定货看。如下图3.1图3.1系统功能模块图4数据库设计4.1数据库需求分析(1)针对超市进销存管理系统，分别对采购部门、销售部门和库存保管需要有一商品类型信息商品必须属于一个商品类型如果一个商品类型存需要记录供应商品信息。商品销售信息单中要包含登记商品销售数量单价等信息在进货信息中要包含商品供应商等信息商品报损要有报损原因进货销售报损操作要有相应操作员信息只有管理员登录之后才可以使用系统默认的管理员不可以删除进货销售库存、报损信息都要可以添加修改删除分类查找当进行进货销售和报损需要对进货销售库存热门商品。(2)经上述系统功能分析和需求总结，考虑到将来功能的扩展，设计如、商品类型名称等。、商品名称、商品介绍、库存量等。商品单位信息，包括单位编号、单位名称等。供应商信息，包括供应商名称、介绍等。进货信息，包括进货商品、数量、单位、单价、进货时间经手人等。数量单位单价登记时间等括报损商品数量单位原因登记时间等号、密码、是否是默认账号等。4.2数据库概念结构设计、商品信息实体商品单位信息实体供应商信息实体进货信息实体销售信息实体、报损信息实体和管理员信息实体。4.3数据库逻辑结构设计首先将罪犯管理信息系统的数据库概念结构转化为Access数据库或SQLServer2000数据库系统所支持的实际数据模型，即：数据库的逻辑结构。其各个表格的设计表4.1商品类型信息表(MerchandiseType)列名数据类字段大必填字默认说明型小段值MT_ID_N自动编长整型是商品类型号，递增，主号键MT_Name_S文本15是商品类型名MT_RemarkR备注是备注表4.2：商品信息表(Merchandise)列名数据类字段大小必填字段默认值说明型M_Id_N自动编长整型是商品编号，递增，号主键M_Name_S文本80是商品名称M_Introduce_文本255是商品介绍SM_TypeId_N数字长整型是1商品类型IDM_Storage_N数字长整型是0库存量M_UnitId_N数字长整型是1单位编号M_Remark_R备注是备注表4.3：商品单位信息表(Unit)列名数据类型字段大小必填字段默认值说明U_ID_N自动编号长整型是单位编号，递增，主健U_NAME_S文本10是单位名称表4.4：供应商信息表(Provider)列名数据类型字段大小必填字段默认值说明P_Id_N自动编号长整型是P_Name_S文本50是供货商名称P_Introduce_S文本255是供货商简介P_Remark_备注是备注R表4.5：进货信息表(Buy)列名数据类型字段大小必填默认值说明字段B_ID_N自动编号长整型是进货ID主健B_ProviderId_N文本长整型是供应商IDB_MerchandiseId_N数学长整型是商品IDB_StockDate_D日期短日期是Dare()进货时间B_Deliver_S文本20是送货人姓名B_Consignee_S文本20是经手人姓名B_Count_N数字长整型是0购入量B_StockPrice_N数字单精度型是0进货单价B_OperatorId_S文本20是操作员IDB_Remark_R备注是备注表4.6：销售信息表(Sell)列名数据类字段大必填字默认值说明型小段S_ID_N自动编长整型是号键S_MerchandiseID_D数字长整型是商品IDS_RegDate_D日期短日期是Date（）登记日期S_Count_N数字长整型是0售出数量S_SellPrice_N数字单精度型是0卖出单价S_OperatorId_S文本20是操作员IDS_Remark_R备注是备注表4.7：报损信息表(Dispose)列名数据类字段大必填字默认值说明型小段D_ID_N自动编长整型是报损编号，递增，号主键D_MerchandiseID_N数字长整型是商品IDD_RegDate_D日期短日期是Date（）登记日期D_Count_N数字长整型是0报损数量D_Reason_S文本255是报损原因D_Operatorld_S文本20是操作员IDD_Remark_R备注是备注表4.8：管理员信息实体(Admins)列名数据类型字段大必填字默认值说明小段A_Account_S文本20是账号，主键A_Pwd_S文本20是密码A_IsDefault_B是/否是False是否是默认用户4.4数据库的生成与配置现在就可以在Access数据库中创建表了。4.5创建应用程序结构(1)创建用户界面端程序VB中选择文件-VB应用程序向导设置后将向导生成的模块命名mdlMain保存与文件夹Merchandise中。(2)创建业务逻辑处理组件新建ActiveXDLL工程-设置工程属性-加入对ADO的引用。(3)创建基本界面组件新建ActiveXDLL工程-设置工程属性-加入对业务逻辑组件的引用。(4)在界面端程序中使用组件在工程资源管理器中选中工程Merchandise,选择菜单工程-引用命令。打开引用对话框，在可用的引用列表中选择BuySellStorageUI和BuySellStorageDB。5详细设计5.1开发业务逻辑处理组件行操作。它包含以下功能：商品类型信息管理，对应clsMType类和clsMTypes类clsMerchandise类和clsMerchandises类ClsProvider类和ClsProviders类进货信息管clsBuy类和clsBuys类.clsSell类和clsSells类。报损信息管理，对应clsDispose类和clsDisposes类。管理员信息管理，对应clsAdmini类和clsAdminis类。5.1.1信息管理类加集合类的设计思想应的集合类求实现的。息相关的操作，包括添加、修改和删除。息先观的操作，主要是根据不用的条件查找。表的操作放入到一个事务中，这样来确保数据的安全性与一致性。5.1.2商品类型信息管理模块商品类型信息管理模块的功能需要由clsMType和clsMTypes两个类。修改商品类型信息。删除商品类型信息。查找商品类型信息。其他与商品类型相关的常用操作。(1)商品类型信息管理类clsMType创建clsMType类并添加属性商品类型信息类clsMType型操作的基本功能，如添加、修改、删除等。选择菜单[工程]—[添加类模块]“添加类模块”“VB类生成器”，使用类生成器向工程中添加clsMType类，基于下拉列表框中选择clsDBbase。如下表所示。表5.1属性名称数据类型属性声明IDLongGet/LetSuperIDLongGet/LetTypeNameStringGet/LetclsMType类中已经自动添加了类的成员变量和属性。（2AddNew。。gxcAddNew类型请参考clsPublic类中gxcAddNew枚举类型的定义。（3）Update方法功能：修改商品类型。返回值：gxcUpdate类型，请参考clsPublic类中gxcUpdate枚举类型的定义。（4）Delete方法功能：删除商品类型。参数设计：可选参数lngID表示商品类型ID，默认为-1。返回值：gxcDelete类型，请参考clsPublic类中gxcDelete枚举类型的定义。商品类型信息管理集合类clsMTypes商品类型信息集合类clsMTypes用来处理多个商品类型的信息，其最小的单元是clsMType，它完成与一组商品类型信息相关的操作，比如查找功能。选择菜单[工程]—[添加类模块]“添加类模块”“VB类生成器”clsMTypes类，在“基于”下拉列表框中选择clsDBbases，在“集合组成”栏中选择clsMType类应用设置后系统会自动生成一个标准集合类所具有的最基本属性与方法，另外也加入了clsDBbases中方法的定义添加AddEx方法添加Find方法功能：根据给定参数查找商品类型，结果以clsMTypes类型返回。参数设计：一个可选的类型ID，默认值为-1。返回值：clsMTypes类型，一个clsMType的集合。省略参数时，返回全部商品类型。5.1.3商品信息管理模块商品信息管理模块的功能需要有clsMerch和clsMerchs两个类来实现，它的主要功能是：添加商品信息修改商品,信息删除商品信息查找商品信息,其他与商品信息相关的常用操作(1)商品信息管理类clsMerch创建clsMerch类并添加属性属性名称数据类型说明IDLong商品编号MerchNameString商品名称IntroduceInteger商品介绍TypeIdgxcSex商品类型IDStorageLong库存量UnitIDString单位编号RemarkString备注TypeNameString商品类型名称AddNew方法,功能：添加单个商品信息,参数设计：无。返回值：gxcAddNew类型，参考clsPublic类中gxcAddNew枚举类型的定义。Update方法,。。gxcUpdate类型，请参考clsPublic类中gxcUpdate枚举类型的定义。Delete方法功能：删除商品信息。参数设计：可选参数lngID表示商品ID，默认为-1。返回值：gxcUpdate类型，请参考clsPublic类中gxcUpdate枚举类型的定义。商品信息管理集合类clsMerchs商品信息集合类clsMerchs元是clsMerch，它完成与一组商品信息相关的操作，比如查找等。选择菜单[工程]—[添加类模块]“添加类模块”“VB类生成器”clsMerchs类，在“基于”下拉列表框中选择clsDBbases，在“集合组成”栏中选择clsMerch类应用设置后系统会自动生成一个标准集合类所具有的最基本属性与方法，下面，为clsMerchs添加必要的方法。添加AddEx方法,添加Find方法功能：根据给定参数查找商品信息，结果以clsMerchs类型返回。参数设计：如下表5.2。返回值：clsMerchs类型，一个clsMerch的集合。显然当上面两个参数都不指定时，返回全部商品。表5.2Find参数设计参数参功能是否可选及说明名数类型默认值lngIDLong传入商品ID可选，默认值=0如果取默认值，表示不限制商品IDlngTypeIdLong传入商品类型可选，默认值=0如果取默认值，表示不限制商ID品类型添加FindStorage方法功能：按库存量排序查找商品，结果以clsMerchs类型返回。参数设计：参见下表。返回值：clsMerchs类型，一个clsMerch的集合。表5.3FindStorage方法参数设计参数名参数类功能是否可选及默认值说明型IsDesBoolean表示是否采用可选，默认值=true无c降序nCounInteger最多显示多少可选，默认值=10无t条记录5.1.4供货商信息管理模块供货商信息管理模块的功能需要由clsProvider和clsProviders两个类来实现，它的主要功能是：添加供货商信息。修改供货商信息,删除供货商信息,查找供货商信息,其他与供货商信息相关的常用操作。供货商信息管理类clsProvider创建clsProvider类并添加属性供货商信息类clsProvider用来具体处理单条供货商信息，完成供货商信息的基本操作功能，如添加、修改、删除等。表5.4clsProvider类的属性设置属性名称数据类型说明IDLong供货商编号ProviderNameString供货商名称IntroduceString供货商简介RemarkString备注AddNew方法,功能：添加单个供货商信息。参数设计：无。返回值：gxcAddNew类型，参考clsPublic类中的gxcAddNew枚举定义。pdate方法,。。gxcUpdate类型，参考clsPublic类中的gxUpdate枚举类型的定义。Delete。lngID表示供货商信息ID，默认为-1。返回值：gxcDelete类型，参考clsPublic类中gxcDelete枚举类型的定义。要把这两个操作放在一个事务里面。供货商信息管理集合类ClsProviders供货商信息集合类clsProviders元是clsProvider，它完成与一组供货商信息相关的操作，比如查找等。选择菜单[工程]—[添加类模块]“添加类模块”“VB类生成器”，使用类生成器在工程中添加一个集合类，命名为clsProviders类，在“集合组成”栏中选择clsProvider类。应用设置后系统会自动生成一clsProviders添加必要的方法。添加AddEx方法,添加Find方法功能：根据给定参数查找供货商信息，结果以clsProviders类型返回。参数设计：一个可选的类型ID，默认值为-1。返回值：clsProviders类型，一个clsProvider的集合。省略参数是，返回全部供货商。5.1.5进货信息管理模块进货信息管理模块的功能需要由clsBuy和clsBuys两个类实现，它的修改进货信息删除进货信息查找进货信息。按商品统计分析进货信息其他与进货信息相关的常用操作进货信息管理类clsBuy表5.5创建clsBuy类并添加属性属性名称数据类型说明IDLong进货IDProviderIdString供应商IDProviderNameString供应商名称MerchandiseIDLong商品IDMerchNameString商品名称StockDateDate进货时间DeliverString送货人姓名ConsigneeString经手人姓名CountLong购入量StockPriceSingle进货单价OperatorIdString操作员IDRemarkString备注TypeNameString商品类型名称StockTimesLong进货次数TotalPriceSingle总进货支出AddNew方法,功能：添加单条进货信息。参数设计：无。gxcAddNewclsPublic类中的gxcAddNew枚举定义。Update方法,。。gxcUpdate类型，请参考clsPublic类中gxcUpdate枚举类型的定义。Delete方法,功能：删除进货信息。参数设计：可选参数lngID表示供货商信息ID，默认值为-1。返回值：gxcDelete类型，请参考clsPublic类中gxcDelete枚举类型的定义。进货信息管理集合类clsBuys,添加AddEx方法,添加Find方法功能：根据给定参数查找进货信息，结果以clsBuys类型返回。数，一个是进货编号，另一个是商品类型编号。clsBuys类型，一个clsBuy的集合，省略参数时，返回全部进货。添加FindStorage出，最后按进货总支出来排序，结果以clsBuys类型返回，最多返回前nCount条记录。表5.6参数设计参数名参数类型功能是否可选及默认说明值IsDescBoolean表示是否采用降序可选，默认值=True无nCountInteger最多显示多少条记=10无录返回值：clsBuys类型，一个clsBuy的集合。5.1.6销售信息管理模块销售信息管理模块的功能需要由clsSell和clsSells两个类实现，它的修改销售信息删除销售信息查找销售信息。按商品统计分析销售信息。其他与销售信息相关的常用操作。销售信息类clsSell用来具体处理单条销售信息，完成销售信息的基本操作功能，如添加、修改、删除等。选择菜单[工程]—[添加类模块]“添加类模块”“VB类生成器”，使用类生成器在工程中添加clsSell类，表5.1.7销售信息类clsSell属性名称数据类型说明IDLong销售编号MerchandiseIDLong商品IDMerchNameString商品名称RegDateDate登记日期CountLong售出数量SellPriceSingle售出单价OperatorIdString操作员IDRemarkString备注TypeNameString商品类型名称RegTimeLong登记次数TotalPriceSingle售出总价clsASell类中的AddNewUpdate和Delete理很类似，只是数据库中的字段不同而已。5.1.7报损信息管理模块报损信息管理模块的功能需要由clsDispose和clsDisposes两个类来。修改报损信息。删除报损信息。查找报损信息,按商品统计分析报损信息。其他与报损信息相关的常用操作。报损信息类clsDispose用来具体处理单条报损信息，完成报损信息的基本操作功能，如添加、修改、删除等。选择菜单[工程]—[添加类模块]“添加类模块”“VB类生成器”，使用类生成器在工程中添加clsDispose类，表5.7报损信息类clsDispose属性名称数据类型说明IDLong报损编号MerchandiseIDLong商品IDMerchNameString商品名称RegDateDate登记日期CountLong报损数量ReasonSingle报损原因OperatorIdString操作员IDRemarkString备注RegTimesLong登记次数TotalCountLong报损总数量TypeNameString商品类型名clsDispose类中的AddNewUpdate和Delete处理很类似，只是数据库中的字段不同而已。5.1.8管理员信息管理模块管理员信息管理模块的功能需要由clsAdmin和clsAdmins两个类来。修改管理员信息。删除管理员信息查找管理员信息验证管理员密码其他与管理员信息相关的常用操作。管理员信息类clsAdmin用来具体处理单条管理员信息，完成管理员信息的基本操作功能，如添加、修改、删除和验证密码等。选择菜单[工程]—[添加类模块]“添加类模块”“VB类生成器”，使用类生成器在工程中添加clsAdmin类，如下图所示。表5.8管理员信息类clsAdmin表属性名称数据类型说明AccountString管理员账号PwdString密码IsDefaultBoolean是否是默认用户clsAdmin中的AddNew、Update和Delete方法，与以上各类中的处理很类似，只是数据库中的字段不同而已。5.2开发基本界面组件进销存管理系统基本界面组件用来处理进销存管理系统中与界面相关给业务处理层，进一步转化为数据库操作。它包括以下功能：商品类型操作管理，对应frmMType窗体和clsOpMType类。商品操作管理，对应frmMerch窗体和clsOpMerch类。供货商操作管理，对应frmProvider窗体和clsOpProvider类。进货操作管理，对应frmBuy窗体和clsOpBuy类。销售操作管理，对应frmSell窗体和clsOpSell类。报损clsDispose窗体和clsOpDispose类应frmUser窗体和clsOpAdmin类。5.2.1信息输入界面加操作类的设计思想(1）每个模块的组成具体完成的功能如下：入封装到对应的信息管理类中。功能：其一是用来调出信息输入界面，接收用户输入，将输入存入数据库，控件添加数据，从而在用户截面端显示。(2）输入界面的代码结构ShowDlgvbModal，程序停止在这里。SetStatus：设计对话框控件的默认状态。SetDefaultValue计对话框的默认值OKButton_Click[确定]按钮单击处理事件CheckValid：检查用户输入有效性SaveValueCancelButton_Click[取消]按钮单击处理事件。当用户单击[确定]或[取消]按钮后，程序继续执行ShowDlg函数后面的语句，用来保存或放弃用户输入。(3)操作类的代码结构同样为了方便维护和快速开发,每个操作类的代码结构也都很相似,大多包括如下方法:Add:管理增加操作。Modify：管理修改操作。Delete：管理删除操作。AddToLvw：将单个对象加入列表，或在列表中更新。InitListview：设置ListView的显示样式。ObjsToListView：将对象集合显示到ListView中。FillListView：显示指定类型对象到列表控件。GetObjFromControl：从列表或树形图中得到一个对象。ObjsToCornbo：传入参数为对象的单向类与组合框。FillCombo：将全部对象加入到组合框中。(4)创建组件的公共模块mdlMain添加一个空的SubMain作为组件的初始化函数。(5)商品类型操作管理模块商品类型管理模块实现以下功能:处理添加商品类型的操作,处理修改商品类型的操作,处理删除商品类型的操作,处理列举或查找商品类型的操作。(6)商品操作管理模块。处理修改商品的操作处理删除商品的操作处理分析商品库存量的操作处理列举或查找商品的操作。(7)供货商操作管理模块供货商操作管理模块实现以下的功能：处理添加供货商的操作,处理修改供货商的操作,处理删除供货商的操作,处理列举或查找供货商的操作。(8)进货操作管理模块进货操作管理模块实现以下的功能：处理添加进货的操作,处理修改进货的操作,处理删除进货的操作,处理分析进货总支出的操作,处理列举或查找进货的操作。(9)销售操作管理模块。处理修改销售的操作处理删除销售的操作处理分析销售总收入的操作处理列举或查找销售的操作。(10)报损操作管理模块。处理修改报损的操作处理删除报损的操作处理分析报损总数量的操作处理列举或查找报损的操作。(11)管理员信息操作管理模块。处理修改管理员信息的操作处理删除管理员信息的操作处理列举或查找管理员信息的操作。5.3界面端应用程序设计5.3.1公共模块的设计在创建用户界面端应用程序时，向导已经为我们生成了一个名为mdlMain的模块，我们对这个模块稍微修改即可使用。添加成员变量,修改Main过程.5.3.2用户登入模块的设计系统密码错误就弹出提示，不能进入系统。图5.1用户登入界面设计图修改[确定]按钮的处理代码PrivateSubcmdOK_Click()'ToDo:创建测试密码是否正确'检查正确密码DimAccountAsStringDimPwdAsStringAccount=RealString()Pwd=RealString()'判断密码是否正确IfNotm_(Account,Pwd)Thenm_nErrCount=m_nErrCount+1Ifm_nErrCount>=3ThenMsgBox"输入密码错误次数太多，请稍后重试",vbExclamationEndEndIfMsgBox""&3-m_nErrCount&"密码区分大小写",vbCritical,"登录"=0=Len()ElseOK=Trueg_Account=AccountEndIfEndSub5.3.3系统主界面的设计表5.9设计主窗体控件布局控件名称属性属性取消功能frmMainCaption进销存管理系统系统主窗体inlViewSIconImageHeight16树形控件和列（ListView）表框小图标所ImageWidth16使用的图片inlViewBIconImageHeigh32列表框大图标（ImageList）ImageWidth32所使用的图片tvTreeViewLineStyleTvwRootLines显示商品类型（TreeView）ImageListinlViewSIcon树sstabViewStyleO-ssStyleTabbedDialo（ListView）g容器用TabOrientationO-ssTabOricntationToplvMerchFullRowSelectTrue分别用来显示（ListView）GridLinesTrue商品商品信息lvBuyViewlvwRiport列表（ListView）IconimlViewBIcon进货信息列表lvSell（ListView）lvDispose（ListView）lvProvider（ListView）SmallIconimlViewSIion销售信息列表报损信息列表供货商信息列表设计选项卡sstabView给sstabView控件添加5个选项卡，选项卡标题分别设置为“商品库存”“进货记录”“销售记录”“报损记录”“供应商”5个ListView。添加菜单5.3.4添加主界面模块管理，供货商管理，销售分析，帮助等等如图5.2图5.2主界面效果图其他代码PrivateSubForm_Load()LoadResStringsMe=GetSetting(,"Settings","MainLeft",1000)=GetSetting(,"Settings","MainTop",1000)=GetSetting(,"Settings","MainWidth",6500)=GetSetting(,"Settings","MainHeight",6500)=Val(GetSetting(,"Settings","ViewMode","0"))'初始化数据CallInitMainEndSubPrivateSubForm_Unload(CancelAsInteger)DimiAsInteger'closeallsubformsFori=-1To1Step-1UnloadForms(i)NextIf<>vbMinimizedThenSaveSetting,"Settings","MainLeft",SaveSetting,"Settings","MainTop",SaveSetting,"Settings","MainWidth",SaveSetting,"Settings","MainHeight",EndIfSaveSetting,"Settings","ViewMode",EndSubPrivateSubForm_Resize()OnErrorResumeNextIf<3000Then=3000SizeControlsEndSub5.3.5用户管理模块图5.3用户管理对话框界面设计图用户管理对话框代码设计OptionExplicitDimopAdminAsNewclsOpAdminPrivateSubCancelButton_Click()UnloadMeEndSubPrivateSubcmdAdd_Click()lvAdminEndSubPrivateSubcmdDel_Click()lvAdminEndSubPrivateSubcmdModify_Click()lvAdminEndSubPrivateSubForm_Load()lvAdminEndSub5.3.6经营分析模块排行进货总量与登记次数排行销售总量与登记次数排行报损总量与登记次数排行。表5.10经营分析对话框界面设计控件名称属性属性取消功能Caption经营分析经营分析对话框FrmAnalysis库存分析（Form）List进货分析销售分析报损分析Style2-DropDownLis前↓：降序排列，CboOrdert（ComboBox）前↓↑List↑后降序排列，取后若干项。然后再按由小到大显示TxtCountMaxLength3显示数量（TextBox）CmdSearchCaption查看[查看]按钮（CommandButtom）CmdCloseCaption关闭[关闭]按钮（CommandButtom）GridLinesTrue显示数据容LvAna器（ListView）ViewlvwRiport界面设计销售分析模块可以清楚的看出各类产品的销售情况如图5.4图5.4界面设计图代码分析OptionExplicitPrivateSubcmdClose_Click()EndSubPrivateSubcmdSearch_Click()DimnCountAsIntegerDimIsDescAsBooleanDimopMerchAsNewclsOpMerchDimopBuyAsNewclsOpBuyDimopSellAsNewclsOpSellDimopDisposeAsNewclsOpDisposenCount=Val()IfnCount=0ThennCount=10IsDesc=IIf(=0,True,False)SelectCaseCase0'库存分析lvAna,IsDesc,nCountCase1'进货分析lvAna,IsDesc,nCountCase2:'销售分析lvAna,IsDesc,nCountCase3'报损分析lvAna,IsDesc,nCountCaseElseEndSelectEndSubPrivateSubForm_Load()=0=0=10EndSub6测试分析6.1强