收藏 分享(赏)

毕业设计论文-基于VB的仓库管理系统设计(源代码).doc

上传人:QQ153893706 文档编号:2293350 上传时间:2018-09-09 格式:DOC 页数:30 大小:676KB
下载 相关 举报
毕业设计论文-基于VB的仓库管理系统设计(源代码).doc_第1页
第1页 / 共30页
毕业设计论文-基于VB的仓库管理系统设计(源代码).doc_第2页
第2页 / 共30页
毕业设计论文-基于VB的仓库管理系统设计(源代码).doc_第3页
第3页 / 共30页
毕业设计论文-基于VB的仓库管理系统设计(源代码).doc_第4页
第4页 / 共30页
毕业设计论文-基于VB的仓库管理系统设计(源代码).doc_第5页
第5页 / 共30页
点击查看更多>>
资源描述

1、河 北 农 业 大 学本 科 毕 业 论 文 (设 计 )题 目: 仓库管理系统 学 院: 信息科学与技术学院 专业班级: 计算机科学与技术 学 号: 学生姓名: 指导教师姓名: 指导教师职称: 讲师 二 OO 一三 年 六 月 四 日目 录摘 要 1ABSTRACT 2第一章绪论 31.1 研究背景 .31.2 国内外现状 .31.3 研究意义 .3第二章 理论和技术基础 .32.1 技术简介 .32.2Visual Basic 简介 .32.3 使用 Access2003 实现关系型数据库 .42.3.1 数据库的概念 42.3.2 新建一个数据库 42.3.3 修改已建的数据库 42.3

2、.4 实现数据库之间的联系 4第三章 系统需求分析 .53.1.功能需求 .53.2 技术可行性 .53.3.经济可行性 .53.4 系统可行性 .5第四章 系统设计 .64.1 系统功能模块设计 .64.2 系统界面总体设计 .74.3 系统设计思想 .74.4 系统数据库详细设计 .74.4.1 数据库的概要说明 74.4.1 数据库的表项 .8第五章 前台、后台模块实现 105.1 登陆模块 105.2 主页面模块 115.3 系统工能模块 11第六章 结束语 .17参考文献 .18致 谢 .19附录 .201摘 要企业管理的成败,取决于能否做出有效的决策,而决策的正确与否则在很大程度上

3、取决于信息的质量.随着人类进入信息时代,信息管理的水平越来越成为衡量一个企业实力的重要标志,随着经济的高速发展,企业信息化工作也在如火如荼的进行;仓库管理是商业企业经营管理中的核心环节,也是一个企业能否取得效益的关键.企业采购、销售和库存有机的结合是企业获得最大的经济利益的关键。仓库管理是与我们日常生活息息相关的问题。大到公司、超市的仓库管理,小到图书馆的藏书管理,都可以认为是各种各样的仓库管理需求。随着我国改革开放的不断深入,经济飞速的发展,企业要想生存、发展,要想在激烈的市场竞争中立于不败之地,没有现代化的管理是万万不行的,仓库管理的全面自动化、信息化则是其中极其重要的部分。为了加快仓库管

4、理自动化的步伐,提高仓库的管理业务处理效率,建立仓库管理系统,尽可能地减少仓库管理的重复性和低效性,已变得十分必要。本系统是一个小型仓库的销售、进货、商家、库存等管理的程序设计,分别对系统进行系统分析、系统设计和系统的实施,最后给出了系统的使用说明。在设计中,系统开发平台为 Windows XP,程序设计 Visual Basic6.0 作为前台开发工具,Microsoft Access2003 作为后台数据库开发平台,程序运行平台为 Windows 2000/XP/Vista,并对开发环境、开发工具、数据库服务器作了一些介绍。在程序设计中,采用了结构化与面向对象两种解决问题的方法,程序通过调

5、试运行,初步实现了设计目标,并且经过适当完善后,将可以应用在商业中解决实际问题。关键字:仓库 管理系统 Access 数据库全套源程序加 1538937062ABSTRACTThe success or failure of the enterprise management depends on effective decision-making, and the correct decision and otherwise depends largely on the quality of information as mankind enters the information age,

6、 the level of information management has increasingly become a measure of a corporate strength an important symbol of the rapid economic development, enterprise information work is also in full swing; warehouse management is a core part of the business enterprise management, but also a business the

7、ability to obtain effective key corporate purchasing, sales and inventory organic the combination of key enterprises to obtain the maximum economic benefit. Warehouse management is closely related to our daily lives. Big company, the supermarket warehouse management, small library collection managem

8、ent, can be considered to be a variety of warehouse management needs. With the deepening of Chinas reform and opening up, the rapid development of the economy, businesses in order to survive, develop, in order to remain invincible in the fierce market competition, modern management is absolutely not

9、 fully automated warehouse management , information is extremely important part. In order to accelerate the pace of warehouse management automation, warehouse management efficiency of business processes, warehouse management system, warehouse management to minimize repetitive and inefficient, has be

10、come very necessary.This system is a small warehouse sales, purchase, businesses, and inventory management program design, system analysis, system design and implementation of the system, system Finally, the instructions for use of the system. In the design, the system development platform is Window

11、s XP, Programming Visual Basic6.0 as the prospects of development tools, Microsoft Access2003 as a back-end database development platform, the program operating platform for Windows 2000/XP/Vista and development environment, development tools, database The server made some introductory remarks. In t

12、he program design, the use of structured and object-oriented are two solutions to the problem, through debugging run, the initial realization of the design goals, and after complete the appropriate can be applied to solve practical problems in business.Keywords: Warehouse Management System Access da

13、tabase3第一章 绪 论1.1 研究背景随着我国经济的飞速发展,各种类型规模的公司企业迅速崛起,许多从事生产和经营管理的企业都有自己生产和销售的产品,而这些产品都需要储存在仓库中,对于每个企业来说,随着企业规模的不断扩大,产品数量的急剧增加,所生产产品的种类也会不断地更新与发展,有关产品的各种信息量也会成倍增长。面对庞大的产品信息量,如何有效地管理仓库产品,对这些企业来说是非常重要的,仓库管理的重点是销售信息能否及时反馈,从而确保企业运行效益。而仓库管理又涉及入库、出库的产品、经办人员及客户等方方面面的因素,如何管理这些信息数据,是一项复杂的系统工程,充分考验着仓库管理员的工作能力,工作量

14、的繁重是可想而知的,所以这就需要由仓库管理系统来提高仓库管理工作的效率,这对信息的规范管理、科学统计和快速查询,减少管理方面的工作量,同时对于调动广大员工的工作积极性,提高企业的生产效率,都具有十分重要的现实意义。 1.2国内外现状现代企业的物流系统日趋复杂,高效的物流系统要求有效地对企业的库存进行管理。目前的仓库管理系统一般技术比较落后、性能较差且很不完备,人工干涉多,操作使用不方便,有的还故障率高且不实用。现阶段仓库管理的特点是信息处理量特别大,所管理的物资设备种类繁多,而且入库单、出库单、需求单等单据的发生量特别大,关联信息多,查询和统计的方式各不相同。因此在管理上实现起来有一定的困难。

15、在管理的过程中经常出现信息的重复传递等问题。仓库管理部门越来越需要一套低成本、高性能、方便使用、功能完善的综合仓库管理信息系统。而现在计算机技术、网络技术的成熟和发展,为仓库管理自动化提供了强有力的技术支持。1.3研究意义仓库管理系统用来解决仓库管理工作中的信息管理采用人工的方式,因此要付出大量人力,利用该系统能更准确,方便容易的对仓库进行管理。仓库管理系统是一个企业不可缺少的部分,它的内容对于企业的决策者和管理者来说都至关重要,所以仓库管理系统应该能够为用户提供充足的信息和快捷的查询手段。但一直以来人们使用传统人工的方式管理仓库中的各种物资设备,这种管理方式存在着许多缺点,如:效率低、另外时

16、间一长,将产生大量的文件和数据,这对于查找、更新和维护都带来了不少的困难。所以利用仓库管理系统能很好的解决这些问题。第二章 理论和技术基础2.1 技术简介本仓库管理系统是在以 Visual Basic 为编程语言,以 ACCESS 2003 作为后台数4据库而开发的一个数据库管理系统。2.2Visual Basic 简介Visual Basic 系统除了一般高级语言所具有的一些名词术语外,还有几个系统常用的名词。其基本含义如下: (1)视窗(Form)视窗是进行人机交互的界面或接口,也叫窗体。VB 系统的人机交互界面或接口,无论是在设计时或是在运行时,都是 Windows 系统的标准视窗。 (

17、2)对象 (Object) 对象是 VB 系统内部提供给设计者可以直接使用的处理输出的控制工具。本程序所应用到的对象类型有标签框 (Label Box),文本框 (Text Box),命令按扭 (Command Button),网格 (Data Grid),ADO 控件 (Adodc1)等。当把这些工具放置到用户界面对应的窗体上时,被称为对象或控件。用户可以通过设置对象的“属性”和“方法” ,便于对象适应自己所设计应用程序的输入输出内容,对象的生成过程及结构都被封装起来。正确使用对象可以减少程序和开发时间,提高程序设计者的工作效率。 (3)属性 (Properties) 属性是 VB 系统提供

18、的有关对象的参数或数据接口。用户通过适当地设置或改变对 象的属性来确定对象的外观及性能特征,从而有效地使用系统提供的对象。比如,对象 的名称、在屏幕上显示的位置、大小、颜色、接收或容纳的数据内容及数据的表现格式等。 (4)事件(Events) 事件是指用户或操作者对计算机进行的某一操作(如击键、单击或移动鼠标等行为或系统状态发生的变化。VB 系统常用事件来引导计算机执行一段程序。程序所用的键盘事件有 KeyPress(按键)事件,KeyDown 事件和 KeyUp 事件;鼠标事件有Click(单击鼠标)事件,DbDlicd(双击鼠标) 。 (5) 方法 (Method) 方法主要是指对一个对象

19、使用某种作用的过程。它是在程序执行的过程中要计算机执行的某种操作。其程序的方法有 Show(显示)方法,Hide(隐藏)方法,Refresh(刷新)方法。 (6) 过程 (Procedure) 过程是指经过定义或说明的,或基于某一对象对应的事件所引发的程序段。 (7) 模块 (Module) 模块是指一些运算量或过程进行声明或定义的一个集合。系统程序大体可分成四个模块:数据输入、根据查询、数据打印和通讯。2.3 使用 Access2003 实现关系型数据库2.3.1数据库的概念数据库是一种存储数据并对数据进行操作的工具。数据库的作用在于组织和表达信息,简而言之,数据库就是信息的集合。计算机的数

20、据库可以分为两类:非关系数据库(flat-file)和关系数据库(relational) 。关系数据库中包含了多个数据表的信息,数据库含有各个不同部分的术语,对象记录、域等。2.3.2新建一个数据库 创建任何一个数据库的第一步是仔细的规划数据库,设计必须是灵活的、有逻辑的。创建一个数据库结构的过程被认为是数据模型设计。 1标识需要的数据;2收集被标识的字段到表中; 53标识主关键字字段;4绘制一个简单的数据图表;5规范数据; 6标识指定字段的信息; 7创建物理表。 2.3.3修改已建的数据库 数据库的修改分为:添加、编辑和删除记录。这三种操作均可由 Visual Basic 创建的程序来完成,

21、下面的章节将详细描述实现的具体方法。 2.3.4实现数据库之间的联系 数据库之间的关系指明两个库之间共享一个共同的关键字值。一个连接是指一种虚拟的表,这种表是在当用户要求从相互关联的各个不同的表中获取信息时建立的,关键字段用于在相互连接的不同表中查找匹配的记录。一个更高级的连接形式称为自连接。这种连接是指一个表被连接到它自己的一个字段,或在不同的记录中由重复数 据的组合字段。数据库中有三种不同类型的关键字:主关键字、组合关键字和外关键字。在表中使用的关键字类型用于描述库表示什么以及在数据库中如何与其它的库建立关系。第三章 系统需求分析3.1.功能需求在设计一个数据库之前,首先要对数据库的设计目

22、的和应用背景进行分析。在进行设计目的分析时,应搞清楚该数据库要解决一个什么样的问题、需要存储哪些数据、能够提供哪些信息、完成哪些自动化功能等。应用背景指数据库应用于一个什么样场合。在对本系统应用环境和需求进行收集和分析后所形成的抽象的系统概貌图如图1。图 1 系统 概貌图6本系统是为仓库开发的设备管理系统,根据任务书的要求,应设计一个可行的数据库结构和数据库管理系统。该数据库管理系统应具有:1. 数据查询功能(多种关键词查询 );2. 数据更新功能(修改, 增加, 删除等);3. 数据安全性设计。3.2 技术可行性 本系统是一个数据库管理和查询的系统,要求的运行环境、硬件、软件不高,简单实用,

23、利用现有技术条件完全可以达到该系统的功能目标。3.3.经济可行性本系统基于 VisualBasic 和 office access 软件进行开发,开发所用时间、经费不高,系统管理便捷,可达到利用最小资源达到最大效益的结果。 3.4系统可行性本系统的研制和开发是充分得考虑工作人员对仓库的易于管理,方便而又简单。从而能完全满足使用者的要求。技术方案:供货商的信息维护;用户的注册和修改;查看各货仓曾引物品名称及数量,现有物品名称总数量,出货物品名称及数量,指定日期的出、进货数目;可以随时进行仓库货物修改; 出库、库存报表的查看。第四章 系统设计4.1系统功能模块设计在系统功能分析的基础上,考虑到 V

24、isual Basic 程序编制的特点,得到如图 4-1 所示的系统功能模块图。7图 4-1 系统功能模块图(1)基本管理模块 a)包括进库管理和出库管理。 b)管理员可以通过管理界面添加或删除用户,添加新管理员或删除原有管理员,验证用户的 合法性,阻止非法用户登录。c)管理员或其他用户可以修改自己的密码。(2) 查询模块 a) 按入库的日期进行查询,既可以查到这一时段的入库信息,也能查到相应时 段的出库信息。b)按人员进行查询,可以根据仓管员的信息查询物品的入库或出库信息。c) 按物品查询,直接输入物品名进行查询。 (3) 统计模块 对出、入库日统计,出、入库现金年统计。 (4) 报表打印

25、a)对出库信息进行报表查看。 b)对库存信息进行报表查看4.2系统界面总体设计用户登录分为管理员和普通用户,管理员可以应用所有的功能,普通用户只可以查看货物的出入库和库存信息,数据报表。84-2 主页面图4.3 系统设计思想进行有效的仓库管理已经成为中小企业存身产业的头等要事。然而对于一贯疏于管理的中小企业而言,实现有效的进销存管理必然存在着一定的难度,因此必须借助现代化的管理方法和管理技术计算机仓库管理系统。本系统利用 VisualBasic 完成前台的功能,包括主页面以及实现各功能的界面,通过连接 Microsoft Access2003 数据库完成数据的查询和修改。4.4 系统数据库详细

26、设计4.4.1数据库的概要说明在本系统中,采用的是 Microsoft Access2003,用来存储商品入库信息、商品出库信息、商品库存信息和用户信息等等。这里书库库命名为 db_kcgl,其中包括了7 张数据表,用语存储不同的信息。tb_enter 用户信息表 tb_gys 供应商信息表 tb_IN 商品入库信息表 tb_OUT 商品出库信息表 tb_temp 临时表 tb_YMoney 现金统计表 Tb_KCXX 库存查询4.4.1 数据库的表项表 4-4-1 tb_gys 供应商信息表9属性名 属性类型 备注Id 数字 供应商编号自动增长KName 文本 供应商名称KPName 文本

27、业务联系人KPone 文本 联系电话KWorkers 文本 传真KDate 文本 日期KRemark 备注 备注表 4-4-2 tb_IN 商品入库信息表属性名 属性类型 备注Id 数字 编号IN_NumID 文本 入库编号IN_Name 文本 货品名称IN_gysid 文本 货品规格IN_gysname 文本 供应商编号IN_SPEC 文本 供应商名称IN_UNIT 文本 计量单位IN_Num 文本 数量IN_Price 文本 单价IN_Money 文本 金额IN_Date 日期/时间 日期IN_Year 文本 年IN_Month 文本 月IN_peoeple 文本 经手人IN_Reamar

28、k 备注 备注表 4-4-3 tb_enter 用户信息表属性名 属性类型 备注M_ID 数字 序号10M_Name 文本 操作员姓名M_zw 文本 职位M_Password 文本 密码表 4-4-4 tb_OUT 商品出库信息表属性名 属性类型 备注Id 数字 编号OUT_Id 文本 出库编号OUT_NumID 文本 货品编号OUT_Name 文本 货品名称OUT_UNIT 文本 货品规格OUT_THDW 文本 单价OUT_Money 文本 金额OUT_Date 日期/时间 日期OUT_Year 文本 年OUT_Month 文本 月OUT_peoeple 文本 经手人OUT_Reamark

29、备注 备注OUT_Wpeople 文本 提货人OUT_MEdit 文本 提货单位OUT_MDate 日期/时间 日期表 4-4-5 tb_KCXX 库存查询属性名 属性类型 备注KC_ID 数字 库存编号KC_IDs 文本 货品编号KC_Name 文本 货品名称KC_SPEC 文本 货品规格KC_UNIT 文本 计量单位KC_NUM 文本 数量11KC_Price 货币 单价KCIN_Date 日期/时间 入库日期KC_reamark 备注 备注表 4-4-6 tb_temp 临时表属性名 属性类型 备注T_ID 数字 编号T_Name 文本 货品名称T_Num 数字 数量T_money 货币

30、 金额表 4-4-7 tb_YMoney 现金统计表属性名 属性类型 备注ID 数字 编号MONEYS 文本 金额DATES 文本 日期第五章 前台、后台模块实现5.1登陆模块在登录页面,必须输入正确的账号和密码,才可以登录到管理页面,否则不能登录。5-1 登录模块图5.2主页面模块以经理或库管身份登录后可以进行任何操作,其他用户只可以进行销售管理、进货管理、出库查询、库存查询、报表的查看。125-2 管理员和用户登录后的不同界面图5.3 系统工能模块本系统包括供应商信息维护、货品管理、查询统计、数据报表、用户管理图 5-3 供应商表13图 5-4 进货管理表图 5-5 出库报表14图 5-6

31、 出库现金年统计图 5-7 出入库日统计15图 5-8 出库信息表图 5-9 入库信息表16图 5-10 销售管理表图 5-11 库存信息报表17第六章 结束语不知不觉,毕业设计已接近尾声了。经过这次毕业设计,我感到自己无论在专业知识方面,还是在动手能力方面都有了很大的收获。不仅接触到了许多新的技术和知识,而且通过亲手实践,了解了如何把书本上所学的东西应用到实践中去。该毕业设计给出了应用软件开发的一般思想和详细的设计方案,以及各模块实现的详细步骤,基本达到了应用软件开发的要求。另外,该系统的设计也体现了visualBasic 应用系统的优点,从系统设计到系统实现完全遵循了现实仓库管理系统开发的

32、思想,思路清晰,结构合理。系统的可扩展性强,便于今后进行功能扩展和系统升级。从技术方面讲,本系统使用了 VB 与 Access 数据库的结合,本系统的功能虽然还不完善,但是涵盖了 VB 的大部分开发技术以及本系统的基本功能,达到了综合应用所学知识的目的。该系统虽然功能还算完善,但是离商业应用还有一定的距离。我认为可以尝试为系统扩展新的功能。比如增加员工的权限设置,客户信息是企业的宝贵财富,任何普通员工不能对其随意翻阅和删改,若本系统只有一个默认管理员,其拥有最高权限,具有登录权限,查看权限、修改权限和管理权限,其他用户只有部分权限,从而保证了只有具有一定权限的员工才能对客户信息进行浏览或删改,

33、进而保证客户信息的安全性。由于现在知识浅薄,经验不足以及阅历颇浅,这些功能还不能实现。今后我要更加努力的学习,争取实现这些功能,使系统更加完善。18参考文献1 丁宝康:数据库实用教程 , 清华大学出版社,2004 年。2 赛奎春等:VB 数据库开发关键技术与实例应用 ,人民邮电出版社,2003 年。 3 汪诗林等:数据结构算法与应用 ,机械工业出版社,2005 年。 4 罗征等:VB 6.0 从入门到精通 ,电子工业出版社,2004 年。 5 冯博琴等:面向对象分析与设计 ,机械工业出版社,2003 年。 6 郭琦:VisualBasic 数据库系统开发技术 ,人民邮电出版社,2003 年。7

34、 邱李华,郭全:VisualBasic 程序设计教程人民邮电出版社 2009 年。8 蒋宝家,郑荣,董绍华可视化仓库管理系统的设计M物流技术,2005.9 Awad.E.M, Gotterer M.H: Visual Basic 6.0, 1992. 10Robert.H.DependahlDatabase Principles and Applications.Williams Brown,2003.19致 谢经过几个月的努力本论文终于完成了,首先感谢信息科学与技术学院对我的培养,以及给我提供了良好的学习环境,使我有充足的信心去学习和设计,在这期间我学到了很多新的知识,也使我认识到了自己的不

35、足之处,在以后的工作和学习中我会更加努力。再次感谢我的专业课老师们对我的栽培,是他们带领我走向计算机知识的大门,也促使我对计算机产生了浓厚的兴趣。特别感谢我的指导老师冯永老师,整个毕业设计过程和论文的写作过程都是在老师的悉心指导下完成的。从论文的选题、系统设计思想、理论的构造以至最终的完稿,老师都给予了无私的帮助。冯永老师治学严谨,认真负责,为我营造了一种良好的精神氛围。在老师的带领下我接受了全新的思想观念,树立了宏伟的学术目标,领会了基本的思考方式。在论文完成之际,谨向老师致以衷心的感谢和崇高的敬意!同时还要感谢所有帮助过我的同学。感谢他们在系统设计期间给予的无私帮助,帮助我实现和完善系统的

36、各项功能,使系统能按时顺利的完成。谢谢!20附录系统登录界面 Frm_xtdlDim itmX As ListItem 定义一个 ListItem 对象Dim aDim key As String 定义字符串变量* 用户登录按钮的事件代码 *Private Sub Command1_Click()On Error Resume NextIf Text2.Text “马红玉“ Thenfrm_main.QCSZ.Enabled = Falsefrm_main.YHGL.Enabled = Falsefrm_main.CXTJ.Enabled = FalseEnd IfDim MPassword

37、As String21If Text2.Text = “mr“ And Text1.Text = “mhy“ Then 判断是否使用的是超级口令登录frm_main.StatusBar1.Panels.Item(2).Text = “当前操作员: mr“Name1 = Text2.TextUnload Mefrm_main.ShowElseAdodc1.RecordSource = “select * from tb_enter where M_Name =“ Data Source=“ Persist Security Info=False“Adodc1.RecordSource = “se

38、lect * from tb_enter“ 查询用户表中所有的数据Adodc1.Refresh 刷新Adodc1.RecordSource = “select * from tb_enter“Adodc1.RefreshIf Adodc1.Recordset.RecordCount 0 ThenListView1.Enabled = TrueListView1.ListItems.ClearAdodc1.Recordset.MoveFirst 移动到记录集的首挑记录Do While Adodc1.Recordset.EOF = False 将操作员信息添加到 ListView 控件当中key

39、= Adodc1.Recordset.Fields(“M_Name“)Set itmX = ListView1.ListItems.Add(, , key, 1) 向 ListView 控件中添加项目Adodc1.Recordset.MoveNextLoopElseListView1.Enabled = FalseEnd If End SubPrivate Sub ListView1_Click()Text2.Text = ListView1.SelectedItem23Adodc1.RecordSource = “select * from tb_enter where M_Name=“ +

40、 Text2.Text + “Adodc1.RefreshIf Adodc1.Recordset.RecordCount 0 ThenLabel3.Caption = “所选操作员的职务: “ Data Source=“ Persist Security Info=False“Adodc2.ConnectionString = “Provider=Microsoft.Jet.OLEDB.4.0;Data Source=“ Persist Security Info=False“ End SubPrivate Sub GYSXXWH_Click()frm_gys.Show 显示供应商信息窗体Me

41、.Enabled = FalseEnd SubPrivate Sub JHGL_Click()frm_in.Show 显示货品入库信息窗体Me.Enabled = FalseEnd SubPrivate Sub KCXXCX_Click()frm_KCQuery.Show 显示库存查询信息窗体Me.Enabled = FalseEnd SubPrivate Sub Picture1_MouseMove(Button As Integer, Shift As Integer, x As Single, y As Single)On Error Resume NextIf Button = 1 T

42、hen Picture1.Left = Picture1.Left + xEnd SubPrivate Sub Picture1_MouseUp(Button As Integer, Shift As Integer, x As 26Single, y As Single)Dim pl&On Error Resume Nextpl = Picture1.LeftIf pl (Me.ScaleWidth - 1000) Thenpl = Me.ScaleWidth - 1000Picture1.Left = plEnd IfTreeView1.Width = pl - TreeView1.Lef

43、t - 5ListView1.Width = pl - ListView1.Left - 5Picture1.Width = 30ListView1.Left = TreeView1.Width + 100ListView1.Width = Me.ScaleWidth - ListView1.Left - 10Picture1.BackColor = &HC0C000End SubPrivate Sub MMXG_Click()frm_Edit_Password.Show 显示修改密码窗体Me.Enabled = FalseEnd SubPrivate Sub PRINTKC_Click()D

44、ata_kc.Show 显示库存信息报表Me.Enabled = FalseEnd Sub27Private Sub PRINTOUT_Click()Data_out.Show 显示出库信息报表Me.Enabled = FalseEnd SubPrivate Sub RKXXCX_Click()frm_InQuery.Show 显示货品入库信息查询窗体Me.Enabled = FalseEnd SubPrivate Sub TCXT_Click() 退出系统操作Dim cc = MsgBox(“您确认要退出库存管理系统吗?“, 33, “提示信息“)If c = vb OK Then EndE

45、nd IfEnd Sub在窗体的状态栏中显示当前系统的日期时间Private Sub Timer1_Timer()StatusBar1.Panels(3).Text = Format(Now, “ hh 点 mm 分 ss 秒“)End Sub* 单击工具栏中的按钮,调用相应的窗体,完成相应的操作 *Private Sub Toolbar1_ButtonClick(ByVal Button As MSComctlLib.Button)Select Case Button.IndexCase 1frm_in.ShowCase 3frm_out.ShowCase 5frm_KCQuery.ShowCase 728frm_Stat.ShowCase 9Dim cc = MsgBox(“您确认要退出库存管理系统吗?“, 33, “提示信息“)If c = vbOK ThenEndEnd IfEnd SelectEnd SubPrivate Sub XSGL_Click()frm_out.Show 显示货品出库信息窗体StrNums = 0 出库标识,用于标识调用库存检索窗体Me.Enabled = FalseEnd Sub

展开阅读全文
相关资源
猜你喜欢
相关搜索
资源标签

当前位置:首页 > 学术论文 > 管理论文

本站链接:文库   一言   我酷   合作


客服QQ:2549714901微博号:道客多多官方知乎号:道客多多

经营许可证编号: 粤ICP备2021046453号世界地图

道客多多©版权所有2020-2025营业执照举报