公司仓库管理系统(doc 22)17206.docx

《公司仓库管理系统(doc 22)17206.docx》由会员分享，可在线阅读，更多相关《公司仓库管理系统(doc 22)17206.docx（22页珍藏版）》请在淘文阁 - 分享文档赚钱的网站上搜索。

1、公司仓库管理系统第一章 公司介绍与与系统的需需求分析1.1公司司简介佳雪公司是是一个专销销电动机的的公司，主主要业务是是进行电动动机的进货货与分销，作作为一个销销售的中介介公司，其其要求有入入库与出库库的主要数数据库，可可以简单的的记录数据据，并且可可以进行多多方面的查查询，使得得公司有较较详细的数数据统计与与分析。其主要业务务如以下图图所示：1. 厂商 仓仓库 顾客图1.1.1 22.查询功功能1） 按型号查询询有两个结果果：A生成成 入库量量、出库量量、节余量量 BB生成 两两个数据来来源表，包包括出库来来源与入库库来源；2） 按单位查询询 结结果：生成成 型号、产产品名称、时时间（入/出

2、库）、单单价 再生成成出入库的的两个基本本情况表，包包括供应商商和顾客的的基本情况况，如型号号、出/入入库时间，单单价，发票票编号、结结帐情况； 33.本系统统主要运用用Visuual BBasicc的内嵌数数据库Acccesss来记录数数据；4.产品信信息： 序号（自自动生成）、型型号（文本本）、入库库时间（日日期）、出出库时间（日日期）、数数量（数字字）、发票票编号（文文本）、单单价（货币币）、厂商商名称（文文本）、供供应商名称称（文本）、厂厂商与供应应商的电话话（数字）、结结帐情况（是是/否）是为0，否否为-11. 2分析与描描述输入数据一.根据11.1章节节的具体要要求，总结结出以下的

3、的数据流程程：顾客出库入库供应商型号删除修改单位增加删除修改增加出库查询 入库 图1.2.1 数据流程程二.根据以以上情况，按按要求设计计了几个相相关的数据据库 表：出出库、入库库 查询：查询结余余、出库查查询、入库库查询、型型号出库查查询、型号号入库查询询l 主要的出库库表属性如如以下表所所示：字段名属性字段大小序号自动生成长整型型号文本50产品名称文本50出库数量数字长整型单价货币自动小数出库时间日期年-月-日日发票编号文本50顾客电话文本50结帐情况是/否2 表1.22.1l 由于入库表表与出库想想类似，所所以在此不不做详细介介绍。l 为了方便查查询，因此此在出库与与入库的基基础上增加加

4、了几个查查询表，具具体字段如如下：1. 查询结余：型号、产产品名称、出出库数量、入入库数量2. 出库查询：顾客名称称、型号、出出库时间、单单价、出库库数量OFF SUMM、发票编编号、结帐帐情况3. 入库查询：供应商名名称、型号号、入库时时间、单价价、入库数数量OF SUM、发发票编号、结结帐情况4. 出库型号查查询：型号号、产品名名称、顾客客名称、单单价、发票票编号、结结帐情况5. 入库型号查查询：型号号、产品名名称、供应应商名称、单单价、发票票编号、结结帐情况1.3数据据库的主要要特点u 数据库中的的每一个表表都必须符符合下面几几个特征：*表中的每每一个单元元的内容只只有一个值值*所有字段

5、段的名称都都不相同*记录的前前后次序和和字段的左左右次序可可以变化，不不受限制*数据库中中的表的上上下次序不不受限制*表中不应应有内容完完全相同的的记录*表中的每每一个字段段都必须有有相同的数数据类型使用Vissual Basiic开发应应用程序的的两个主要要思想：*可视设计计*事件驱动动编程Visuaal Baasic应应用程序不不同于其他他语言开发发的单一性性程序。使使用Vissual Basiic编程时时，必须首首先确定应应用程序如如何与用户户交互，如如鼠标单击击，用户必必须编写代代码控制这这些事件的的响应方法法。使用Vissual Basiic开发数数据库应用用程序的一一般步骤如如下所

6、示：（1） 建立数据库库（2） 建立用户界界面（3） 编写代码（4） 调试运行（5） 编译应用程程序（6） 发布应用程程序界面设计（1） 控件的位置置（2） 界面元素的的一致性（3） 保持界面的的简明（4） 使用颜色和和图象：增增加视觉的的感染力（5） 图象和图标标：增加应应用程序的的视觉上的的趣味（6） 选取字体Visuaal Baasic应应用程序的的结构： 由由于Vissual Basiic应用程程序是基于于对象的，所所以应用程程序的代码码结构就是是该程序在在屏幕上物物理表示的的模型。根根据定义，对对象包含数数据和代码码。在屏幕幕上看到的的窗体代表表属性，这这些属性定定义了窗体体的外观和

7、和内在特性性。本设计主要要是运用DData控控件。 Dataa控件主要要是打开、访访问并操作作已有的数数据库，它它是Vissual Basiic 访问问数据库的的最常用的的工具之一一。由于DData控控件使用MMicroosoftt的Jet引擎来来实现数据据访问（与与Micrrosofft Acceess 所所用的数据据库引擎相相同），使使用户可以以无缝地访访问很多标标准的数据据库格式，而而且无需编编写任何代代码就可以以创建数据据应用程序序，因此这这种Vissual Basiic 内部部的Datta控件最最合适小的的（桌面）数数据库，诸诸如Acccess和和ISAMM数据库等等。 由于Daat

8、a控件件是Vissual Basiic 的内内部控件，因因此可以直直接在标准准工具箱中中找到该控控件。 在程序运运行过程中中，只要用用鼠标单击击控件上的的箭头按钮钮，系统将将自动修改改Dataa控件指向向的记录和和显示在约约束控件中中的数据，而而不需要编编写任何代代码。 可以将多多个Datta控件同同时添加到到一个工程程甚至是同同一个窗体体中。另外外，每个控控件可以连连接到不同同的数据库库或同一个个数据库的的不同表上上，还可以以和代码一一起查询满满足的语句句的表的记记录集。 使用Daata控件件可以显示示、编辑和和更新来字字各种已有有的数据库库信息。此此外，还可可以访问和和操作远程程的开放式式

9、数据库连连接。除了使用DData控控件之外，还还运用的VVisuaal Baasic 6.0的的新增控件件功能，DDblisstboxx它不象标标准的列表表框或组合合框那样需需要使用AAddIttem方法法添加列表表项。另外外，它们还还可以有选选择地把某某个选定的的字段传递递给另一个个Dataa控件，使使得它对于于“查找表”应用程序序很理想。与其他的约约束控件不不同，这些些控件可以以同时显示示多个记录录。约束数数据列表控控件类似于于普通的列列表框控件件，可以显显示记录集集中的数据据，网格中中的每一行行代表记录录集中的一一个记录。第二章 管管理系统的的设计与分分析2.1进入入界面l 由于系统的的

10、的界面比比较单一，因因此在设计计过程中运运用了许多多网上下载载的图片来来增添界面面的可观性性。l 在考虑到操操作员的技技术水平有有限，因此此在控件方方面只运用用了COMMMANDD，这样不不仅能是界界面清楚，更更能是操作作者很快学学会，简单单易懂。l 图2.1.1是进入入本系统的的状态图，单单击“确定”可以进入入界面，如如按“系统信息息”的话，将将显示本系系统的具体体软硬件情情况。 图图2.1.1当图2.11.1中的的“确定”按钮被激激活时，将将进入图22.1.33的屏幕，界界面的图片片是图片引引入的，接接着将进入入正式的编编辑或查询询状态。具体的系统统情况如图图2.1.2所示：图2.1.2图

11、2.1.32. 2入库界面面l 当激活入库库按钮时将将出现以下下的界面（图图2.2.1） 图图2.2.1l 入库窗体（图图2.2.1）及其其各个控件件的主要属属性 控件类型控件名主要属性FormFrmrssg1Captiion=“入库情况况”DataData11Databbasenname=“Adbb2.mddb”Recorrdsetttypee=1DDynassetCaptiion=“入库情况况”CommaandDiialoggCommaand1Captiion=“上一个”Commaand2Captiion=“下一个”Commaand3Captiion=“确定”Commaand4Captii

12、on=“取消”Commaand5Captiion=“退出”Commaand6Captiion=“增加”Commaand7Captiion=“修改”Commaand8Captiion=“删除”LableeLablee1Captiion=“序号”Lablee2Captiion=“型号”Lablee3Captiion=“产品名称称”Lablee4Captiion=“数量”Lablee5Captiion=“单价”Lablee6Captiion=“入库时间间”Lablee7Captiion=“发票名称称”Lablee8Captiion=“供应商名名称”Lablee9Captiion=“电话”Lablee

13、10Captiion=“结帐情况况”TextText11Captiion=“序号”Datassourcce=“dataa1”Text22Captiion=“型号”Datassourcce=“dataa1”Text33Captiion=“产品名称称”Datassourcce=“dataa1”Text44Captiion=“数量”Datassourcce=“dataa1”Text55Captiion=“单价”Datassourcce=“dataa1”Text66Captiion=“入库时间间”Datassourcce=“dataa1”Text77Captiion=“发票名称称”Datassourc

14、ce=“dataa1”Text88Captiion=“供应商名名称”Datassourcce=“dataa1”Text99Captiion=“电话”Datassourcce=“dataa1”Text110Captiion=“结帐情况况”Datassourcce=“dataa1”表2.2.1l 控件说明 增加新记录录当单击“确确定”按钮后，“确定”和“取消”两个按钮钮显示，同同时使其他他的按钮不不可见，这这样做是为为了防止用用户的误操操作。其主要程序序如下：Privaate SSub CCommaand5_Clicck()xg = Truee显示“确确定”和“取消”两个按钮钮Commaand3.

15、Visiible = TrrueCommaand4.Visiible = Trrue取消其他他按钮功能能Commaand5.Enabbled = FaalseCommaand6.Enabbled = FaalseCommaand7.Enabbled = FaalseCommaand8.Enabbled = FaalseCommaand1.Enabbled = FaalseCommaand2.Enabbled = FaalseData11.Reccordsset.AAddNeew 添添加一个新新记录Text11.SettFocuus 光光标在TEEXT1处处 end sub 修改记录在调用EDD

16、IT方法法之前，约约束控件中中的数据是是只读的，用用户无法对对其进行修修改。调用用了EDIIT方法后后，用户可可以在约束束控件中修修改记录的的值。如果果在对当前前记录进行行修改之前前修改，未未使用EDDIT方法法，将发生生运行时错错误。其主要程序序如下：Privaate SSub CCommaand6_Clicck()xg = TrueeCommaand3.Enabbled = TrrueCommaand4.Enabbled = Trrue取消其他他按钮功能能Commaand5.Enabbled = FaalseCommaand6.Enabbled = FaalseCommaand7.Enab

17、bled = FaalseCommaand8.Enabbled = FaalseCommaand1.Enabbled = FaalseCommaand2.Enabbled = Faalse对记录进进行编辑Data11.Reccordsset.EEditText11.SettFocuusEnd SSub 删除记录当用户单击击“删除”命令按钮钮时，为了了防止用户户误删除数数据，程序序将调用MMsgboox（）函函数以弹出出对话框，询询问用户是是否真的要要删除该记记录。如果果用户单击击对话框上上的“确定”按钮，程程序调用记记录集的DDelette方法，将将记录集的的当前记录录设置为空空，并从原原始的

18、表中中删掉当前前记录。但但是删除的的记录仍然然是当前记记录，只是是将其变为为了无效的的记录，任任何对其的的引用都会会产生错误误。其主要程序序如下：Privaate SSub CCommaand6_Clicck()xg = TrueeCommaand3.Enabbled = TrrueCommaand4.Enabbled = Trrue取消其他他按钮功能能Commaand5.Enabbled = FaalseCommaand6.Enabbled = FaalseCommaand7.Enabbled = FaalseCommaand8.Enabbled = FaalseCommaand1.Enab

19、bled = FaalseCommaand2.Enabbled = Faalse对记录进进行编辑Data11.Reccordsset.EEditText11.SettFocuusEnd SSubPrivaate SSub CCommaand7_Clicck()ss = MsgBBox(真的要删删除吗？, vbbYesNNo + vbInnformmatioon, 删除记录录)如果要删删除If (sss = vbYees) TThenData11.Reccordsset.DDeletteData11.Reccordsset.MMoveNNextIf Daata1.Recoordseet.EOOF

20、 ThhenData11.Reccordsset.MMoveLLastCommaand2.Enabbled = FaalseEnd IIfEnd IIfEnd SSub 移动数据当用户单击击“上一个”和“下一个”按钮是，系系统将自动动转换数据据，但注意意，当移至至第一个记记录时，“下一个”按钮将失失效；移至至最后一个个记录是，“上一个”按钮也将失效。其中在设计计程序时，为为了防止“NO CCurreent RRecorrd”这样的错错误，在移移动记录指指针时测试试记录集的的BOF 和EOFF属性。如如果单击“上一个”和“下一个”命令按钮钮将导致记记录指针指指向空指针针，则分别别调用Moovef

21、iirst和和Moveelastt方法，这这是防止“NO CCurreent RRecorrd”错误出现现的最简单单和最有效效的方法。与与此同时，如如果记录集集的BOFF属性为TTrue,则置“上一个”命令按钮钮为非激活活状态，是是用户无法法再单击该该按钮。同同样，当记记录集的BBOF属性性为Truue时，置置“下一个”命令按钮钮为非激活活状态。其主要程序序如下：Privaate SSub CCommaand1_Clicck()xg = FalsseData11.Reccordsset.MMovePPreviious如果是第第一个记录录，BOFF属性为TTRUEIf Daata1.Recoor

22、dseet.BOOF ThhenData11.Reccordsset.MMoveFFirsttCommaand1.Enabbled = FaalseElseCommaand2.Enabbled = TrrueCommaand1.Enabbled = TrrueEnd IIfEnd SSubPrivaate SSub CCommaand2_Clicck()xg = FalsseData11.Reccordsset.MMovePPreviious如果当前前记录是记记录集中最最后一个记记录，EOOF属性为为TRUEEIf Daata1.Recoordseet.BOOF ThhenData11.Rec

23、cordsset.MMoveLLastCommaand2.Enabbled = FaalseElseCommaand2.Enabbled = TrrueCommaand1.Enabbled = TrrueEnd IIfEnd SSub 用Updaata方法法确认增加加和修改当用户修改改和增加完完一个记录录的数据后后，需要将将数据保存存到数据库库中。可以以通过调用用记录集的的Updaata方法法把数据保保存到数据据库中。单单击“确定”按钮时，记记录将被记记如数据库库。其主要程序序如下：Privaate SSub CCommaand3_Clicck()On Errror GoToo errror1

24、xg = TrueeData11.Reccordsset.UUpdatteCommaand3.Enabbled = FaalseCommaand4.Enabbled = FaalseCommaand2.Enabbled = TrrueCommaand1.Enabbled = TrrueCommaand4.Enabbled = TrrueCommaand5.Enabbled = TrrueCommaand6.Enabbled = TrrueCommaand7.Enabbled = TrrueCommaand8.Enabbled = TrrueExit Suberrorr1: MMsgBoox E

25、rrr.Deescriiptioon, vvbOKOOnly, 错误误提示End SSub 用CanccelUppdataa方法放弃弃增加和修修改如果用户修修改了约束束控件里的的数据后，在在没有单击击“确定”命令按钮钮之前，想想放弃刚才才的增加或或修改，则则可以单击击“取消”命令。 由于于其程序与与Updaata方法法相似，因因此不做重重复解释。 定义Datta_Vaalidaata事件件过程对于一个新新记录或编编辑的记录录，如果不不能维护引引用完整性性或不能反反映该旧路路的实体原原型，那么么它就是无无效的，并并且破坏了了数据库的的完整性。为为了在“入库情况况”表中建立立一个有效效的记录，就就

26、必须要有有主关键字字段“型号”的值。因因此，对已已经存在和和新增加的的旧路都要要先测试其其“型号”字段之后后才可以执执行更新操操作。其主要程序序如下：当约束控控件中内容容改变时If Teext2.DataaChannged ThennSave = TrrueIf Daata1.Recoordseet.ReecorddCounnt 1 ThhenCommaand1.Enabbled = TrrueCommaand2.Enabbled = TrrueEnd IIfElseIf Teext2.Textt = Annd xgg = TTrue Thenn ss = MsggBox(必须要要有型号！,

27、vbOKKOnlyy + vvbInfformaationn, 提提示) Actiion = Fallse Commmand33.Vissiblee = TTrue Commmandd4.Viisiblle = Truee Commmand11.Vissiblee = TTrue Commmand22.Vissiblee = TTrue Commmand77.Vissiblee = TTrue Commmand88.Vissiblee = TTrue Commmand55.Vissiblee = TTrue Commmand66.Vissiblee = TTrue End If End If

28、If AActioon = dataa_acttionuunloaad Orr Acttion = daata_aactiooncloose TThen Savee = TTrue End IfEnd SSub2.3出库库界面当单击“出出库”按钮的时时候，系统统将进入出出库信息输输入界面，如如（图2.3.1）所所示，其基基本情况与与入库相类类似，依次次不做具体体介绍。图2.3.12.4查询询界面l 当用户单击击“查询”按钮时，系系统将出现现密码登陆陆框，因为为查询的是是内部资料料，因此，需需身份验证证，如图22.4.11图2.4.1l 随后将进入入查询功能能，如图22.4.22图2.4.2l

29、用户可根据据不同需要要进行“按型号”和“按单位”的查询。 单击“按型型号”，系统将将进入以型型号为关键键字段的查查询，如图图2.4.3。其中中根据SQQL语句的的查询，选选出出库型型号与入库库型号相同同的记录，统统计出入库库与出库的的总数量，然然后可按“上一个”和“下一个”进行查询询，也可按按出库与入入库分别查查询记录。图2.4.3 当用户单击击“查询出库库”按钮是，系系统进入界界面，如图图2.4.4图2.4.4l 图2.4.4窗体及及其上面控控件的属性性设置控件类型控件名主要属性FormfrmdbblisttCaptiion=“查询出库库”DataData11DatabbaseNName=“

30、a:ddb2.mmdb”RecorrdsettTypee=1RecorrdSouurce=“出库型号号”FrameeFramee1Captiion=“具体情况况”LableeLablee1Cqptiion=“产品名称称”Lablee2Cqptiion=“单价”Lablee3Cqptiion=“发票编号号”Lablee4Cqptiion=“顾客名称称”Lablee5Cqptiion=“结帐情况况”TextText11Dataffieldd=“具体情况况”Datassourcce=“Dataa1”Text22Dataffieldd=“具体情况况”Datassourcce=“Dataa1”Text3

31、3Dataffieldd=“具体情况况”Datassourcce=“Dataa1”Text44Dataffieldd=“具体情况况”Datassourcce=“Dataa1”Text55Dataffieldd=“具体情况况”Datassourcce=“Dataa1”DBlisstDblisst1Listffieldd=“型号”Rowsoourcee=“Data11”表2.4.1 单击Dbllist框框中的型号号，Fraame中将将自动显示示记录，以以供用户查查询。l 当用户单击击“查询入库库”按钮时，将将出现图22.4.55的界面。图2.4.5l 再回到查询询界面，单单击“按单位”按钮，此此时

32、系统将将进入按单单位查询的的截面，如如图2.44.6图2.4.6 分别按“顾顾客”和“供应商”按钮，系系统将分别别进入不同同的查询界界面，如图图2.4.7和图22.4.88由于以下两两个窗口的的属性以及及其设计方方法类似与与图4.33，因此也也不做详细细介绍。图2.4.7图2.4.82.5退出出程序l 再回到登陆陆主窗口，（图图2.1.3），单单击“退出”按钮，系系统将退出出程序，显显示以下窗窗口（图22.5.11），单击击图中的“再见”，此程序序也将结束束。图2.5.1第三章 系系统运行与与调试测试本身的的目的是尽尽可能地暴暴露程序中中的错误，因因此在编译译完成后，我我也尝试用用现实数据据来

33、进行正正确的调试试。在从中中曾出现过过以下几个个具体问题题：1. MSDN不不存在2. 524数据据转换错误误3. 当单击“上上一个”和“下一个”按钮时会会出现数据据不存在而而退出程序序4. DBLISST控件不不能正确引引入数据当出现以上上问题是，经经过严密与与反复的调调试同样用用了一些方方法来解决决1. 改变数据原原来的设计计方法，改改用文本型型的数据为为多2. 仔细表明正正确的日期期输入法3. 当进行数据据更新时，没没有确定或或取消，系系统将提示示以下对话话框，如图图3.1图3.1 44.当主要要关键字段段“型号”没有输入入时，系统统也将提示示以下对话话框，如图图3.2图3.2 55.当

34、用户户要删除记记录时，为为了保证不不误操作，系系统也将提提出一个对对话框，如如图3.33图3.3 66.为了便便有运行，还还将程序打打包，进行行安装，在在打包过程程中，也出出现以下对对话框，如如图3.44图3.4第四章 思思想小结在短短的两两个月内，通通过参考各各种VB编编程书籍、网网上查找信信息以及老老师的耐心心知道下，完完成了这次次毕业设计计浙江佳佳雪仓库管管理系统。起初，我看看了许多书书籍，对该该公司的要要求也只是是初步了解解，因此在在分析软件件需求中碰碰到了一些些麻烦，但但通过赵敏敏媛老师的的正确引导导下，把系系统分析了了比较透彻彻了。在编编译过程中中，最让我我印象深刻刻的是用DDAT

35、A控控件访问数数据，由于于DATAA控件的局局限性，因因此在查询询时，碰到到了一些不不能查询数数据的麻烦烦，但VBB6.0中中有新增的的DBLIIST功能能，可以直直接通过此此控件来访访问数据库库，当我找找到此方法法时，那么么所完成的的查询就更更为完善了了。这次毕业实实际不尽使使我了解了了VB在数数据库方面面编程的概概要，更让让我知道了了计算机的的变成秘诀诀在于严密密的思考与与仔细的推推敲，只有有这样，才才会有一个个完善的软软件生成。当当然这次的的管理系统统也一定存存在着许多多不足之处处，但可以以适合与如如佳雪公司司这样的小小型销售型型公司，但但为将来的的升级提供供了更多的的方便的途途径。完成这次设设计，心理理非常高兴兴，也有一一点成就感感，因为这这是我独立立完成的第第一个软件件，我相信信它将在今今后的工作作生活中为为我带来不不小的影响响。最后，我还还要感谢多多方面的支支持以及帮帮助过我的的人，尤其其是我的指指导老师，她她仔细认真真的态度，对对我的帮助助是非常大大的，使得得我更完善善地完成了了次管理系系统。