《[其它]管理系统毕业设计说明书.doc》由会员分享，可在线阅读，更多相关《[其它]管理系统毕业设计说明书.doc（40页珍藏版）》请在三一文库上搜索。
1、设计题目： 学 院： 专业年级 ： 学 号： 学生姓名: 指导教师、职称： 2012年 5 月Edible Fungus Wholesale Management System College： Computer and Information Science Specialty and Grade：Computer Science and Technology 2010 Number： Name: Advisor： Submitted time: May . 2012 福建农林大学本科毕业设计说明书目 录摘 要IAbstractII1.引言- 1 -1.1课题的背景- 1 -1.2选题的目的
2、及意义- 1 -1.3课题研究的主要内容- 1 -2.系统所采用的技术简介- 3 -2.1开发环境- 3 -2.2 C/S模式- 3 -2.3 SQL Server 2000简介- 3 -2.4 Visual Basic6.0简介- 3 -3.系统分析- 5 -3.1系统需求分析- 5 -3.2系统功能分析- 5 -3.3系统可行性分析- 5 -3.3.1可行性分析前提- 5 -3.3.2对系统支出与收益分析- 6 -3.3.3技术可行性分析- 6 -4.系统的总体设计与实现- 7 -4.1系统目标- 7 -4.2系统功能结构- 7 -4.3使用的关键技术- 7 -4.3.1数据库创建- 7
3、-4.3.2数据库连接- 9 -4.3.3数据显示- 9 -4.4数据库设计- 9 -4.4.1项目E-R图- 9 -4.4.2物理设计- 11 -4.5系统各功能模块设计- 13 -4.5.1登录模块- 13 -4.5.2主窗体模块- 14 -4.5.3信息设置模块- 14 -4.5.4入库管理模块- 16 -4.5.5批发管理模块- 18 -4.5.6库存管理模块- 19 -4.5.7数据统计模块- 22 -4.5.8系统维护模块- 24 -5.系统测试- 26 -5.1测试概述- 26 -5.2主要功能测试- 26 -5.3测试小结- 26 -6.结束语- 27 -参考文献- 28 -致
4、谢- 29 -附录- 30 -附录1- 30 -附录2- 30 -附录3- 32 -II福建农林大学本科毕业设计说明书摘 要随着计算机技术及数据库技术的不断发展,利用计算机来辅助办公、管理信息、提高工作效率是未来发展的必然趋势。传统的手工记录方法已经不能适应当今庞大而复杂的信息存储、统计、查询等需求。因此就必须为企业量身定制出一套适用于企业的信息管理系统。目前全国食用菌行业竞争日益激烈，对在该行业的传统管理模式也提出了新的要求，想要持续性发展提高竞争力就必须提高自身的工作效率，争取更多的客户满意度。经过分析，本系统使用Microsoft公司提供的Visual Basic开发工具1，利用其提供的
5、各种面向对象的开发工具，尤其是数据窗口这一能方便而简洁操纵数据库的智能化对象，首先在短时间内建立系统应用原型，然后，对初始原型系统进行需求迭代，不断修正和改进，最终满足食用菌批发销售管理的需要。从而屏蔽了传统手工记录的缺点，节约了大量的时间、人力、物力和财力，实现了真正的信息化管理，大大减轻了企业员工的工作量。提高企业的工作效率。关键词：食用菌 信息管理 VB6.0 SQL2000AbstractWith the continuous development of computer technology and database technology, the use of computers
6、 to assist in office management information, improve work efficiency is the inevitable trend of development in the future. The traditional manual recording methods can not adapt to todays large and complex information storage, statistics, query needs. It is necessary to tailor a customized set of en
7、terprise information management system.National mushroom industry is increasingly competitive, put forward new demands, the traditional management model in the industry want sustainable development to improve competitiveness and to improve their work efficiency, and strive for more customer satisfac
8、tion. After analysis, the system uses Microsofts Visual Basic development tool, its use of the various object-oriented development tools, especially in the data window can be simple and easy to manipulate intelligence database object, the first in a short time prototype system, then the initial prot
9、otype system needs iteration, constantly revised and improved, eventually meet the needs of the mushroom wholesale sales management. Thereby shielding the shortcomings of the traditional manual record, and save a lot of time, manpower, material and financial resources to achieve a true information m
10、anagement, greatly reducing the workload of corporate officers. Improving the work efficiency.Key words: Edible fungus information management VB6.0 SQL2000福建农林大学本科毕业设计说明书1.引言1.1课题的背景信息管理是一个企业运营中不可缺少的部分，它的内容对于企业的决策者来说至关重要，所以信息管理模式应该是能够为用户提供充足的信息以及快捷的查询。但一直以来人们都是使用传统的人工记录方式管理信息，这些管理方式都存在着许多缺陷，例如：效率低下、
11、保密性差；并且时间一长，将会产生大量的文件和数据，这对于查找、更新、统计和维护这些数据都带来了不少的麻烦，更重要的是这些数据可靠性不能得到保证。随着计算机信息技术的发展和互联网时代的到来与飞速发展，我们已经进入了信息化时代。在这数字化时代里，信息的容量大、传播速度快、覆盖范围广、具有高度的开放性和交互性已经日益成为文化传播活动、社会经济活动的重要载体。面对互联网的快速发展，摆在我们企业面前的一个重要任务就是，加快信息管理手段的更新改造，重视和充分运用信息数字化技术，如果能研发出一套检索迅速、查找方便、可靠性高、存储量大、保密性好、寿命长、成本低的这样一个信息管理系统，系统的这些优点能够极大地提
12、高企业管理的效率,也是企业的科学化、正规化管理,与世界接轨的重要条件。因此，开发这样一套管理软件成为很有必要的事情。1.2选题的目的及意义随着21世纪计算机信息技术的日新月异，它给我们的日常生活带来了巨大的改变，当然也对企业信息管理有着巨大的影响。为了加快企业信息自动化以及提高企业信息管理的效率，建立一个适合于企业的信息管理系统已经显得格外必要。福建省宁德市古田县是全国规模最大、产量最高的食用菌生产基地县，目前已经开发生产了四十多种菌类，先后被授予“中国食用菌之乡”、“全国食用菌行业先进县”、“全国食用菌生产基地县”和“中国食用菌之都”，山奇食品有限公司是一家2000年7月份成立专营食用菌类农
13、产品深加工、销售于一体的私营企业，其在主要的乡镇办起了食有菌脱水厂和农产品收购站，在各大主要城市设立销售网点，形成了具有中小规模的产品供销链，使其能在同行业中以质优价廉领先一步。公司在早期的时候，主要采用人工手写方法来记录统计财务及其他信息，到月底各个收购站、销售网点的负责人都要到总部或者传真统计数据来核对公司总账务。然而随着公司逐渐发展，产品数量上的增多，销售范围的扩大，顾客信息量的增加。现今公司需要频繁的查询、修改、统计这些数据和其他操作。然而在这样的信息化时代人工手写记录的统计方法就显示出它的不足。因此，就需要设计一个管理系统，来为公司解决快速增加、删除、修改、查询、统计信息等问题。1.
14、3课题研究的主要内容食用菌批发管理系统主要用于食用菌行业收购、批发的仓库管理，并提供了系统管理员、销售员、盘点人员、财务人员等的权限管理和职能分配，同时实现了各组人员可以通过该系统实现各种需求功能，提高整体运作效率，从而实现企业管理所要求的整体功能。操作食用菌批发管理系统的人员类型有以下几种：系统管理员、销售员、盘点人员、财务人员。整个系统分为六大主要功能模块分别为：信息设置模块、入库管理模块、批发管理模块、库存管理模块、数据统计模块、系统维护模块。系统管理登陆系统可以新建、删除用户，为不同的用户分配不同的操作权限，如对销售人员分配批发管理的操作权限，财务人员可以导出数据以及数据统计操作，仓库
15、管理人员可以对仓库库存进行盘点及时反馈库存情况。达到任务分工明确、数据操作简单、查询信息快捷。从而为企业管理上节约成本，提高工作效率，带来更大的利益。通过SQL Server 2000实现的后台数据库服务器模块：数据库中存储了程序员、系统管理员、销售员、盘点人员、部门经理管理系统中所有的信息和数据，为保证稳定性和良好的并发访问能力，采用SQL Server 2000来实现。2.系统所采用的技术简介2.1开发环境本食用菌批发管理系统采用C/S模式，开发工具是Visual Basic6.0可视化编程，数据库服务器是SQL Server 2000。2.2 C/S模式C/S（Client/Server
16、，客户机/服务器）模式又称C/S结构，是20世纪80年代末逐步成长起来的一种模式，是软件系统体系结构的一种。C/S结构的关键在于功能的分布，一些功能放在前端机（即客户机）上执行，另一些功能放在后端机（即服务器）上执行。功能的分布在于减少计算机系统的各种瓶颈问题。C/S模式简单地讲就是基于企业内部网络的应用系统。与B/S（Browser/Server，浏览器/服务器）模式相比，C/S模式的应用系统最大的好处是不依赖企业外网环境，即无论企业是否能够上网，都不影响应用。服务器通常采用高性能的PC、工作站或小型机，并采用大型数据库系统，如ORACLE、SYBASE、InfORMix或SQL Serve
17、r。客户端需要安装专用的客户端软件。2.3 SQL Server 2000简介SQL Server是一个全面的、集成的、端到端的数据解决方案，它为组织中的用户提供了一个更安全可靠和更高效的平台用于企业数据和 BI 应用。Microsoft SQL Server 2000能提供超大型系统所需的数据库服务2。大型服务器可能有成千上万的用户同时连接到 SQL Server 2000实例。SQL Server 2000为这些环境提供了全面的保护，具有防止问题发生的安全措施。超大型 Internet 站点可将其数据分开存放在多台服务器上，从而使处理负荷分散到多台计算机上，使站点能为成千上万的并发用户提供
18、服务。 可以在一台计算机上运行多个SQL Server 2000实例。SQL Server 2000 应用程序可在装有 SQL Server 2000的计算机上运行。该应用程序通过Windows进程间通讯 (IPC) 组件（例如共享内存）而非通过网络连接到SQL Server 2000。这使SQL Server 2000 得以应用于应用程序必须在本地存储数据的小型系统中。 2.4 Visual Basic6.0简介本系统开发工具为微软提供的Visual Basic6.0中文版。编程语言选用Visual Basic，Visual Basic是一种可视化的、面对对象和条用事件驱动方式的结构化高级程
19、序设计，可用于开发Windows环境下的种类应用程序。由于其功能强大、简单易学而受到广大程序设计者的欢迎。其主要功能特点有3：1)易学易用的集成开发环境。为用户设计窗体、编写代码、调试程序、编译代码、制作应用程序安装盘等提供了友好的集成开发环境。2) 可视化设计平台。采用传统程序设计语言程序时，都是通过编写程序代码来设计用户窗体，在设计过程中看不到窗体的实际显示效果。而在VB 6.0中，采用面向对象程序设计方法(Object-Oriented Programming)，把程序和数据封装起来作为一个对象，每个对象都是可视的。开发人员不必为窗体设计而编写大量程序代码。只需要按设计要求的屏幕布局，用
20、系统提供的工具，在屏幕上画出各种“部件”，即图形对象，并设置这些图形对象的属性。Visual Basic自动产生窗体设计代码，程序设计人员只需要编写实现程序功能的那部分代码，从而可以大大提高程序设计的效率。3) 事件驱动的编程机制。Visual Basic通过事件来执行对象的操作。一个对象可能会产生多个事件，每个事件都可以通过一段程序来响应。例如，命令按钮是一个对象，当用户单击该按钮时，将产生一个“单击“(CLICK)事件，而在产生该事件时将执行一段程序，用来实现指定的操作。在用Visual Basic设计大型应用软件时，不必建立具有明显开始和结束的程序，而是编写若干个微小的子程序，即过程。这
21、些过程分别面向不同的对象，由用户操作引发某个事件来驱动完成某种特定的功能，或者由事件驱动程序调用通用过程来执行指定的操作，这样可以方便编程人员，提高效率。4) 结构化的程序设计语言。VB 6.0具有丰富的数据类型、众多的内部函数，是模块化、结构化程序设计语言，结构清晰，简单易学。Visual Basic是在BASIC语言的基础上发展起来的，具有高级程序设计语言的语句结构，接近于自然语言和人类的逻辑思维方式。Visual Basic语句简单易懂，其编辑器支持彩色代码，可自动进行语法错误检查，同时具有功能强大且使用灵活的调试器和编译器。Visual Basic是解释型语言，在输入代码的同时，解释系
22、统将高级语言分解翻译成计算机可以识别的机器指令，并判断每个语句的语法错误。在设计Visual Basic程序的过程中，随时可以运行程序，而在整个程序设计好之后，可以编译生成可执行文件(.EXE)，脱离Visual Basic环境，直接在Windows环境下运行。5) 强大的数据库功能。VB 6.0利用数据控件可以访问Access，Foxpro，SQL Server，Oracle等多种数据库系统，也可以访问 Excel等多种电子表格。6) Active 技术。Active 技术发展了原有的OLE 技术，它使开发人员摆脱了特定语言的束缚，方便地使用其他应用程序提供的功能，使VB 6.0能够开发集声
23、音、图像、动画、字处理、电子表格、Web 等对象于一体的应用程序。3.系统分析3.1系统需求分析通过对某公司的沟通和需求分析4，要求系统具有以下功能：1）系统操作简单，界面友好。2）规范、完善的基础信息设置。3）支持多人操作，要求有权限分配功能。4）为了方便用户，要求系统需要支持模糊查询。5）支持库存盘点功能。6）当外界环境干扰本系统时，系统可以自动保护原始数据的安全。3.2系统功能分析食用菌批发管理系统能够让工作人员更加清楚的了解食用菌的销售库存等情况，更好的制定相关的库存销售、进货计划，因此系统应该具有如下功能：1）基本信息设置：管理食用菌信息，供应商信息，仓库信息。2）收购进货：入库管理
24、，入库查询。3）批发销售：销售管理，销售查询。4）库存管理：库存借出、归还、查询、盘点。5）数据统计：出入库统计，报表生成。6）系统维护：用户管理，修改密码，设置权限，数据库操作，数据清空。3.3系统可行性分析可行性分析5就是去研究和探索一种既能满足用户需求又能在当前具备的开发条件下开发一个新系统的最简洁的解决方法。对系统的可行性研究主要通过技术可行性、经济可行性、操作可行性三方面进行可行性分析，在此我们主要介绍系统的技术可行性。3.3.1可行性分析前提系统要求：食用菌批发系统需要包括基础数据管理、收购管理、批发管理、库存管理、数据统计等功能。在系统中能方便地增加、修改往来单位，能对收购订单、
25、销售订单进行管理，能方便的登记入库、销售数据，能方便的查询库存数据，要有强大的模糊查询功能，不同用户权限登陆系统尽心操作。系统目标：食用菌批发管理系统的目标是;实现食用菌仓库数据的信息化管理，合理控制库存，减少资金占用提高资金的利用率，从而提升企业市场竞争力。3.3.2对系统支出与收益分析 系统使食用菌批发管理实现了自动化。只需工作人员录入食用菌名称、供应商、的相关信息，企业内部就可共享这些数据，减少了大量工作人员的重复劳动。同时，公司员工可方便的查询库存情况，了解各种食用菌的库存量及仓库的分布，尽量减少库存的积压。系统提供丰富的查询功能，可按供应商、仓库查询入库与销售情况，通过这些数据可方便
26、的为企业提供实时数据分析，减少管理成本。这样只需花费少量的人力物力，就可节省开支，提高工作效率。3.3.3技术可行性分析该食用菌批发管理系统是基于CS体系结构设计的，使用Visual Basic和SQL Sever 2000作为开发环境，这已是成熟的开发平台， Visual Basic作为一种面向对象的可视化编程工具,具有简单易学、灵活方便和易于扩充的特点。并且为适应其发展推出了新的ADO模型,通过ODBC可以对当前流行的桌面数据系统提供方便快捷的连接6。而关系数据库产品具有坚实的理论基础，给予关系演算和关系模型，并且提供费面向过程的查询语言。SQL Server 2000是微软公司推出的关系
27、型数据库系统7，使用简单、可以获得非凡的可伸缩性和可靠性，通过向上伸缩和向外扩展的能力，能够满足我们大量的数据存储要求。4.系统的总体设计与实现系统设计阶段的主要目的是将系统分析阶段所提出的反映了用户信息需求的系统逻辑方案转换成可以实施的食用菌批发管理系统的物理（技术）方案。而系统的总体结构设计是系统设计阶段的主要活动之一，是为了实现系统总体功能，提高系统的各项指标。这一阶段的主要任务就是将整个系统合理的划分成各个功能模块，正确处理模块之间与模块内部的联系以及它们之间的调用关系和数据联系，定义各模块的内部结构等等。4.1系统目标根据需求分析的描述与用户沟通，最终确定系统要实现的目标如下。1）界
28、面设计简洁、友好、大方、框架清晰。2）操作简单、快捷方便。3）灵活快速的输入菌类信息、供应商信息、入库信息、销售信息等。4）对用户输入的数据进行严格的数据检验，尽可能排除人为的错误。5）提供灵活、方便的权限设置功能，使整个系统的管理分工明确。6）提供丰富的查询功能，可查询指定食用菌的入库、销售情况等模糊查询。4.2系统功能结构本系统的功能主要包括基本信息设置、收购进货、批发销售、库存管理、数据统计、系统维护，系统功能结构如图4-1所示。4.3使用的关键技术4.3.1数据库创建使用Microsoft SQL Server 2000企业管理器创建数据库步骤如下。1）打开企业管理器窗口。2）选中需要
29、在其上创建数据库的服务器。3）在“数据库”文件夹上单击鼠标右键，在弹出菜单中选择“新建数据库”选项。此时就会出现“数据库属性”对话框。4）在该对话框设置数据库名称，数据文件和事务日志文件的文件名和存储位置等选项，单击“确定”按钮，即可完成数据库的创建。基础信息设置供应商信息设置入库管理批发管理库存管理数据统计系统维护仓库信息设置期初库存设置收购入库入库查询批发销售销售查询库存借出库存归还库存盘点借出查询归还查询盘点查询出入库日统计出入库年统计生成出库报表生成库存报表数据导出用户管理密码修改权限设置数据库管理初始化数据药食用菌批发管理系统品图4-1系统结构图4.3.2数据库连接 在VB工程创建完
30、毕后，选择“工程”/“添加模块”命令，创建一个新模块，存放公共变量和数据库连接过程，关键代码如下：Public adoCon As New ADODB.Connection 定义一个数据连接Public adoRs As New ADODB.Recordset 定义一个数据集对象Public adoRs1 As New ADODB.Recordset 定义一个数据集对象Public CnnStr As StringPublic Sub Main() CnnStr = Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initi
31、al Catalog=DB_SYJPFGL;Data Source=. adoCon.Open (CnnStr)End Sub4.3.3数据显示在VB中选择用DataGrid控件显示数据库中表的信息8，DataGrid 控件是一种类似于电子数据表的绑定控件，可以显示一系列行和列来表示 Recordset 对象的记录和字段。可以使用 DataGrid 来创建一个允许最终用户阅读和写入到绝大多数数据库的应用程序。DataGrid 控件可以在设计时快速进行配置，只需少量代码或无需代码。当在设计时设置了DataGrid 控件的 DataSource 属性后，就会用数据源的记录集来自动填充该控件，以及自
32、动设置该控件的列标头。然后就可以编辑该网格的列；删除、重新安排、添加列标头、或者调整任意一列的宽度。在运行时，可以在程序中切换 DataSource 来察看不同的表9，或者可以修改当前数据库的查询，以返回一个不同的记录集合。4.4数据库设计在需求分析阶段已完成了系统的数据分析，并根据数据分析建立了应有的概念模型。在数据库设计阶段的主要工作就是把前一阶段的成果转化为具体的数据库。4.4.1项目E-R图本系统包括的主要实体有用户、仓库、供应商、入库、出库、库存，根据系统需求设计出每个实体的属性，通过下列E-R可以方便的理解实体属性本系统中库存实体属性如下图4-2所示。库存 规格单价入库时间入库数量
33、单位菌类编号名称图4-2库存的E-R图本系统中仓库实体属性如下图4-3所示。仓库名称电话备注构建日期地址负责人图4-3仓库的 E-R图本系统中供应商实体属性如下图4-4所示。供应商编号名称备注传真联系电话联系人图4-4供应商的E-R图本系统中入库实体属性如下图4-5所示。入库规格单位菌类名称备注单价入库日期供应商名称入库编号金额数量图4-5入库的E-R图本系统出库实体属性如下图4-6所示。出库销售日期单位提货人备注单价菌类名称提货单位销售编号金额数量图4-6出库的E-R图4.4.2物理设计本系统创建的表有仓库信息表、供应商信息表、入库表、出库表、借出数据表、库存信息表、用户表、盘点表等，下面给
34、出一些表的结构与字段表4-1入库表字段名称字段含义类型宽度允许空ID自动编号int4N主键IN_NumID菌类编号nvarchar30YIN_Name菌类名称nvarchar50YIN_gysid供应商编号nvarchar30YIN_gysname供应商名称nvarchar50YIN_SPEC规格nvarchar30YIN_UNIT单位nvarchar20YIN_Num数量int4YIN_Price单价float8YIN_Money金额float 8YIN_Date入库日期smalldateti 4YIN_Year入库年nvarchar10YIN_Month入库月nvarchar10YIN_P
35、eople经手人nvarchar 20YIN_Remark备注ntext 16YIN_MEdit修改人nvarchar20YIN_EDate修改日期smalldatet4Y表4-2出库表字段名称字段含义类型宽度允许空ID自动编号int4N主键OUT_NumID出库编号nvarchar50YOUT_id菌类编号nvarchar50YOUT_name菌类名称nvarchar30YOUT_UNIT单位nvarchar20YOUT_Num数量int4YOUT_Price单价float8YOUT_Money金额float8YOUT_Date出库日期smalldateti 4YOUT_Year出库年nva
36、rchar10YOUT_Month出库月nvarchar50YOUT_THDW提货单位nvarchar20YOUT_people提货人nvarchar20YOUT_Wpeople经手人nvarchar 20YOUT_Remark备注ntext 16YOUT_MEdit修改人nvarchar20YOUT_MDate修改日期smalldatet4Y表4-3库存信息表字段名称字段含义类型宽度允许空KC_ID自动编号int4N主键Kc_IDs菌类编号nvarchar30YKC_Name菌类名称nvarchar50YKC_SPEC规格nvarchar30YKC_UNIT单位nvarchar20YKC_N
37、um数量int4YKC_Price单价float8YKCIN_Date入库日期smalldateti4Ykc_remark备注ntext16Y表4-4仓库信息表字段名称字段含义类型宽度允许空Id编号int4N主键KName仓库名称nvarchar30YKPName负责人nvarchar20YKPone联系电话nvarchar20YKWorkers仓库地址nvarchar50YKDate创建日期nvarchar20YKRemark备注ntext16Y表4-5供应商信息表字段名称字段含义类型宽度允许空gys_ids自动编号int4N主键gys_id供应商编号nvarchar20Ygys_name供
38、应商名称nvarchar50Ygys_lxr业务联系人nvarchar20Ygys_phone联系电话nvarchar20Ygys_fax传真nvarchar30Ygys_remark备注ntext16Ygys_jlxgr记录修改人nvarchar20Ygys_date修改日期smalldateti4Y表4-6盘点表字段名称字段含义类型宽度允许空PD_ID盘点编号int4N主键PD_Name菌类名称nvarchar50YPD_SPEC菌类规格nvarchar30YPD_UNIT单位nvarchar20YPD_Num数量int4YPD_dj单价float8YPD_Date盘点日期smalldat
39、eti4YPD_Mpeople盘点员nvarchar20YPD_HPYC盘点情况nvarchar20YPD_Nums数量int4YPD_remark备注ntext16YPD_Mpeoples记录修改人nvarchar20YPD_MDate修改日期smalldateti4Y4.5系统各功能模块设计4.5.1登录模块用ListView控件将用户信息添加到其中，用户单击头像时将用户名赋给文本框，用户输入密码验证身份登录，食用菌批发管理系统只限定系统注册用户登录。用户只有输入正确的用户名和密码才可进入系统，登录界面如图4-7所示。图4-7登录界面关键代码如下：Private Sub Command1_
40、Click() Dim i As Integer rtn = SetWindowPos(Me.hwnd, -2, 0, 0, 0, 0, 3) Adodc1.RecordSource = select * from 用户表 where M_Name = & Text2.Text & and m_password = + Text1.Text + Adodc1.Refresh If Adodc1.Recordset.RecordCount 0 Then 将权限值赋给数组 For i = 1 To 24 bQx(i) = Adodc1.Recordset.Fields(3 + i) Next i
41、系统主窗口.Show Unload Me Else MsgBox 错误的用户名或密码！, vbCritical End IfEnd Sub4.5.2主窗体模块本系统由菜单驱动和事件驱动两种方式，将菜单设计到主窗体中，用户通过菜单或者command单击事件调用各个子模块完成相应的功能。主窗体用来集成本系统的菜单，添加了菜单后的主窗体如图4-8所示。图4-8主窗体界面4.5.3信息设置模块信息设置模块用来管理初建仓库时对仓库信息的设置，供应商信息的设置，该模块分为如下三部分操作功能：1）供应商信息设置子模块就一个窗体上半部分用DataGrid控件显示数据库中的供应商的信息，下半部分用来添加、修改、
42、删除、保存供应商信息，需要哪种操作单击提示按钮即可，操作界面如图4- 9所示。图4-9供应商信息维护及界面保存按钮的代码详见附录1。2）仓库信息设置模块就提供仓库信息的编辑和保存功能，操作界面如图4-10所示。图4-10仓库信息设置界面编辑按钮过程实现的代码如下： Toolbar1.Buttons(1).Enabled = False Toolbar1.Buttons(2).Enabled = True Toolbar1.Buttons(3).Enabled = True 锁定相应的文本框 Text1.Enabled = True Text2.Enabled = True Text3.Enabled = True Text4.Enabled = True Text5.Enabled = True Text6.Enabled = True Adodc1.RecordSource = select * from 仓库信息表 where kname= + Text1.Text + Adodc1.Refresh If Adodc1.Recordset.RecordCount 0 Then