生产企业内部物资管理信息系统设计报告_第1页
生产企业内部物资管理信息系统设计报告_第2页
生产企业内部物资管理信息系统设计报告_第3页
生产企业内部物资管理信息系统设计报告_第4页
生产企业内部物资管理信息系统设计报告_第5页
已阅读5页,还剩19页未读 继续免费阅读

下载本文档

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

文档简介

PAGE课程设计说明书设计题目:生产企业内部物资管理信息系统芬专跟业:酬物流工程辜设计人石:俭学吩号睬山东科技大须学谱2023植年检1嚼月倾混3辉日导课程设计任赛务书锐学院叔:机电学院杯喘专业捷:沸物流工程钓班级稿:扎11瓶-2然姓名则:刘菲适一、获课程设计题顿目赞禽生产企业窃物资管理信晶息系统设计仪伶夏帝厕欠供咬主叨贩患踏汁丽二、既课程设计内钢容与要求:句(1)__闹_____清_____末_____舌_____自_____挪_____冬_____窄_____献_____榴_____富_____险__抹(2)__辅_____泻_____蒜_____浇_____未_____克_____多_____例_____剂_____曲_____菌__贯_泄____总(3)__盒_____锡_____竭_____多_____该_____毛_____弟_____暑_____骆_____帮_____碎_杨_笼_____钥_____小_____凭_____发_____器_____枪_____泻_____浙_____墨_____秧_____架_____鸣_姐__陕_____练_茶三、课程设巴计应解决主纯要问题:将(1)__坛_____奖_____之_____垂_____稍_____贼_____产_____颂_____泛_____鲜_____毫_____棒_稿_挖(2)__威_____炮_____鲁_____末_____昂_____生_____塌_____贷_____汇_____疼_____遗___粉_烘___蕉(3)__衣_____蛛_____夹_____信_____量_____嫩_____愿_____哈_____台_____出_____昼___疗_询___愚_____监_____络_____约_____缓_____寿_____象_____殃_____柿_____耳_____酱_____准_____础__幅__蛋四、课程设穴计相关附件谁(如:图纸刷、软件等)陆(1)__俘_____君_____缘_____野_____顿_____象_____育_____滩_____堡__洒__汗_____麻_____行____姨(2)__障_____辅_____厉_____菜_____糖_____工_____炕_____裹_____姑_塔__灿_____誉_____抹_____郊_____香_____痒_____握_____肠_____绿_____拼_____饿_____所_____店__亚_____疮_____分_____愁__自_____旺_____各_____坚_____烫_____速_____械_____呆_____溜____轮__缝_____跟_____绪_____榆___谈五、任务发扛出日期:滩_____船_____江__垦谢屡课程设计完耀成日期:对__柿2023-科1-3寄__与指导教师签虏字:伪_____筒_____投_____夹上挂械系主任签字覆:之_____毕_____督___柳指导教师对讲课程设计的驳评语严与先损青姥兼商悟程岔营点指导教师支签字:坑舅禁神读损姥侦杜垃仙消染翼绿补捧洞___支__年__转__月__鹿__日好目乎捷溉录腊1.课题简茧介雅……………踩……………茅……………欢……………龄…冲1座1.1课精题研究目的搁和意义圾……………优……………家……………拳1配1.2课伤题主要研究挺内容验……………罚……………画……………阳…稠1规2.系统分串析声……………溪……………辽……………淘……………新…奖1茂2.1业佳务流程图掉……………收……………屯……………匠…………拥1夺2.2用叉户需求分析舅……………观……………数……………慧………配1俩2.3系芝统功能设计驰……………已……………眠……………扮………离1坛3.系统设垮计控……………辛……………己……………弹……………宝…孙1繁3.1总游体设计码……………剂……………党……………费……………继1觉3.2详惕细设计碍……………急……………霉……………望……………剪1首3.3数钉据结构设计径……………赶……………卵……………步………棋1偶4.系统实共施惩……………扣……………刃……………愁……………贸1态4.1各役功能界面设征计(每个功腹能作一小节授)券……………妄…卵1蒸5畏.使用说明酒……………尿……………通……………拜……………啊1亭6饿.参考资料浪……………淘……………佣……………菊……………书1课题简介崭1.1项目断背景平物资管理系幕统拦是企业管理释的一个重要浙内容凤,哨随着时代的目进步新,棍企业也逐渐准变的庞大起帮来。如何管岛理好企业内使部物质的信器息阔,孩成为企业管贺理中的一个皆大问题。在含这种情况下唱,阁一个可以规饮范化莫,袜自动化的行物资管理信堆息系统州就显得非常忍必要。茧最初的物资献管理,都是对靠人力来完崖成的。当企闯业规模比较歼小的时候,甚人力可以完定成,随着企钉业的规模越裙来越大,企饼业的进出物狸资数量也越档来越多,依花然维持着人傅力进行物资踩管理,必然错会造成工作阳效率低,工命作错误增高版的问题。沙物资管理系榆统狮就是把分散附的企事业单乞位的职工信采息实行统一辱,集中,规肉范的收集管扯理,建立分专类编号管理捧,电脑存储务查询以及防梢火,防潮,悬防蛀,防盗迫等现代化,萌专业化的管挎理系统,为屠企事业单位另和职工解除竖后顾之忧。名1.2、桑项目研究岔目的和意义贺欠系统开发的宰总体任务是乓实现物资设淘备管理系统叉化、规范化轨和自动化,升从而达到提搁高单位工作裤效率的目的磁。信翅息已成为继秩劳动力、土吊地、资本之迟后的又一大穗资源。谁控逢制的信息越滑多,谁利用证信息资源的回效率越高,梁谁就会在各裤方面的竞争紫中占有一席洪之地,谁就兆会有更多的速优势。物资凯供应部门是竟企业与生产平单位之间的肿桥梁、纽带谷,是企业正挠常生产的物弄资保障部门检。正因为供卫应部门是关泽键的中转环烧节,建立一宇套物资管理诊信息系统对妇于如何有效肯的把本单位常生产资料及喊时、保质保博量的供应上溉去,有着重桥要的意义。刊从微观上讲托,建立一套回物资管理信暖息系统能够咬加快物资的跳周转速度,躲提高生产效丘率,从而加辅强了管理的捆信息化手段研,提高了本纹单位的经济垄效益。从宏仅观上讲,顺均应了社会的拜信息化、社兽会化潮流,起缩短了整个租社会化大生敢产的周期。系统分析挥锤2.1、业与务流程图物资调配基本信息录入物资登记物资调配基本信息录入物资登记遗2.2、匆用户需求分铃析贺针对一般物砖资管理信息殿系统的需求好,通过对上暴面物资调配题工作过程的邀内容和数据妙流程分析,宗设计如下面星所示的数据蛋项和数据结性构:秩有关物资基承本信息的输亲入、包括物借资编号、物号资名称、规雾格型号、种出类和计量单宴位等;奇物资基本信紧息的查询、冈修改;碌入库信息的及输入、查询遍、修改;添出库信息的汽输入、查询清、修改;芽物质剩余物粥资的查询、含预览。鼠物资金额兴简单的统计济查询夹2.3、系周统功能设计物资基本信息添加物资基本信息查询物资基本信息修改入库物资信息添加入库物资信息修改入库物资信息查询出库物资信息添加出库物资信息修改出库物资信息查询物资余额信息查询物资余额信息浏览物资基本信息添加物资基本信息查询物资基本信息修改入库物资信息添加入库物资信息修改入库物资信息查询出库物资信息添加出库物资信息修改出库物资信息查询物资余额信息查询物资余额信息浏览系统设计感3.1、系称统负详细设计加各个实体具漫体的描述E只-R图如下傍:物资基本信息实体物资基本信息实体计量单位物资编号计量单位物资编号物资名称物资规格物资名称物资规格士物资基本信晌息实体E-间R图物资入库信息实体物资入库信息实体保管人物资基本信息保管人物资基本信息经办人入库时间经办人入库时间蜻物资入库信控息实体E-漂R图物资出库信息实体物资出库信息实体保管人物资基本信息保管人物资基本信息经办人出库时间经办人出库时间羊物资出箩库信息实体佛E-R图物资物资剩余信息实体仓库物资基本信息仓库物资基本信息数量金额数量金额筋物资余额信琴息实体E-咬R图留3.2、数怖据结构设计槽在上面的实最体以及实体绑之间关系的嫌基础上,形挺成数据库中凳的表格以及蚂各个表格之块间的关系。眨仓库管理系丰统数据库中两各个表格的办设计结果如敲下面的几个扰表格所示。课每个表格表求示在数据库毒中的一个表沫。杜物资信息表宽:管理表:泻入库信息表绑:黑出库信息表碑:惩余额眠信息表:系统实施文4.1、各仍功能页面设磁计下:堤(1)叙、镜登陆界面左设计及代码弦:乏Priva方teSu口bCmd睛Land_回Click脑(冰)雕Stati麦cmiC梨ount炸AsIn荷teger掘Dims徐qlstr叉AsS艇tring毕sqlst鼻r="狗selec去t*fro艰m管理表起wher颤e用户名龙='"&充Text竹1&"等'"挂Adodc俊1.Rec肉ordSo仓urce遵=sql设str鼻Adodc猫1.Ref陪resh窝IfAd备odc1.仙Recor松dset.羡BOFT狱hen'刘若没有找到海符合whe且re条件的阅记录组MsgBo最x"用户榜名错误,重乘新输入",凯vbEx衫clama滥tion,问"警告"电Text1她.Text贼="搅"塌Te境xt1.S且etFoc蚂usElse仅IfAd梯odc1.沉Recor吊dset.觉Field晨s("密码络")=咽Text2租Then泉首页.Sh痕ow骆Unloa土dMeElse揉MsgBo步x"密码混错误,重新费输入",难vbExc或lamat李ion,似"警告"跃Text2更.Text玻="唤"扫Text2滥.SetF口ocus绝EndI脖f哲EndI眠f总miCou搞nt=折miCou涌nt+彻1拍Ifmi假Count造=3冈Then迟Unloa职dMe学EndS跟ub膜Priva法teSu蒸bcmd使Cance铃l_C零lick(辉)弱Unloa茎dMe川EndS旦ub洗(2)、爆首页招界面设计及爪代码:管Priva而teSu品bclx额sxxtj血_Clic邮k()销售额统计谨EndS商ub患Priva听teSu螺bgcc程btj_C质lick(增)忘工程成本统六计.Sho脂w街EndS结ub乒Priva感teSu寇bPic牢ture1成_Clic蔑k()坚EndS谊ub菊Priva戏teSu筐bsyw戒zxxcx耻_Clic套k()挤剩余物资查硬询.Sho趁w富EndS惯ub宽Priva德teSu忆btc_钥Click添()欠登录.Sh蹲ow徒Unloa理d衬Me厅EndS斤ub瞎Priva庙teSu目bwzr食kxxcx哪cx_Cl彩ick()拘入库信息查汇询.Sho治w培EndS砍ub评Priva缺teSu珠bwzr粘kxxtj幸_Clic早k()闯入库物资添颗加.Sho响w赵EndS迟ub随Priva狼teSu旨bwzc蓄kxxcx苗_Clic傅k()臂出库物资查率询.Sho傲w退EndS借ub湖Priva侍teSu积bwzc梢kxxtj拨yxg_C响lick(孩)哀物资出库信烘息.Sho少w喘EndS床ub巩Priva挎teSu驾bwzr磁kxxcx症_Clic撇k()蒙入库信息查虚询.Sho阵w间End欲Sub沟Priva流teSu拘bwzr护kxxtj均yxg_C争lick(祥)甘物资入库信显息.Sho桃w揉EndS顿ub付Priva尼teSu捷bwzx蔽xsc_C医lick(每)舞物资信息删涉除.Sho屿w炮EndS恒ub笑Priva佩teSu拨bwzx圈xtj_C济lick(蕉)职物资信息添暮加.Sho掌w防EndS馋ub往Priva脉teSu屿bwzx饲xxg_C疫lick(家)铺物资信息修裹改.Sho鸣w责EndS麻ub挠Priva送teSu农bxse容tj_Cl槐ick()租销售额统计另.Show石EndS崇ub乘(3)、控物资信息添岔加瓶设计及代码权易:嫌Priva朱teSu理bcmd懂edit_截Click招()没CmdAd享d.Ena挽bled丑=Tru增e警CmdDe牢l.Ena喜bled莫=Tru稼e欠CmdOk屑.Enab桨led=晶Fals毫e际CmdEs距c.Ena名bled编=Fal夺se盟Cmdba洪ck.En窜abled宿=Tr赞ue研EndS扩ub莲Priva场teSu箭bCmd挪Add_C凤lick(煤)协Adodc笑1.Rec啊ordse慕t.Add沿New葵CmdAd察d.Ena切bled扩=Fal年se之CmdDe衰l.Ena缎bled底=Fal岭se薪Cmd最Ok.En书abled军=Tr络ue父CmdEs折c.Ena导bled鲜=Tru缘e自EndS姿ub钳Priva屯teSu谢bCmd悠del_C排lick(侮)薪X=M贝sgBox肝("确实要档删除此条记开录吗?",悠vbYe疫sNo+挣vbQu随estio却n,"确赤认")钩IfX艺=vbY而esTh胃en会Ado肺dc1.R蓄ecord柜set.D挥elete赶Ado肿dc1.R偶ecord虹set.M够oveNe先xt漆If护Adodc叔1.Rec舱ordse繁t.EOF牺Then对A私dodc1注.Reco逢rdset裂.Mov范eLast厕End恳IfElse新Ado获dc1.R肥efres搁h粗EndS扭ub垄Priva乌teSu通bcmd竿ok_cl撇ick()钢Adodc荡1.Rec楼ordse查t.Upd勤ate必CmdAd鞋d.Ena孔bled毛=Tru婆e日CmdDe等l.Ena磁bled蝴=Tru瓦e军CmdOk旦.Enab饰led=奇Fals早e款CmdEs京c.Ena仇bled守=Fal投se悦IfTe粉xt1.T竿ext=桐""T因hen析MsgBo战x"请输蚂入材料编码凯",vb大Excla捐matio纽n,"警发告"孝Text1宾.Text早=""豆Text.假SetFo认cus叮CmdOk宵.Enab艰led=粘TrueElse素MsgBo毙x"添加宅成功"致EndI半f耳EndS蓄ub伪Priva或teSu掘bcmd临esc_c宗lick(调)快Adodc怖1.Ref突resh某CmdAd蔑d.Ena念bled您=Tru翻e诚CmdDe困l.Ena川bled能=Tru姨e涂CmdOk锁.Enab鸦led=仿Fals颠e风CmdEs妖c.Ena鬼bled钞=Fal杯se丸EndS瓜ub刊Priva梅teSu遣b返回_银Click符()烘首页.Sh蠢ow修Unloa铸dMe组E旅ndSu能b留(4)渔物资信息修父改乡设计及代码时:傻Priva刘teSu摆bcmd勇edit_愿Click浆()手IfAd展odc1.寸Recor燃dset.阵EOF=罗True丽OrA宾dodc1摸.Reco肾rdset筝.BOF氧=Tru妈eThe僵n鸣MsgBo预x"请选怎择要修改的宿行"磁Exit括Sub疯EndI识f恋物资信息修耕改窗口.S内how雾物资信息修剪改.Hid忧e臣EndS恳ub科Priva慕teSu猴bcom恒back_乒Click洋()羊首页.Sh故ow橡Unloa初dMe持EndS游ub罪Priva距teSu侄b子cmdup伶date_求Click序()幻物资信息修充改.Ado今dc1.R向ecord括set.F础ields体("材料编波号")=孙Text助1.Tex当t午物资信息修体改.Ado巩dc1.R粥ecord耍set.F鲁ields宵("材料名村称")=班Text辉2.Tex民t模物资信息修倚改.Ado际dc1.R喂ecord还set.F蒜ields只("型号"牲)=T击ext3.种Text其物资信息修削改.Ado杨dc1.R疗ecord渔set.F丧ields舅("单位"迷)=T糟ext4.少Text鄙物资信息修斤改.Ado窜dc1.R村ecord工set.U油pdate首物资信息修费改.Ado帮dc1.R损efres仓h让MsgBo倍x"修改桥成功"西EndS惭ub添Priva岭teSu约bcom痒back_多Click磁()占Unloa团d物资信统息修改窗口欧物资信息修升改.Sho帽w且EndS拍ub脂Priva膊teSu酒bFor秤m_Loa污d()革Text1服.Text扑=物资碑信息修改.芹Adodc讲1.Rec戴ordse什t.Fie涛lds("港材料编号"牲)封Text2诸.Text膛=物资返信息修改.俘Adodc头1.Rec然ordse形t.Fie列lds("诞材料名称"物)豪Text3蔑.Text败=物资明信息修改.岗Adodc虚1.Rec温ordse步t.Fie琴lds("叨型号")跪Text4灰.Text义=物资惜信息修改.页Adodc含1.Rec灵ordse估t.Fie虹lds("菜单位")蛋EndS便ub戒(5)俱物资信息删经除爹:躺Priva肺teSu出bCom电mand1财_Clic加k()文首页.Sh德ow舅Unloa液dMe回EndS蛙ub眨Priva雀teSu脉bFor蹄m_Loa钩d()静CmdDe蜂l.Ena蜜bled难=Tru亮e额EndS盈ub择Priva谱teSu硬bcmd善edit_别Click惊()斧IfAd险odc1.纪Recor饶dset.象E祝OF=赔True忘OrAd汇odc1.划Recor香dset.址BOF=销True达Then价MsgBo叛x"请选党择要删除的枝行"晴Exit垂Sub永EndI弟f绢EndS隆ub存Priva鸣teSu奶bCmd梯del_C纤lick(苦)诞X=M浅sgBox湾("确实要爆删除当前记精录吗?",攀vbYe惧sNo+诚vbQu司estio壮n,"确而认")姐IfX撤=vbY燕esTh调en网Adodc桨1.Rec名ordse国t.Del陶ete仅Adodc因1.Rec详ordse课t.Mov脚eNext泪IfAd端odc1.仿Recor洲dset乏.EOF厅Then枪Adodc殊1.Rec治ordse括t.Mov爷eLast匠EndI甩f容Adodc事1.Ref狼resh拌EndI烂f凭EndS箱ub嫂(6)、浸入库物资听信息添加和剩修改邪及债代码:谜Priva殃teSu沾bCom进mand1虹_Clic帝k()放Adodc趟1.Rec船ordse侧t.Add箭New把Comma员nd1.V嚷isibl滥e=T港rue仙Text1旺.SetF柔ocus抗EndS挨ub柳Priva枣teSu阵bCom看mand3良_Clic突k()催Adodc降1.Ref搁resh沃EndS丽ub亚Priva上t束eSub萄Comm签and4_四Click逃()在首页.Sh恶ow缠EndS绪ub扬Priva僻teSu孤bCom救mand2位_Clic京k()诊X=M地sgBox扶("添加成袋功",v关bOKOn磨ly+爹vbInf归ormat优ion+枯0,"晋添加成功"忽)唱Print渡"x=撤";X守;拦EndS奶ub花Priva孩teSu糟bcmd盈updat奶e_Cli等ck()芝IfAd辜odc1.努Recor中dset.兼EOF=科True模OrA侮dodc1花.Reco源rdset恋.BOF树=Tru垫eThe胞n胜MsgBo辟x"请选树择要修改的姐行"量EndI亮f肆Adodc积1.Rec供ordse回t.Fie授lds("右入库单号码筐")=熊Text1灶1.Tex土t灶Adodc奋1.Rec舟ordse留t.Fie递lds("严发票号码"尤)=T卷ext12栽.Text擦Adodc膜1.Rec炸ordse摘t.Fie宫lds("幅进库日期"戒)=T崖ext13怎.Text侵Adodc块1.Rec声ordse屠t.Fie盼lds("月经办人")驰=Te肾xt14.慈Text留Adodc且1.Rec剖ordse陆t.Fie亚lds("卡保管人")抄=Te给xt15.兼Text兄Adodc支1.Rec志ordse给t.Fie灾lds("量材料编码"贵)=T眉ext16状.Text伸Adodc冒1.Rec后ordse祸t.Fie窃lds("漠数量")券=Tex咱t17.T掌ext棵Adodc疮1.Rec再ordse降t.Fie大lds("犹单价")膊=Tex疫t18.T拳ext迫Adodc别1.Rec这ordse砖t.Fie件lds("群金额")桐=Tex怪t19.T古ext剪Adodc练1.Rec剧ordse挤t.Fie猴lds("阅材料名称"办)=T闪ext20盆.Text墙Adodc栏1.Rec女ordse情t.Upd主ate耀Adodc仅1.Ref浩resh与MsgBo常x"修改绒成功"丹EndS诱ub敌(7)、朱出库信息添惹加搅修改及代码读;宏Priva倾teSu滴bCom者mand1傻_Clic信k()干Adodc如1.Rec供ordse悔t.Add欣New授Comma捐nd1.V鸭isibl咬e=T梦rue搭Text1插.SetF友ocus律EndS特ub足Priva壶teSu慎bCom伪mand3禁_Clic疑k()毒Adodc柄1.Ref普resh碗EndS汪ub份Priva该teSu突bCom肌mand4渴_Clic剧k()领首页.Sh臣ow吼Unloa电dMe谢EndS序ub图Priva嘴teSu炉bCom抛mand2概_Clic瓣k()说X=M反sgBox片("添加成贝功",v休bOKOn支ly+赶vbInf礼ormat窃ion+及0,"寸添加成功"衰)百Print聚"x=竭";X羽;烦EndS无ub仁Priva唐teSu碗bcmd皂updat巨e_Cli驾ck()朽IfAd塘odc1.忘Recor喉dset.们EOF=摇True裕OrA昂dodc1气.Reco合rdset刃.BOF烛=Tru岗eThe总n你MsgBo哀x"请选晃择要修改的脖行"付EndI耳f凳Adodc赠1.Rec起ordse窗t.Fie献lds("膊出库单号码垄")=欠Text1洗1.Tex捷t赢Adodc山1.Rec弊ordse摆t.Fie弓lds("燕发票号码"帖)=T趁ext12立.Text新Adodc冻1.Rec狸ordse在t.Fie民lds("萄工程号")羽=Te掉xt13.耀Text欢Adodc蹲1.Rec昂ordse陡t.Fie断lds("士出库日期"饶)=T阔ext14颗.Text中Adodc赢1.Rec誓ordse碰t.Fie厨lds("阳经办人")忍=Te付xt15.陆Text河Adodc过1.Rec删ordse脉t.Fie理lds("睬保管人")加=Te签xt16.磁Text团Adodc烧1.Rec撑ordse桥t.Fie词lds("扯材料编码"漫)=T窗ext17蚂.Text酷Adodc倚1.Rec涝ordse丰t.Fie积lds("稀数量")五=Tex务t18.T艰ext忽Adodc圈1.Rec犯ordse托t.Fie葱lds("枝单价")意=Tex遗t19.T捷ext年Adodc蛾1.Rec吐ordse敌t.Fie够lds("大金额")吗=Tex氏t20.T棒ext微Adodc响1.Rec售ordse成t.Fie吩lds("得物资名称"辈)=T付ext21佛.Text抗Adodc他1.Rec犹ordse必t.Upd川ate夏Adodc夏1.Ref双resh吐MsgBo独x"修改若成功"傲EndS双ub嚷Priva鸭teSu似bcom讽back_校Click对()佳首页.Sh孤ow袍EndS怜ub镇Priva芒teSu总bSST胀ab1_D碗blCli康ck()痛Text1著1.Tex式t=A啊dodc1付.Reco村rdset诊.Fiel称ds("出随库单号码"退)醒Text1挪2.Tex们t=A麻dodc1饿.Reco序rdset死.Fiel性ds("发四票号码")政Text1顾3.Tex迹t=A认dodc1衔.Reco津rdset央.Fiel炮ds("工驰程号")剃Text1窑4.Tex葵t=A脑dodc1砌.Reco测rdset湿.Fiel声ds("出津库日期")么Text1墙5.Tex援t=A趴dodc1布.Reco燃rdset不.Fiel桐ds("经斑办人")艰Text1裳6.Tex姻t=A滴dodc1惹.Reco亏rdset瓦.Fiel有ds("保极管人")面Text1晋7.Tex仰t=A重dodc1犁.Reco坚rdset腾.Fiel抛ds("材耐料编码")概Text1幸8.Tex观t=A罩dodc1俗.Reco剑rdset鞋.Fiel娃ds("数蹲量")威Text1灶9.Tex反t=A税dodc1堪.Reco铁rdset标.Fiel块ds("单趟价")洗Text2表0.Tex她t=A宪dodc1雕.Reco韵rdset按.Fiel洋ds("金泊额")畅Text2葛1.Tex夕t=A秒dodc1储.Reco浇rdset雾.Fiel差ds("物疼资名称")脖EndS幻ub龙(8)、带入库信息跑查询网及皱代码:故Priva摊teSu蹄bCmd救1_Cli铃ck()止Dims参trAs异Stri旦ng药str=穗"sel致ect*篇from沫入库信息怜表whe瓣re入库喉信息表."统&Co妻mbo1.并Text附&"l沾ike'逝"&T鸟ext1.也Text介&"%'谋"商Adodc乱1.Rec童ordSo勇urce燃=str和Adodc御1.Ref耀resh芽EndS属ub项Priva披teSu结bCmd旦2_Cli柱ck()末首页.Sh促ow蹲Unloa按dMe棋EndS验ub束Priva销teSu甚bFor隶m_Loa浪d()夕Combo究1.Add寻Item归"材料名称烘"睡Combo走1.Add徒Item残"材料编码伯"库Combo丰1.Add鸡Item促"入库单号约码"希Combo鸽1.Add归Item络"发票号码约"暮Combo架1.Add冒Item寸"数量"纳Combo蚊1.Add弯Item画"经办人"往Combo匠1.Tex拉t="陵保管人"转Text1泉.Text革=""壮EndS剪ub加(9)、旗出库信息秧查询阴及走代码除:餐Priva划teSu班bCmd证1_Cli盏ck()码Dims丛trAs恐Stri放ng浑str=屑"sel销ect*勿from然出库信息竟表whe微re出库槽信息表."传&Co悔mbo1.便Text橡&"l库ike'闻"&T各ext1.杜Text恰&"%'盒"海Adodc类1.Rec榆ordSo个urce历=str繁Adodc咏1.Ref扔resh揉EndS倦ub杠Priva印teSu璃bCmd翁2_Cli佩ck()浴首页.Sh悲ow肝Unloa墙dMe孝EndS各ub柄Priva恼teSu悠bFor鸭m_Loa慈d()奖Combo皆1.Add尊Item块"物资名称擦"兄Combo诵1.Add禁Item局"材料编码茄"等Combo伪1.Add筹Item阶"出库单号蚂码"巨Combo寺1.Add庄Item烫"发票号码派"撕Combo涌1.Add携Item吨"数量"保Combo洋1.Add轨Item肌"经办人"吓Combo泡1.Tex西t="拔保管人"由Text1阳.Text瞧=""休EndS列ub招(10)、仇剩余估物资设计及先代码:柄Priva纹teSu同bCmd诱1_Cli公ck()授Dims咏trAs它Stri木ng掘str=坛"sel茅ect*通from房余额信息客表whe幅re余额遇信息表."质&Co识mbo1.签Text素&"l过ike'运"&T胖ext1.监Text届&"%'连"酿Adodc盾1.Rec的ordSo通urce甲=str阴Adodc匙1.Ref帅resh独EndS鸡ub列Priva线teSu召bCmd移2_Cli皱ck()腾首页.Sh饿ow诱Unloa藏dMe蹈EndS虹ub错Priva蒜teSu犹bFor盐m_Loa震d()臣Combo待1.Add养Item园"金额"艺Combo枪1.Add围Item邀"材料编码削"待Combo章1.Add鸡Item掠"数量"舒Combo及1.Add铺Item疯"单价"身Combo晋1.Tex别t="忆材料名称"墙Text1袜.Text制=""勒EndS叛ub亚(11)、雪销售额毫统计及代码逼:湿Priva手teSu粉bCmd头1_Cli汉ck()仁Dims庄trAs梦Stri交ng葵str=罢"sel烈ect金蓝额fro蛾m出库信债息表wh系ere出乡库日期>奖='"压&Co默mbo1.陵Text犬&"'哗and迁出库日期拦<=茧'"&浅Combo欺2.Tex点t&"浪'"晋Adodc煤1.Rec准ordSo贸urce安=str残Adodc代1.Ref买resh航EndS培ub奶Priva致teSu尸bCmd阅2_Cli规ck()稿首页.Sh钢ow桥Unloa扯dMe进EndS和ub速Priva爆teSu鸽bFor办m_Loa隐d()拐Combo瞎1.Add建Item季"2023只-1-1"踏Combo耍1.Add何Item埋"2023市-1-2"击Combo老1.Add督Item胆"2023邪-1-3"钟Combo悦1.Add分Item枣"2023己-1-4"榜Combo机1.Add伪Item屈"2023皇-1-5"组Combo捉1.Add求Item川"2023阅-1-6"刑Combo镰1.Add滨Item截"2023茫-1-7"抄Combo妙1.Add猛Item介"2023偷-2-1"斩Combo迁1.Add再Item逮"2023左-2-2"讽Combo附2.Add研Item码"2023荣-1-1"四Combo胞2.Add击Item亡"2023房-1-2"能Combo毛2.Add究Item寿"2023宽-1-3"盾Combo少2.Add接Item枪"2023他-1-4"奋Combo才2.Add遣Item峰"2023芹-1-5"学Combo拴2.Add断Item造"2023劈-1-6"厘Combo朝2.Add乞Item良"2023渔-1-7"之Combo彼2.Add膀Item神"2023局-2-1"柿Combo群2.Add变Item疏"2023垮-2-2"萄Text1寇.Text急=""执EndS胸ub登Priva扣teSu酒bTex匆t1_Ch古ange(廊)窃rssum薄.Open技"sel舍ects示um(金额马)fro努m出库信油息表wh祖ere出凭库日期>捡='"狠&Co阶mbo1.钓Text枣&"'瓜and倦出库日期免<=销'"&护Combo靠2.Tex柿t&"牵'"描Text1拍.Text出=rs酿sum.F抢ields焰(0)阵EndS通ub四(12)、湾工程成本秘设计及悔代码国:报Priva杀teSu进bFor乓m_Loa慰d()步Combo青1.Add斥Item耕"1010尾1"绵Combo幸1.Add热Item我"1010台2"粗Text1哥.Text占=""种EndS座ub延Priva鼠teSu下bCmd朽1_Cli模ck()众Dims袖trAs治Stri尿ng巷str=泊"sel撇ect金迁额fro数m出库信程息表wh吗ere工型程号=柱'"&恼Combo稿1.Tex填t&"窗'"渐Adodc塘1.Rec喉ordSo衡urce哀=str动Adodc誓1.Ref旺resh酷EndS提ub朱Priva遍teSu肌bCmd刺2_Cli邀ck()千首页.Sh拍ow傻Unloa舞dMe蝇

温馨提示

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

评论

0/150

提交评论