毕业论文库存管理_第1页
毕业论文库存管理_第2页
毕业论文库存管理_第3页
毕业论文库存管理_第4页
毕业论文库存管理_第5页
已阅读5页,还剩58页未读 继续免费阅读

下载本文档

版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领

文档简介

63/63目录前言························································2摘要························································2概述

·········································3开发背景····································4

系统分析·····································4系统设计·····································6系统实施·····································13系统使用讲明································24附录 参考文献···································25

前言 仓库库存治理系统是一个企业不可缺少的部分,它的内容关于企业的决策者和治理者来讲都至关重要,因此仓库库存治理系统应该能够为用户提供充足的信息和快捷的查询手段。但一直以来人们使用传统人工的方式治理仓库中的各种物资设备,这种治理方式存在着许多缺点,如:效率低、另外时刻一长,将产生大量的文件和数据,这关于查找、更新和维护都带来了许多的困难。随着科学技术的不断提高,计算机科学日渐成熟,其强大的功能已为人们深刻认识,它已进入人类社会的各个领域并发挥着越来越重要的作用。作为计算机应用的一部分,使用计算机对物资信息进行治理,具有着手工治理所无法比拟的优点.例如:检索迅速、查找方便、可靠性高、存储量大、保密性好、寿命长、成本低等。这些优点能够极大地提高人事劳资治理的效率,也是企业的科学化、正规化治理,与世界接轨的重要条件。因此,开发如此一套库存治理软件成为专门有必要的情况。摘要库存治理系统是典型的信息治理系统(MIS),其开发要紧包括后台数据库的建立和维护以及前端应用程序的开发两个方面。关于前者要求建立起数据一致性和完整性强.数据安全性好的库。而关于后者则要求应用程序功能完备,易使用等特点。通过分析如此情况,我们使用微软公司的VisualBasic开发工具,利用其提供的各种面向对象的开发工具,尤其是ADO,是能方便而简洁操纵数据库的智能化对象,短期内就能够开发出用户中意的可行系统。关键字: 库存治理ADO 面相对象 库存ABC分析 Abstract

StockpilemanagesystemisatypicalMIS.It’sdevelopmentmostlyincludethefoundationandmaintenanceofthedatabaseandthedevelopmentoftheclientapplicationprogramme.Fortheformerwemusteatablishabetterdatabase,whichhaswelldataconsistencyanddatasecurity.Forthelatterwemustmaketheprogrammehasself-containedfunctionandeasytobeuse.Byanalysingthesituation,weusetheVBoftheMicrosoftcompanyasclienttool,andusesomeofthetoolsofopp,especiallyADOobject,whichcaneasilyconvenientlymanipulatethedatabase.WeuseitcandevelopasatisfactorysysteminshorttimeKey: Stockpilemanage ADO OPP TheanalysisofStockpile第一章概述1.1库存治理的必要性大多数库存治理理论认为,库存是物理上和逻辑上库房库位的所有有形和无形物料极其价值的总和,具体包括成品、原材料、在制品、在途品、生产前物料、备品备件等。尽管持有一些库存是必要的,过量的库存却非但没有用处而且占用了资金。占用的资金关于公司进展、新产品开发等差不多上特不需要的;减少资金占用还能够大大减少来自银行贷款的利息和风险。对那些采购量特不大、采购件市场价格有波动的物料库存,加强库存治理效果更为明显。因此,平衡公司库存投资与其它资金需求至关重要。1.2库存分类企业如何样治理库存,是库存治理的最大难点和挑战。因此,通过MRPII物料主打算模块和采购模块建立打算与操纵系统以有效地实施库存治理和采购补偿成为题中应有之义。通过调查,我们得知任何库存均可分为如下三类:A类物品:高值──价值占库存总值70-80%的相对少数物品。通常为物品的15-20%。B类物品:中值──总值占库存总值的15-20%。物品数居中,通常占物品的30-40%。C类物品:低值──库存总值几乎能够忽略不计,只占5-10%。是物品的大多数,通常占60-70%。显然,A类物品是关键;假如我们把精力集中于A类物品,使其库存压缩10-50%,确实是总库存的相当可观的一笔压缩。关于ABC分类方法有几条差不多法则:a.操纵的程度:对A类物品严加操纵,包括做完备、准确的记录,高层监督和经常评审,从供应商按大合同订单频繁交货,对车间紧密跟踪以压缩提早期。对B类物品做正常操纵,包括良好的记录与常规的关注。对C类物品尽可能使用简便的操纵,诸如定期目视检查库存实物、简要记录或以简便标志法表明补充存货差不多订货,采纳大库存量与订货量以幸免缺货,安排车间日程打算时给以低优先级。b.优先级在一切活动中给A类物品以高优先级以压缩其提早期与库存。对B类物品予以正常处理,仅在关键时给以高优先级。予C类物品以最低优先级。c.订货过程对A类物品提供及时、准确的采购信息和状态查询。计算机数据需要人工加以核对,进行时期性盘点,以及频繁的评审以压缩库存。对B类物品,按一定周期或当发生重大变化时评审一次库存数据和订货点,MRPII操作按例行公事处理。对C类物品能够盘点处理或订货点计算。订货往往不用MRPII作打算。能够凭业务人员的经验加以操纵。 由上能够看出库存治理的重要性。因此,库存治理是企业治理的重要组成部分。市场需要库存商品提供给用户,企业的经营需要库存保证各种药品的供应以进行药品的销售,库存对生产效率的提高有着极其重要的阻碍。因此,库存治理系统是计算机治理系统的中心。因为,所有企业的经营活动都离不开物流的活动。1.3

库存治理的目标库存治理的要紧目标确实是通过对仓库所有入出库活动的治理和操纵及对库存数据有效的统计和分析,以保证企业生产中畅通的物流,使决策人员及早发觉问题,采取相应措施,调整库存结构,缩短储备周期,加速资金周转,最大限度地降低库存占用,同时,通过周期性的仓库盘点,及时补救治理中的漏洞,使库存治理系统实时地反映企业中各个仓库的现时情况,为各类治理人员从不同侧面提供所需信息,以便协调企业经营收到更大效益,库存治理系统是协调企业生产经营的基础,其数据的准确性、方便的查询、有效的分析是整个计算机治理系统顺利运行的关键。第二章开发背景 企业的库存物资治理往往是专门复杂、专门繁琐的。由于所掌握的物资种类众多,订货、治理、发放的渠道各有差异,各个企业之间的治理体制不尽相同,各类统计报表繁多,因此仓库的库存治理必须编制一套库存治理信息系统,实现计算机化操作,而且必须依照企业的具体情况制定相应的方案。 依照当前的企业治理体制,一般的库存治理系统,总是依照所掌握的物资类不,相应分成几个科室来进行物资的打算,订货,核销托收,验收入库,依照企业各个部门的需求来发送物资设备,并随时按期进行库存盘点,作台帐,依照企业领导和自身治理的需要按月、季度、年度进行统计分析,产生相应报表。为了加强关键物资、设备的治理,要定期掌握其储备,消耗情况,依照打算定额和实际纤毫定额的比较,进行定额治理,使得资金使用合理,物资设备的储备最佳。 一个完整的企业物资供应治理系统应包括采购打算治理,合同收托治理、仓库库存治理、定额治理、统计治理、财务治理等模块。其中仓库的库存治理是整个物资供应治理系统的核心。因此有必要开发一套独立的库存治理系统来提高企业工作效率,而所使用的这套库存治理系统是企业生产经营治理活动中的核心,此系统必须能够用来操纵合理的库存费用、适时适量的库存数量,使企业生产活动效率最大化。通过对这些情况的认真调查,我开发了下面的仓库库存治理系统。第三章系统分析 本系统采纳了结构化生命周期法,结构化生命周期法是最常用的治理信息系统开发方法,分为四个步骤,即系统调研分析、数据库设计实现、界面设计实现和系统功能设计实现。其中系统调研分析时期是最基础、也是最容易被开发人员忽视的环节。3.1进行资料收集在整个系统分析时期,我在图书馆认真查看了专门多关于仓库库存治理方面的书籍,收集到了相应的入库单、领料单、台账、物料卡、报表等资料,这些资料能够用作数据库设计的依据,具体如下: 序号提纲1零件仓库划分成多少个区域?2每个区域有多少个货架?3每个货架上分多少层?4架子上的每一层有多少个格子?5零部件是如何进行物料编码的?6仓库治理人员人数有多少?7日均处理入库单数量大约有多少?8日均处理出库单数量大约有多少?9领料退回的处理方法?10是否每天都要登记库存台账?11库存台账有多少类型?12仓库之间是否能够进行调拨?13每次盘点间隔时刻多长?14如何处理零部件盘亏?15如何处理零部件盘盈?16是否有零部件物料缺货警戒线?17统计报表的种类和填报频率?入库单是入库单位在把相应的零部件送人仓库时必须填写的单据;领料单是领料人员从仓库中领取零部件时必须填写的单据(即出库);零部件台账(相当于本系统中的操作日志)实际是一个流水账,用于记录每天发生的入库、出库信息;物料卡(在本系统中用现有库存信息来表示)的作用是记录某一种零部件的数量变化,以便库管员盘查;报表是仓库向有关领导和部门定期提交的零部件库存汇总信息。收集到的入库单、领料单、零部件库存台账、零部件物料卡等单据和报表的实物样式在此略去,有兴趣者请参考有关类似企业的样本即可。3.2绘制业务流程图财务处采购科车间验收财务处供应科缺件单领料单入库单报表库存台帐登帐入库处出库处统计盘点在某公司的调研过程中,已了解到所涉及的业务要紧是入库和出库,图3.1是系统入库、出库业务流程图。财务处采购科车间验收财务处供应科缺件单领料单入库单报表库存台帐登帐入库处出库处统计盘点财务处财务处退货退货不合格领料入合库格图3.1库存治理系统业务流程图业务流程图讲明外部环境处理过程决策过程数据存档数据流向图3.2业务流程图符号讲明3.3用户需求分析

用户需求分析确实是在用户需求调研的基础上,确定系统的总体结构方案,完成相应的需求分析报告。在确定系统的总体结构方案过程中,包括确定应用程序的结构、系统开发环境和系统的功能模块。用户需求调研结束之后,应该立即进行用户需求分析。3.3.1应用程序结构确定

从用户应用角度来看,可把应用程序系统的组成部分分成数据存储层、业务处理层和界面表示层等3个层次,而应用程序结构可归纳为:集中式应用程序结构、单用户应用程序结构、多层服务器应用程序结构、扫瞄器/服务器应用程序结构、客户机/服务器应用程序结构等5种类型。

本库存治理系统就采纳了当前最流行的客户机/服务器应用程序结构(即C/S结构),现在,客户机提出请求,服务器对客户机的请求作出回应。通过对服务功能的分布实现了分工服务。数据存储层放在服务器上,业务处理层和界面表示层放在客户机上,因此又被称为“灵敏的客户机”结构。许多操作能够在本地的客户机上执行,只是当需要数据时,才向服务器发出请求。并使应用程序的处理更接近用户,使整个系统具有较好的性能,能够并行地处理应用程序的请求、减少了数据传输量、降低了服务器的负荷。由于条件所限,将此系统所有程序都置于一台计算机上,以便调试运行。

3.3.2确定系统开发环境

由于大多数公司内部使用的计算机平台差不多上基于Windows环境的。为了降低系统成本,应最大程度地利用现有的资源、兼容现有的环境,可确定使用下面的开发环境:

★网络操作系统:Windows2000;★数据库服务器:MicrosoftAccessr2000;

★服务器平台:Windows2000;★客户机平台:Windows95/98/NT/2000;

★前端开发工具:visualBasic6.0(企业版);★数据访问对象:ADO(本系统使用ADO控件,简化编程)。

3.3.3确定系统的功能模块

通过分析确定库存系统将包含6个要紧功能模块,即系统模块、入库业务治理模块、出库业务治理模块、退料业务治理模块(还库业务治理模块)、盘点业务治理模块(报表输出)、需求治理模块。关于每一个功能模块,都包含了数据录入、编辑、查询、统计、打印、应急、关心等功能。第四章系统设计1总体设计4.1.1系统目标设计系统开发的总体任务是实现企业物资设备治理的系统化、规范化和自动化,从而达到企业仓库库存治理效率的目的。4.1.2开发设计思想库存治理的物资要紧是企业生产中所需要的各种设备、原材料及零部件。进货时经检查合同确认为有效托收后,进行验收入库,填写入库单,进行入库登记。企业各个部门依照所需要的物资设备总额和部门生产活动需要提出物资需求申请。打算员依照整个企业的需求开出物资设备出库单,仓库治理员依照出库单核对发放设备、原材料及零部件。有些设备使用完毕需要及时归还入库,填写还库单。依照需要按照月、季、年进行统计分析,产生相应报表。 仓库库存治理的特点是信息处理量比较大。所治理的物资设备、原材料及零部件种类繁多,而且由于入库单、出库单、需求单等单据发生量特不大,关联信息多,查询和统计的方式各不相同,因此在治理上实现起来有一定的困难。在治理的过程中经常会出现信息的重复传递;单据、报表种类繁多,各个部门规格不统等问题。 在本系统的设计过程中,为了克服这些困难,满足计算机治理的需要,我们采取了下面的一些原则:统一各种原始单据的格式,统一帐目和报表的格式。删除不必要的治理冗余,实现治理规范化、科学化。程序代码标准化,软件统一化,确保软件的可维护性和有用性。界面尽量简单化,做到有用、方便,尽量满足企业中不同层次职员的需要。建立操作日志,系统自动记录所进行的各种操作。4.1.3系统功能分析本系统需要完成的功能要紧有以下几点。库存治理的各种信息的输入,包括入库、出库、还库、需求信息的输入等。库存治理的各种信息的查询、修改和维护。设备采购报表的生成。在材料库存中加入所同意的最大库存合最小库存字段,对所有库存物资实现监控和报警。企业各个部门的物资需求治理。操作日志的治理库存治理系统的使用关心。4.2详细设计4.2.1系统功能模块设计 在系统功能分析的基础上,考虑VB和Access的特点,设计出如图4.1所示的系统功能模块图。需求模块还库模块出库模块入库模块日志治理打印设置关心模块报表模块查看模块维护模块输入模块系统模块库存管理系统需求模块还库模块出库模块入库模块日志治理打印设置关心模块报表模块查看模块维护模块输入模块系统模块库存管理系统用户治理用户治理图4.1系统功能模块图系统模块包括报表的打印及设置,操作日志的治理。治理员能够通过治理界面添加或删除用户,添加新治理员或删除原有治理员,验证用户的合法性,阻止非法用户登录。治理员或其他用户能够修改自己的密码。入库模块 包括填写入库单,更新,删除入库记录,查看现有库存信息,入库记录的查询及打印出库模块 包括填写出库单,更新,删除出库记录,查看现有库存信息,出库记录的查询及打印还库模块 包括填写还库单,更新,删除还库记录,还库记录的查询及打印需求模块 包括填写需求打算表,更新,删除采购打算信息,查看现有采购信息,采购信息的查询及打印,以及预测短期内的需求打算。库存治理库存治理处理输出输入处理输出输入采购单报表删除修改统计查寻入库单出库单还库单采购打算采购单报表删除修改统计查寻入库单出库单还库单采购打算图4.2库存治理HIPO图4.2.2数据库设计数据库需求分析在认真调查企业库存物资材料治理过程的基础上,设计出本系统所处理的数据流程图(图4.2)汇总处理企业总体生产打算设备还库设备出库设备入库设备采购各部门需求仓库现有库存汇总处理企业总体生产打算设备还库设备出库设备入库设备采购各部门需求仓库现有库存图4.3库存系统数据流程图通过对企业仓库治理内容和数据流程分析,设计的数据项合数据结构如下:设备代码信息。包括的数据项有设备号、设备名称。现有库存信息。包括的数据项有现有设备、现有数目、最大库存、最小库存等。设备使用信息。包括的数据项有使用的设备、使用部门。数目。使用时刻、出库时状态等。设备采购信息。包括的数据项有采购的设备、采购员、供应商、采购数目、采购时刻等。设备归还信息。包括的数据项有归还设备、归还部门、归还数目、归还时刻、经手人等。设备需求信息。包括的数据项有需求的部门、需求设备、需求数目、需求时刻等。有了上面的数据结构、数据项和数据流程,就能够进行下面的数据库设计。数据库概念结构设计这一设计时期是在需求分析的基础上,设计出能够满足用户需求的各种实体,以及它们之间的关系,为后面的逻辑结构设计打下基础。依照上面的设计规划出的实体有库存实体、出库实体、入库实体、采购实体、还库实体、需求实体。各个实体的E-R图及其关系描述如下:最小库存最大库存设备号现有库存现有库存最小库存最大库存设备号现有库存现有库存图4.4库存实体E-R图设备号供应商信息入库设备号供应商信息入库采购价格、数量采购员采购价格、数量采购员图4.5入库实体E-R图经手人数量、时刻设备号使用部门出库经手人数量、时刻设备号使用部门出库图4.6出库实体E-R图需求时刻需求数量设备号需求部门部门需求需求时刻需求数量设备号需求部门部门需求图4.7部门需求实体E-R图经手人还库数量设备号设备还库经手人还库数量设备号设备还库还库时刻、人还库时刻、人图4.8库存实体E-R图时刻供应信息设备号库存信息打算采购时刻供应信息设备号库存信息打算采购图4.9打算采购实体E-R图实体与实体间的关系E-R图如下所示:出库现有库存入库出库现有库存入库设备采购部门需求还库设备采购部门需求还库图4.10实体之间关系E-R图数据库逻辑结构设计在上面的实体以及实体之间关系的基础上,形成各个表格之间的关系。 库存治理系统数据库中的各个表的设计结果如下面的几个表格所示,,每个表格表示数据库中的一个表。表4.1设备代码表字段名称数据类型可否为空讲明设备号文本NOTNULL字段大小为6设备名称文本NULL字段大小为20表4.2权限表字段名称数据类型可否为空讲明用户名文本NULL字段大小为10密码文本NULL字段大小为15权限文本NULL字段大小为10表4.3设备入库表字段名称数据类型可否为空讲明设备号文本NOTNULL字段大小为6入库时刻日期/时刻NULL无供应商文本NULL字段大小为20供应商电话文本NULL字段大小为15入库数量数字NULLINTEGER价格数字NULLINTEGER采购员文本NULL字段大小为10表4.4设备出库表字段名称数据类型可否为空讲明设备号文本NOTNULL字段大小为6使用部门文本NULL字段大小为20出库时刻日期/时刻NULL无出库状况文本NULL字段大小为20经手人文本NULL字段大小为10出库数量数字NULLINTEGER领取人文本NULL字段大小为10用途文本NULL字段大小为20表4.5现有库存库表字段名称数据类型可否为空讲明设备号文本NOTNULL字段大小为6主键现有库存文本NULLINTEGER最大库存文本NULLINTEGER最小库存文本NULLINTEGER表4.6部门需求表字段名称数据类型可否为空讲明设备号文本NOTNULL字段大小为6部门名称文本NOTNULL字段大小为10需要数量数字NULLINTEGER需求开始时刻日期/时刻NULL无需求结束时刻日期/时刻NULL无表4.7设备还库表字段名称数据类型可否为空讲明设备号文本NOTNULL字段大小为6还库时刻日期/时刻NULL无仓库治理员文本NULL字段大小为10归还数量数字NULLINTEGER归还人文本NULL字段大小为10表4.8操作日志表字段名称数据类型可否为空讲明操作员文本NOTNULL字段大小为10操作内容文本NOTNULL字段大小为100操作时刻日期/时刻NOTNULL无表4.9设备采购打算表字段名称数据类型可否为空讲明设备号文本NOTNULL字段大小为6主键现有库存数字NULLINTEGER总库存数字NULLINTEGER最大库存数字NULLINTEGER购买数量数字NULLINTEGER供应商文本NULL字段大小为10价格数字NULLINTEGER打算采购时刻日期/时刻NULL无4.3代码设计任何库存均可分为如下三类:A类物品:高值──价值占库存总值70-80%的相对少数物品。通常为物品的15-20%。B类物品:中值──总值占库存总值的15-20%。物品数居中,通常占物品的30-40%。C类物品:低值──库存总值几乎能够忽略不计,只占5-10%。是物品的大多数,通常占60-70%。因此设计编码如下:设备号或零件号××××××自定义自定义自定义例如设备号或零件号A0102A类消耗性物资常用零件4.4输入输出设计本系统界面标准Windows形式,键盘输入(也能够用条形码读取),人机交互,容易使用。输入输出的设计考虑美观有用和通俗易明白,图文并茂。4.5系统安全性设计系统数据库中包含多个二维表,因此在系统与数据库的连接上,并没有把数据库和系统的连接直接写入代码,而是通过对服务器端进行系统设置,使数据库名及路径不可见,并通过ACCESS的数据库安全设置,保证了数据库的安全性。系统依照用户身份不同给予不同权限,用户用密码登陆,同样也保证了系统数据的安全性。第五章系统实施 5.1、开发工具简介 本系统的前端开发工具,我选择了VisualBasic6.0,后台数据库采纳Access2000。5.1.1VB简介Visual意为“可视化的”,指的是一种开发图形用户界面的方法,因此VisualBasic是基于Basic的可视化的程序设计语言。在VisualBasic中,一方面继承了Basic所具有的程序设计语言简单易用的特点,另一方面在其编程系统中采纳了面向对象、事件驱动的编程机制,用一种巧妙的方法把Windows的编程复杂性封装起来,提供了一种所见即所得的可视化程序设计方法。5.1.2VB功能特点具有面向对象的可视化设计工具在VB中,应用面向对象的程序设计方法(OOP),把程序和数据封装起来视为一个对象,每个对象差不多上可视的。程序员在设计时只需用现有工具依照界面设计要求,直接在屏幕上“画”出窗口、菜单、按钮、滚动条等不同类型的对象,并为每个对象设置属性。程序员的编程工作仅限于编写相关对象要完成的功能程序,因而程序设计的效率可大大提高。事件驱动的编程机制事件驱动是特不适合图形用户界面的编程方式。在图形用户界面的应用程序中,是由用户的动作即事件掌握着程序运行的流向,每个事件都能驱动一段程序的运行。程序员只要编写响应用户动作的代码,而各个动作之间不一定有联系。提供了易学易用的应用程序集成开发环境在VB集成开发环境中,用户可设计界面、编写代码、调试程序,直至把应用程序编译成可执行文件在Windows中运行,使用户在友好的开发环境中工作。结构化的程序设计语言VB具有丰富的数据类型和结构化程序结构,作为一种程序设计语言,它还有如下一些特点:强大的数值和字符串处理功能丰富的图形指令,可方便地绘制各种图形提供静态和动态数组,有利于简化内存的治理过程可递归调用,使程序更为简练支持随机文件和顺序文件的访问提供了一个可供应用程序调用的包含多种类型的图标库具有完善的运行出错处理支持多种数据库系统的访问利用数据控件可访问的数据库系统有:MicrosoftAccess、Btrieve、DBASE、MicrosfotFoxPro和Paradox等,也能够访问MicrosoftExcel、Lotus1-2-3等多种电子表格。支持动态数据交换(DDE)、动态链接库(DLL)和对象的链接与嵌入(OLE)技术完备的HELP联机关心功能与Windows环境下的软件一样,在VB中,利用关心菜单和F1功能键,用户能够随时方便地得到所需要的关心信息。VB关心窗口中显示了有关的示例代码,通过复制、粘贴操作可猎取大量的示例代码,为用户的学习和使用提供了极大的方便。VB程序设计的概念确实是面向对象的概念,对象确实是数据(DATA)和代码(CODE)互相结合的综合体。Windows上面的每一个图标,包括窗口本身差不多上对象,假如没有任何情况发生,对象处于停顿状态。当存在外来事件时,程序段执行,它的执行是由外来事件决定的。因此是“事件”驱动的。编写VB程序较为简单,首先将各个对象放在空白窗体上,然后将程序代码分不添加给对象或图标,将它们组合起来就能够随意运行了。在VB中,窗体实际上是一个对象,VB的窗体含有许多内嵌特性,这使得用户界面部分的建立像是从一个目录中选择一个个合适的控件,而不是从零开始一步一步地建立控件。这种开发者能亲眼看到的程序设计过程确实是“可视化程序设计”(VisualProgramming)5.1.3VB中的差不多概念对象:面向对象编程(OOP)的提法大伙儿一定也专门耳熟,尽管VisualBasic并不是完全的面向对象编程,但也利用了对象编程技术。对象简单地讲确实是大伙儿经常看到的各种窗口、按钮、文本框甚至打印机等。

属性:如同电视有黑白、彩色之分一样,作为对象的Windows中的窗口也是有大有小,文本框的位置不可能完全一样,菜单要显示出不同的功能,这些差不多上由对象的属性决定的。不同对象的属性可能不同。属性一般决定了对象的位置、大小、显示等情况。

方法:确实是对象能够做的事,如打印机对象就有打印(Print)方法、窗口对象支持隐藏(Hide)方法、专门多对象支持移动(Move)方法等。

事件:确实是对象对用户各种操作的反映情况。如用户用鼠标按一下按钮,就会触发按钮的“按”(Click)事件。

控件:控件确实是VisualBasic提供的编程用的模块,与对象有直接的联系,如同积木的木块,使用如此的控件,就能够像拼图或堆积木一样“搭”、“拼”你的程序界面。VisualBasic中使用控件,简化了Windows中的窗口、按钮等对象的编程设计。每个控件都有各自的属性、事件及方法。只需修改这些特征你就能够为所欲为地编程了。最重要的是,你能够利用成千上万的各种扩充的控件来快速构造几乎能满足你任何要求的程序。例如,假如你不中意Windows简陋的媒体播放器,你就能够使用VB的多媒体控件在1小时以内设计一个完全自己风格的能够播放CD、VCD的多媒体播放器,而功能完全与之相当。5.1.4Access2000数据库简介 作为Microsoft的office套件产品之一,access差不多成为世界上最流行的桌面数据库系统。Access与许多优秀的关系数据库一样,能够让你专门容易地连接相关的信息而且还对其他的数据库系统有所补充。它能操作其它来源的资料,包括许多流行的PC数据库程序(如dBASE,Paradox,MicrosoftFoxPro)和服务器、小型机及大型机上的许多SQL数据库。Access还完全支持Microsoft的OLE技术。Access还提供windows操作系统的高级应用程序开发系统。Access与其它数据库开发系统之间相当显著的区不确实是:您不用写一行代码,就能够在专门短的时刻里开发出一个功能强大而且相当专业的数据库应用程序,同时这一愉快的过程是完全可视的!假如您能给它加上简短的VBA代码,那么您的程序决不比专业程序员潜心开发的程序差。Access的总体结构Access将所有有名字的东西都成为对象(object),在Access2000中,最重要的对象有表,查询,窗体,报表,宏和模块。表用户定义的存储资料的对象。每一个表都包含有关某个主体的信息。表包括存储不同种类资料的字段(列),而记录(行)则收集特定主体实例的所有信息。查询为来自一个或多个表的资料提供定制视图的对象。在Access中,能够利用图形化的实例查询机制(QBE)或通过SQL语句来建立查询。你能够在查询中选择、更新、插入或删除资料,也能够用查询来建立新表。窗体窗体是要紧的人机接口。大量的操作(几乎所有)都要通过窗体完成。窗体通过运行宏(macro)或VisualBasicforApplicatinns(VBA)过程,来响应大量的事件。Access2000为我们提供了强大的(同时也是相当方便的向导)来建立标准的Windows窗体。报表为格式化、计算、打印选定资料而设计的对象。它是衡量一个优秀的数据库的重要标准(有时甚至是唯一的标准)。宏为了响应已定义的事件,需要让Access去执行一个或多个操作,而宏确实是对这些操作的结构化的定义对象。它能够让你像堆积木一样建立一个功能强大的程序,而无须写大量的代码。模块包括用VBA编码的定制过程的一个对象。模块提供了独立的动作流以捕获错误,而宏做不到。模块能直接响应窗体或报表事件,也能够从应用程序的任何地点被调用。Access2000数据库 5.1.5本系统中VB与AccessAccess2000数据库VB应用程序VB应用程序5.2系统实现5.2.1.系统治理模块实现 系统治理菜单 修改用户密码程序PrivateSubCommand1_Click()Adodc1.RecordSource=frmLogin.Adodc1.RecordSourceAdodc1.RefreshSetText4.DataSource=Adodc1Text4.DataField="密码"IfText1=""ThenMsgBox"请输入原密码!",,"修改密码"ExitSubElseIfText1.Text<>Adodc1.Recordset.Fields("密码")ThenMsgBox"原密码错误!",,"修改密码"ExitSubElseIfText2=""OrText3=""ThenMsgBox"请输入新密码!!",,"修改密码"ExitSubElseIfText2<>Text3ThenMsgBox"密码不一致!!",,"修改密码"ExitSubElseText4.Text=Text2.TextAdodc1.Recordset.MoveFirstMsgBox"密码修改成功!!",,"修改密码"UnloadMeEndIfEndSub5.2.2用户治理界面(程序略)5..2.3入库模块的实现 PrivateSubCommand1_Click()设备入库程序DimI,JAsIntegerDimSTRAsStringIfText1.Text=""OrText2=""OrCombo1.Text=""OrText4=""OrText5=""OrText6=""OrText7=""ThenMsgBox"请输入完整信息!"ExitSubElse将记录存入入库记录表设备入库表.datPrimaryRS.Recordset.Fields("设备号")=Text1.Text设备入库表.datPrimaryRS.Recordset.Fields("入库数量")=Text2.Text设备入库表.datPrimaryRS.Recordset.Fields("入库时刻")=Combo1.Text设备入库表.datPrimaryRS.Recordset.Fields("供应商")=Text4.Text设备入库表.datPrimaryRS.Recordset.Fields("供应商电话")=Text5.Text设备入库表.datPrimaryRS.Recordset.Fields("价格")=Text6.Text设备入库表.datPrimaryRS.Recordset.Fields("采购员")=Text7.TextMsgBox"差不多成功入库!"EndIf设备入库表.Adodc1.RecordSource="select*from现有库存表where设备号='"&Text1.Text&"'"设备入库表.Adodc1.Refresh设备入库表.DataGrid1.RefreshIf设备入库表.Adodc1.Recordset.RecordCount>0Then 将记录加入现有库存表中设备入库表.Text9.Text=CInt(设备入库表.Text9.Text)+CInt(Text2.Text)设备入库表.Text9.RefreshJ=设备入库表.Text9设备入库表.Adodc1.Recordset.MoveFirst设备入库表.Adodc1.Recordset.Fields.Refresh设备入库表.DataGrid1.RefreshMsgBox"现有库存量为:"&JElseSTR="现有库存表中无此设备!"&vbCrLf&"请在设备代码表和现有库存表中手动添加记录!!"MsgBoxSTRLoadfrm现有库存表frm现有库存表.ShowCallfrm现有库存表.Command1_ClickFrmAddNewEqu.Text1.Text=frmInput.Text1.TextFrmAddNewEqu.Text2.Text=frmInput.Text2.TextLoadfrm设备代码表frm设备代码表.ShowEndIfEndSubPrivateSubcmdDelete_Click()删除入库表中记录OnErrorGoToDeleteErrDimYesNoAsStringYesNo=MsgBox("删除",vbYesNo,"删除记录")IfYesNo=vbYesThenWithdatPrimaryRS.Recordset.Delete.MoveNextIf.EOFThen.MoveLastEndWithElseExitSubEndIfDeleteErr:MsgBoxErr.DescriptionEndSubPrivateSubcmdUpdate_Click()更新纪录程序OnErrorGoToUpdateErrdatPrimaryRS.Recordset.UpdateBatchadAffectAllExitSubUpdateErr:MsgBoxErr.DescriptionEndSub5..2.4 出库模块实现PrivateSubCommand1_Click()设备出库程序Dimi,J,kAsIntegerDimSTRAsStringfrm设备出库表.Adodc1.RecordSource="select*from现有库存表where设备号='"&Text1.Text&"'"frm设备出库表.Adodc1.Refreshfrm设备出库表.DataGrid1.RefreshIfIsNumeric(Text2)=FalseThenMsgBox"数量必须是数字!"ExitSubEndIfIfText1.Text=""OrText2=""OrCombo1.Text=""OrText4=""OrText5=""OrText6=""OrText7=""ThenMsgBox"请输入完整信息!"ExitSubElseIffrm设备出库表.Adodc1.Recordset.RecordCount<=0ThenSTR="现有库存表中无此设备!请检查输入是否正确!!"MsgBoxSTRExitSubElsefrm设备出库表.datPrimaryRS.Recordset.Fields("设备号")=Text1.Textfrm设备出库表.datPrimaryRS.Recordset.Fields("出库数量")=Text2.Textfrm设备出库表.datPrimaryRS.Recordset.Fields("出库时刻")=Combo1.Textfrm设备出库表.datPrimaryRS.Recordset.Fields("经手人")=Text4.Textfrm设备出库表.datPrimaryRS.Recordset.Fields("领取人")=Text5.Textfrm设备出库表.datPrimaryRS.Recordset.Fields("使用部门")=Text6.Textfrm设备出库表.datPrimaryRS.Recordset.Fields("用途")=Text7.TextMsgBox"差不多成功存入设备出库表库!"EndIfIffrm设备出库表.Adodc1.Recordset.RecordCount>0Thenk=CInt(frm设备出库表.Text9.Text)-CInt(Text2.Text)Ifk>=0Thenfrm设备出库表.Text9.Text=CInt(frm设备出库表.Text9.Text)-CInt(Text2.Text)frm设备出库表.Text9.RefreshJ=frm设备出库表.Text9frm设备出库表.Adodc1.Recordset.MoveFirstfrm设备出库表.Adodc1.Recordset.Fields.Refreshfrm设备出库表.DataGrid1.RefreshMsgBox"现有库存量为:"&JElseMsgBox"现有库存量不足!请输入合适数量!!"ExitSubEndIfElseSTR="现有库存表中无此设备!请检查输入是否正确!!"MsgBoxSTREndIfEndSubPrivateSubcmdDelete_Click()删除出库记录OnErrorGoToDeleteErrDimYesNoAsStringYesNo=MsgBox("删除",vbYesNo,"删除记录")IfYesNo=vbYesThenWithdatPrimaryRS.Recordset.Delete.MoveNextIf.EOFThen.MoveLastEndWithElseExitSubEndIfDeleteErr:MsgBoxErr.DescriptionEndSub更新记录程序同入库的更新程序相同,在此略5.2.5设备采购模块实现,程序略5.2.6现有模块实现,程序略5.2.7设备代码模块实现要紧程序PrivateSubcmdAdd_Click()添加设备OnErrorGoToAddErrdatPrimaryRS.Recordset.AddNewExitSubAddErr:MsgBoxErr.DescriptionEndSub5.2.8库存报警模块实现要紧程序PrivateSubCommand1_Click()显示高于最大警戒库存的设备datPrimaryRS.RecordSource="select*from现有库存表where现有库存>最大库存"datPrimaryRS.RefreshgrdDataGrid.RefreshIfdatPrimaryRS.Recordset.RecordCount>0ThenBeepMsgBox"表中设备已过量!"ElseMsgBox"没有设备库存过量!"EndIfEndSubPrivateSubCommand2_Click()显示低于于最小警戒库存的设备datPrimaryRS.RecordSource="se

温馨提示

  • 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
  • 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
  • 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
  • 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
  • 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
  • 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
  • 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。

评论

0/150

提交评论