物流信息系统课程设计2017

1、PAGE PAGE 76成 绩武汉轻工大学经济与管管理学院院 物流流信息系系统课程程设计报报告题 目 物流流信息系系统课课程设计计报告 姓 名 学 号号 专业年级级 物流流管理115011指导教师师 黄键键 职 称 年 月 日教师评语：指导教师_（签名）年 月 日目 录目录TOC o 1-3 h z u HYPERLINK l _Toc134115110 一课程程设计的的序言3 HYPERLINK l _Toc134115113 二课程程设计的的内容及及其步骤骤4 （一）建建立数据据库44（二）主主程序6.（三）主主菜单77（四）建建立工具具栏77（五）建建立loogo表表单8.（六）表表单基

2、本本信息表表sysstemm15.（七）表单rrkd（入库单单）19（八）出库单单ckdd255.（九）器材明明细表表表单qccmx.scxx35（十）浏浏览修改改表单lllxgg.sccx 441（十一）修改总总数据库库表单xxgmaain55（十二）个人工工具卡表表单grrgj 58（十三）创建本本地视图图ll_gjkk600（十四）创建建修改个个人工具具卡表单单grggjk 661（十五）建立立报表644.（十六）连编编67（十七）制作作安装盘盘668 HYPERLINK l _Toc134115143 三课程程设计的的总结和和感想771一、设计计的序言言设计目的的：物流信信息系统统课程

3、程设计为为学生提提供了一一个既动动手又动动脑，独独立实践践的机会会。培养养学生“物流信信息系统统”课程所所学知识识的综合合应用，分析和和解决企企业物流流信息系系统实际际问题的的能力。设计要求求由教师布布置课程程设计的的思路，提供设设计资料料，学生生根据资资料，结结合企业业物流系系统的相相关知识识，对资资料进行行深入分分析，独独立完成成物流信信息系统统课程设设计。设计内容容：1根据据企业库库房需求求进行分分析。2利用用VFPP进行软软件设计计。 二、课程程设计的的内容及及其步骤骤（一）建建立数据据库1、新建数数据库11508809000033郑万芳芳，保存存到e：1550800900003郑郑万

4、芳 目录下下。2、在数数据库中中新建表表sysstenn（.ddbf），五个个字段：fzrr、bggy、jjhy、clyy、miima，其标题题分别为为：负责责人、保保管员、计划员员、材料料员、密密码。3、新建建表maain（.dbbf）： cckbhh c(10), rrq dd(8),qccmc c(116),ggxxh cc(200),llb cc(6),dww c(4), djj n(8,22),ppzbhh c(10),rkksl n(88,2),rkkje n(110,22), ckssl nn(8,2), ckkje n(110,22),ggcmcc c(30),bzz c(6)

5、,clyy c(6),bgyy c(6),jhyy c(6),llrr c(6),fzrr c(6),lh c(66),yyt cc(200),qqu cc(2),jiia cc(2),haao cc(2),kuu c(2)。其标题题分别为为：出库库编号，日期，器材名名称，规规格型号号，类别别，单位位，单价价，凭证证编号，入库数数量，入入库金额额，出库库数量，出库金金额，工工程名称称，班组组，材料料员，保保管员，计划员员，领料料人，负负责人，料号，用途，区，架架，号，库。说说明：cc-字符符型；dd-日期期型；nn-数值值型，括括号内为为字节长长度，逗逗号后面面的数值值为几位位小数。4、新建建

6、表grrgjkk（.dbbf）: ckbbh cc(100), rq d(88),qqcmcc c(16),gggxh c(220),lb c(66),ddw cc(4), ddj nn(8,2), ckksl n(88,2), cckjee n(10,2),bz c(66),jjhy c(66),lllr c(66)。其其标题分分别为：出库编编号，日日期，器器材名称称，规格格型号，类别，单位，单价，出库数数量，出出库金额额，班组组，计划划员，领领料人。完成后（二）主主程序sset tallk ooff &关关闭对话话模式set saffe ooff&关闭闭对话框框set staat ooff

7、&不显示示提示对对话框set delle oon &不不处理已已删除的的记录set cennt oon&设定日日期格式式年为44位数set conns oon &激活从从程序中中向 VVisuual FoxxProo 主窗窗口或活活动的用用户自定定义窗口口的输出出set datte tto aansii &设置日日期格式式set staat bbar on &打开开状态栏栏set collor to &设设定配色色方案set syssmennu ooff &关闭闭系统主主菜单closse aall &关闭闭各种类类型的文文件RELEEASEE WIINDOOW 常常用 &关闭常常用工具具栏if

8、f mood(dday(datte(),22)=00 &偶数数日期_SCRREENN.baackccoloor=rrgb(80,1800,1550) &窗口背背景颜色色MODDIFYY WIINDOOW SSCREEEN TITTLE 库房管管理应用用软件 verr 2.1 为齐;鲁石化化检修公公司机泵泵车间编编制 今天天是：+dttoc(datte()+ +cddow(datte()ellse &奇数日日期_SSCREEEN.bacckcoolorr=rggb(880,1150,1800) &窗窗口背景景颜色MMODIIFY WINNDOWW SCCREEEN TTITLLE 库库房管理理应

9、用软软件 vver 2.11 ; 软软件编制制者：王王永成 今天是是：+dtooc(ddatee()+ +cdoow(ddatee()enddifZZOOMM WIINDOOW SSCREEEN MAXX &主主窗口最最大化_SCRREENN.coontrrolbbox=.f. &去去掉主窗窗口控制制按钮ddeacctivvatee wiindoow 项目管管理器 &关关闭项目目管理器器myppathh=leeft(syss(166),rrat(,syys(116) &确定程程序所在在的位置置sett deefa to (myypatth) &设置当当前路径径sett paath to dat

10、ta;fformm;piic &指明路路径oppen dattabaase kfggl &打打开数据据库doo foorm loggo &运行表表单loogorreadd evventts &占用用进程，启动事事件处理理quiit &退出（三）主主菜单操作(BR器器材入库库 命命令：ddo fformm rkkd器材材出库 命令令：doo foorm ckdd-退出出 命令：Cleea eevennt编辑辑(BBR编辑辑浏览出出入库单单 命命令：ddo fformm lllxg浏览览个人工工具卡 命令：do forrm ggrgjjk修修改个人人工具卡卡 命令令：doo foorm grggj

11、k-基基本设置置 命令令：doo foorm sysstenn游戏(BRR猜数游游戏 命命令：ddo fformm cssyx身体体状态测测试 命令令：doo foorm stccs-心灵灵感应 命令：do forrm xxlgyy退出(BBR 命命令Cllea（四）建建立工具具栏1、点击“文件”“新新建”按钮，选择“类”，出现新新建类对对话框。2、类名名输入郑万芳芳kuff，派派生于选选择ttoollbarr，存存储于：“e:1500809900003郑万万芳郑郑万芳kkuf.vcxx”，按确定按钮，出现类类设计器器。3、跟建建立表单单一样，如图55-2，我们建立立8个命命令按钮钮，其too

12、oltiipteext分别为为：器材材入库，器材出出库，修修改，浏浏览，查查找器材材，身体体状态测测试，猜猜数游戏戏，退出出。给按按钮加上上图片、文字（例如：猜字）。在各自自的cclicck方方法程序序中输入入相应的的命令（如：ddo fformm rkkd），现在还还没建立立这些表表单，可可以在建建完以后后再输。（五）建建立loogo表表单（1）新新建表单单loggo，ttitllebaar为00-关闭闭，heeighht=1115，widdth=2222。其iinitt过程：usee syysteenThhisfformm.Laabell1.wwidtth =0Thhisfformm.La

13、abell3.LLeftt =tthissforrm.wwidtthpuubliic ttbs,bgyy1,ccly11,jhhy1,fzrr1thhisfformm.toop=00thiisfoorm.lefft=00bgyy1=bbgyccly11=cllyjhhy1=jhyyfzrr1=ffzr（2）LLabeel1的的capptioon为“欢迎使使用库房房管理软软件”，透明，楷体，12号号，黄色色。（3）LLabeel2的的capptioon为“输入密密码”，透明，黑体，12号号，绿色色。（44）Laabell3的ccapttionn为“软软件作者者：武汉汉轻工大大学 郑郑万芳”，透明

14、明，白色色。（5）文文本框的的Namme为ttxtppasssworrd，ppasssworrchaar为*。（6）计时器器timmer11，innterrvall=2000。其timmer过过程：iif tthissforrm.ttop1660 &判判断laabell1的宽宽度是否否大于1160 Thiisfoorm.Labbel11.wiidthh =00 &llabeel1的的宽度设设为0EElsee Thhisfformm.Laabell1.wwidtth = Thhisfformm.Laabell1.wwidtth +16 &宽度增增加166EnddIf*以下作作用是让让labbel

15、33向左移移动Iff Thhisfformm.Laabell3.LLeftt =33 =mmesssageeboxx(你你不是合合法用户户！你不不能使用用！,644,提提示窗口口) thiisfoorm.relleasse Cllea eveent ellse =messsaggeboox(口令不不正确！请重新新输入！,664,提示窗窗口)tthissforrm.ttxtppasssworrd.vvaluue=thiisfoorm.txttpassswoord.settfoccus()eendiifENNDIFF（8）命命令按钮钮cancell，退出出。其cclicck过程程：thhisffo

16、rmm.reeleaaseCCleaa evventt出现的问问题：点击确定定按钮，出现一一个程序序错误的的提升，显示文文件不存存在以及及找不到到变量解决方案案：因为为对vffp软件件操作不不够精通通，暂时时没有想想到解决决方案。望老师师见谅。（六）表表单 基基本信息息表syysteem（1）表单的的“caaptiion”为“基基本信息息”，“winndowwtyppe”为为1-模模式建立标签签“laabell1llabeel5”、文本本框“ttextt1ttextt5”和和命令按按钮“ccommmandd1”。（3）右右击表单单选择“数据环环境”（图6-1）。（4）填填加表ssystten.

17、dbff。（图图6-22）、texxt1texxt5的的“coontrrolssourrce”分别选选择syysteen.ffzr、sysstenn.jhhy、ssystten.clyy、syysteen.bbgy、sysstenn.miim（66）、llabeel1labbel55的caaptiion为为：负责责人、计计划员、材料员员、保管管员、密密码。、commmannd1.cillck为为：thhisfformm.reeleaase。（8）、texxt5的的“innputtmassk”为为：“XXXXXXXX”，“ppasssworrdchhar”为：“*”。出现的的问题：Textt1-

18、44无法输输入数据据，基本本信息表表不能正正常使用用。解决方案案：因为为对vffp软件件的使用用不够精精通，所所以对该该出现的的问题无无法解决决，望老老师见谅谅。（七）表表单rkkd（入入库单）（1）、我们们用一些些标签和和线条建建立（如如图6-3）表表单rkkd，你你可以根根据自己己单位的的情况设设计。其其“tiitleebarr”为：0-关关闭（2）、建立117个文文本框（由于我我在设计计时进行行过修改改，删掉掉了一些些文本框框，所以以现在不不连续），其“baccksttylee”为：0-透透明、“borrderrcollor”为：00-无(没有“0-无无”这个选选项，只只有颜色色的选择择

19、，如下下图：)其“coontrrolssourrce”分别为为：teext99为bggy1，texxt122为fzzr1，texxt177为clly1，其它的的均与其其namme相同同（例：texxt1为为texxt1）。（3）、组合框框commbo22，“bbordderccoloor”为为：0-无(没没有“0-无无”这个选选项，同同上)，“coontrrolssourrce”为cbbo1，“roowsoourcce”为为：“钢钢材,管管件,配配件,工工器具,量具,杂品,消耗品品,油料料,劳保保,阀门门”，“rowwsouurceetyppe”为为：1-值。（4）、命令按按钮coommaan

20、d11（确定定）的cclicck过程程为：ttis=messsaggeboox(保存入入库单？,44+644,提提示窗口口)iif ttis=6iff !uusedd(mmainn)uuse maaineelseeselle mmainnenddifAAPPEEND BLLANKKreppl lb wiith cboo1reepl rqq wiith datte()reppl pzbbh witth ttextt4reepl gccmc wiith texxt5rrepll yyt wwithh teext66reppl lh witth ttextt13rrepll qqcmcc wiith

21、 texxt199reppl ggxxh witth ttextt20rrepll ddw wwithh teext77reppl rkssl wwithh teext88reppl dj wiith teext110reepl rkkje wiith teext111reepl jhhy witth texxt233reppl bgyy wwithh bbgyrrepll ffzr wiith fzzrreepl lllr witth clyyuseetexxt200=texxt133=texxt4=ttextt8=00.000texxt100=0.00ttextt11=0.000teext

22、11=yeear(datte()teext22=moonthh(daate()ttextt3=dday(datte()thhisfformm.cbbo2.settfoccustthissforrm.rrefrreshhenddif（5）、命令按按钮coommaand22（退出出）的cclicck过程程：ussethhisfformm.reeleaase（6）、表单fformm1的iinitt过程： ppubllic texxt1,texxt2,texxt3,texxt4,texxt5,texxt6,texxt7,texxt8,texxt100,teext111,; ttextt19,texxt

23、200,teext223,ccbo11,teext99,teext113teext55=texxt6=ttextt7=teext113=teext117=teext119=teext220=teext223=teext112=teext99=texxt4=ttextt8=00.000texxt100=0.00ttextt11=0.000teext11=yeear(datte()teext22=moonthh(daate()ttextt3=dday(datte()cbbo1= thhisfformm.cbbo2.settfoccus（7）、表单fformm1的ddesttroyy过程：relle

24、asse ttextt1,ttextt2,ttextt3,ttextt4,ttextt5,ttextt6,ttextt7,ttextt8,ttextt10,texxt111,; teext119,ttextt20,texxt233,cbbo1,texxt9,texxt133出现的问问题：点击组合合框1的的下拉箭箭头，无无法选择择点击确定定命令后后，弹出出是否保保存入库库单，选择择“是”，出现现以下程程序错误误，显示示文件不不存在解决方案案：因为为对vffp软件件的使用用不够精精通，所所以对出出现的问问题无法法解决，望老师师见谅。（八）出出库单cckd 最初我我设计的的出库单单象入库库单一样样，

25、一次次只能开开一种材材料，由由于在车车间使用用就改成成现在这这样。图图7-11（1）、文本本框teext11的“ddateeforrmatt”为：144-汉语语；“tapsttop”（如下下图：）为：.F.假；“vaaluee”为：=ddatee()。其他他略。（2）、建立表表格Grrid11。右击击Griid1选选择生成成器选择择maiin表，选定如如下字段段：qccmc、ggxxh、ddw、ddj、ccksll、ckkje、lb，按确定定按钮。（图77-2）、修改表表格Grrid11。“ddeleetemmarkk”为：.FF.-假假；“reccorddmarrk”为为：.F.-假；“re

26、ecorrdsoourcce”为为：（无无）（去去掉mmainn）；“sccrolllbaars”为：2-垂垂直。Commbo11的“rrowssourrce”为：一班,二班,三班,四班,五班,六班,办公室室；“rowwsouurceetyppe”为为：11-值。（44）、表表单的iinitt过程：pubblicc bzz1,bbh1,llrr1*建建立临时时表lsscreeat currsorr lss ( ckbbh cc(100), rq d(88),qqcmcc c(16),gggxh c(220),dw c(44), ; djj n(8,22), ckssl nn(8,2), ckk

27、je n(110,22),ggcmcc c(30),bzz c(6),; ytt c(20),clly cc(6),bggy cc(6),jhhy cc(6),lllr cc(6),fzzr cc(6),lbb c(6)witth tthissforrm.ggridd1.reccorddsouurcee=lls.coolummn1.conntroolsoourcce=ls.qcmmc.coolummn2.conntroolsoourcce=ls.ggxxh.coolummn3.conntroolsoourcce=ls.dw.ccoluumn44.coontrrolssourrce=lss.dj

28、j.collumnn5.cconttrollsouurcee=lls.ccksll.collumnn6.cconttrollsouurcee=lls.cckjee.collumnn7.cconttrollsouurcee=lls.llbeendwwithh（5）、打印按按钮的ccilcck过程程：bzz1=tthissforrm.ccombbo1.valluebbh1=alllt(tthissforrm.ttextt5.vvaluue)lllr11=alllt(thiisfoorm.texxt6.vallue)selle llsmeessaagebbox(请用用B5纸纸！,16,提示示信息)R

29、EEPORRT FFORMM ckkdann.frrx TO PRIINTEER tthissforrm.rrefrreshh（66）、保保存按钮钮的ciilckk过程：bz11=thhisfformm.coomboo1.vvaluuebhh1=aalltt(thhisfformm.teext55.vaaluee)rqq1=ddatee()lllr11=alllt(thiisfoorm.texxt6.vallue)gcmmc1=alllt(tthissforrm.ttextt3.vvaluue)yyt1=alllt(tthissforrm.ttextt4.vvaluue)*检查输输入是否否有效

30、sselee lsscouunt forr !ddeleetedd() to zsiif zzs=00meessaagebbox(至少少要有一一条记录录才能保保存！,166,提提示信息息)retturnnenddifiif eemptty(bbz1)meessaagebbox(请填填写班组组,116,提示信信息)reeturrnenndiffloccat forr lss.ckksl=0iff fooundd()messsaggeboox(请填写写数量,166,提提示信息息)retturnnenddif*加入到到正式表表中goo toopdoo whhilee !eeof()iinseert

31、intto mmainn (cckbhh,rqq,qccmc,ggxxh,ddw,ddj,ccksll,ckkje,gcmmc,yyt,lllr,jhyy,lbb,bzz) ; vallue (bhh1,rrq1,ls.qcmmc,lls.gggxhh,lss.dww,lss.djj,lss.ckksl,ls.ckjje,ggcmcc1,lls.yyt,lllr11,jhhy1,ls.lb,bz11) if alllt(lls.llb)=工器器具 iinseert intto ggrgjjk (ckkbh,rq,qcmmc,gggxhh,dww,djj,ckksl,ckjje,lllr,jhy

32、y) ; vallue (bhh1,rrq1,ls.qcmmc,lls.gggxhh,lss.dww,lss.djj,lss.ckksl,ls.ckjje,lllr11,jhhy1) eendiif skiipennddoozapp（6）、退出按按钮的ccilcck过程程：ttt=0tthissforrm.rreleeasee（7）、Griid1下下的Coolummn1下下的Teext11的DbblCllickk过程：do forrm qqcmxx seele lstthiss.vaaluee=maain.qcmmcwiith thiisfoorm.griid1.coolummn2.texxt

33、1.vallue=maiin.gggxhh.ccoluumn33.teext11.vaaluee=maain.dw.coolummn4.texxt1.vallue=maiin.ddj .coolummn5.texxt1.vallue=0 .ccoluumn66.teext11.vaaluee=0.coolummn7.texxt1.vallue=maiin.llbenndwiithtthissforrm.rrefrreshhthiisfoorm.griid1.collumnn5.ttextt1.ssetffocuusthhisfformm.reefreesh（8）、Griid1下下的Coolum

34、mn5下下的Teext11的LoostFFocuus过程程：iff thhis.vallueckssl1 sss=alllt(strr(ckksl11) mmesssageeboxx(开开票数量量不能大大于库存存数量+sss,166,提提示信息息) tthissforrm.ggridd1.ccoluumn55.teext11.vaaluee=0 tthissforrm.ggridd1.ccoluumn55.teext11.seetfoocuss rretuuenddif thhisfformm.grrid11.coolummn6.texxt1.vallue=ls.ckssl*lls.ddjth

35、hisfformm.grrid11.reefreesh（9）、Griid1的的rigghtccilcck过程程：seele lsddo ttjiaa.mppr &调用ttjiaa菜单tthissforrm.ggridd1.rrefrreshhthiisfoorm.griid1.settfoccus 附加：建立ttjiaa菜单（1）、新建快快捷菜单单（2）、“填加加一条”的过过程内内容为：loccat forr lss.ckksl=0iff fooundd()messsaggeboox(请填写写数量,166,提提示信息息)retturnnenddifaappeend blaank（3）、“删除除

36、选定一一条”的的过程程内容容为：iif mmesssageeboxx( 是否真真的删除除该行？,336,提示信信息)=6delleenndiff（4）、生成为为tjiia。出现的问问题：点击保存存命令，出现以以下程序序错误，显示文文件不存存在点击退出出命令，出现以以下程序序错误解决方案案：因为为对vffp软件件的使用用不够精精通，所所以对以以上出现现的错误误无法给给出解决决方案，望老师师见谅。器材明细细表表单单qcmmx.sscx（1）建建立标签签（按其其capptioon内容容）：“在上面面的文本本框中输输入”，“器材材名称或或规格型型号”，“库存存数量：”，“库存金金额：”，“器器 材 明

37、 细细 表”，“库库”，“区”，“架”，“号号”，“器材名名称：”，“规规格型号号：”，“单位位：”，“单价价：”。（2）建立文文本框：ku,qu,jiaa,haao,qqcmcc,gggxh,dw,dj（以上文文本框的的conntroolsoourcce分别别为：“maiin.+其名”），ttextt7，ttextt8，ttextt10。（3）建建立命令令按钮ccommmandd155（图88-2） 建立表格格Griid1，右击选选择“生生成器”，选择择表maain的的如下字字段：rrq,qqcmcc,gggxh,rkbbh（前前面设置置的表mmainn里没有有rkbbh字段段）,rrksl

38、l,rkkje,ckbbh,ccksll,ckkje,lb。其它属属性在这这里就不不一一介介绍了。（5）fformm1.iinitt:tbbs.hhidee &在在运行此此表单时时隐藏快快捷图标标pubblicc ckksl11 &定义义全局变变量（6）fformm.deestrroy：tbss.shhow &在关关闭此表表单时显显示快捷捷图标（7）teraactiivecchannge：loccatee foor aalltt(qccmc)=alllt(thiis.vvaluue)iif ffounnd()goo reecn()tthissforrm.rrefrreshhelsselloca

39、ate forr alllt(thiis.vvaluue)$alllt(gggxhh)iif ffounnd()goo reecn()tthissforrm.rrefrreshhenndiffenddif （88）coommaand11.cllickk：thhisfformm.coommaand22.ennablled=.t. thhisfformm.coommaand55.ennablled=.t.if !REECN()=11 sskipp -11 eelsee ggo 11 tthiss.ennablled=.f. tthissforrm.ccommmandd4.eenabbledd=.f

40、f.eendiifthhisfformm.reefreesh （9）ccommmandd2.cclicck：tthissforrm.ccommmandd1.eenabbledd=.tt.thhisfformm.coommaand44.ennablled=.t.if !eoof() sskipp 1 eelsee ggo bbotttom thhis.enaableed=.f. thhisfformm.coommaand55.ennablled=.f.enndiffthiisfoorm.reffressh （10）commmannd3.cliick：THIISFOORM.RELLEASSE（11

41、）commmannd4.cliick：mmannd2.enaableed=.t.tthissforrm.ccommmandd5.eenabbledd=.tt. goo 1 thhis.enaableed=.f.tthissforrm.ccommmandd1.eenabbledd=.ff.thhisfformm.reefreesh （12）commmannd5.cliick：mmannd1.enaableed=.t.tthissforrm.ccommmandd4.eenabbledd=.tt. go botttomm tthiss.ennablled=.f.mmannd2.enaableed=.

42、f.tthissforrm.rrefrreshh （13）griid1.reffressh：tthissforrm.ggridd1.rrecoordssourrce=seele maiin.rrq,qqcmcc,gggxh,pzbbh,rrksll,rkkje,ckbbh,ccksll,ckkje,lb froom mmainn innto currs ttempp;wwherre aalltt(qccmc)=aalltt(thhisfformm.qccmc.vallue) .aand. alllt(ggxxh)=alllt(thiisfoorm.ggxxh.vvaluue) seele te

43、mmpsuum rrksll too sll1suum ccksll too sll2suum rrkjee too jee1suum cckjee too jee2ckksl11=sll1-ssl2tthissforrm.ttextt7.vvaluue=ssl1-sl22thiisfoorm.texxt8.vallue=je11-jee2 sselee maain出现的问问题：点击“运运行”，立马马出现程程序错误误解决方案案：因为为对vffp软件件的使用用不够精精通，所所以对以以上问题题无法解解决，望望老师见见谅。浏览修改改表单lllxgg.sccx（1）、建立选选择按钮钮组Opptioon

44、grroupp1。BButttonCCounnt=33（2）、建立选选择按钮钮组Opptioongrroupp2。BButttonCCounnt=111.（3）、建立立表格GGridd1。DDeleeteMMarkk=.F.-假；ReccorddSouurceeTyppe=0-表表。（4）、建立形形状Shhapee1、SShappe2，选择背背景颜色色。（55）、建建立组合合框Coomboo1。CConttrollSouunrcce=rq11；RRowSSounnrcee=sseleect rq disstinnct froom mmainn innto currsorr coomboo1；R

45、owwSouunrcceTyype=3-SQLL语句。（66）、建建立组合合框Coomboo2。CConttrollSouunrcce=rq22；RRowSSounnrcee=sseleect rq disstinnct froom mmainn innto currsorr coomboo2；RowwSouunrcceTyype=3-SQLL语句。（77）、建建立组合合框Coomboo3。CConttrollSouunrcce=bz11；RRowSSounnrcee=一一班,二二班,三三班,四四班,五五班,六六班,办办公室；RoowSoounrrceTTypee=11-值。（88）、建建立C

46、oommaand11。Caaptiion=修改改；ccommmandd1.cclicck：ddo fformm xggmaiin。（9）、建立CCommmandd2。CCapttionn=打打印；commmannd2.cliick：messsaggeboox(请用AA4纸！,116,提示信信息)DO CASSE CAASE THIISFOORM.OPTTIONNGROOUP11.VAALUEE=1 THHISFFORMM.OPPTIOONGRROUPP1.ooptiion11.cllickk() reeporrt fformm dyymaiin.ffrx to priinteer &打印报报表

47、dyymaiin CASSE TTHISSFORRM.OOPTIIONGGROUUP1.VALLUE=2 THIISFOORM.OPTTIONNGROOUP11.opptioon2.cliick() repportt foorm dyrrk.ffrx to priinteer &打打印报表表darrk CASSE TTHISSFORRM.OOPTIIONGGROUUP1.VALLUE=3 THIISFOORM.OPTTIONNGROOUP11.opptioon3.cliick() repportt foorm dycck.ffrx to priinteer &打印报报表dyyckeendcca

48、see thhisfformm.reefreesh（10）、建立立Commmannd3。Capptioon=退出；coommaand33.cllickk：thhisfformm.reeleaase（11）、建立立Commmannd4。Capptioon=清除选选择；commmannd4.cliick：mbo11.vaaluee=mbo22.vaaluee=mbo33.vaaluee=THIISFOORM.OPTTIONNGROOUP22.innterracttiveechaangee()（12）、建立立Commmannd5。Capptioon=显示；coommaand55.cllickk：TH

49、HISFFORMM.OPPTIOONGRROUPP2.iinteeracctivvechhangge()（13）、Coomboo2.iinteeracctivvechhangge：if ctood(tthissforrm.ccombbo1.vallue)cttod(thiis.vvaluue)waiit wwinddow at 16,28 后面面的日期期要大于于前面的的日期！请修改改。rettueendiif（14）、选择择菜单栏栏的“表表单”下下的“新新建方法法程序”，填加加如下方方法程序序：myyfieeld11、myyfieeld22、myyfieeld33。（115）、forrm1.i

50、niit：ppubllic rkhhj,cckhjj,kcchj,BZ11,RQQ1,RRQ2BBZ1=RRQ1=RRQ2=*初始化化临时表表 TTHISSFORRM.GGRidd1.RRECOORDSSOURRCE=SEELE maiin.rrq,qqcmcc,gggxh,lb,dj,pzbbh,rrksll,rkkje,ckbbh,ccksll,ckkje,bz,llrr,fzzr,bbgy,jhyy,lhh ,ddw FFROMM maain INTTO CCURSSOR TEMMP TTHISSFORRM.ggridd1.RRECOORDSSOURRCEttypee=4thiisfoo

51、rm.reffressh TTHISSFORRM.OOPTIIONGGROUUP2.intteraactiivecchannge() （16）、foorm11.myyfieeld11：thhisfformm.grrid11.coolummn1.heaaderr1.ccapttionn=日日期tthissforrm.ggridd1.ccoluumn22.heeadeer1.capptioon=器材名名称tthissforrm.ggridd1.ccoluumn33.heeadeer1.capptioon=规格型型号tthissforrm.ggridd1.ccoluumn44.heeadeer1.c

52、apptioon=类别thiisfoorm.griid1.collumnn5.hheadder11.caaptiion=单价价thhisfformm.grrid11.coolummn6.heaaderr1.ccapttionn=入入库编号号thhisfformm.grrid11.coolummn7.heaaderr1.ccapttionn=入入库数量量thhisfformm.grrid11.coolummn8.heaaderr1.ccapttionn=入入库金额额thhisfformm.grrid11.coolummn9.heaaderr1.ccapttionn=出出库编号号thhisffor

53、mm.grrid11.coolummn100.heeadeer1.capptioon=出库数数量tthissforrm.ggridd1.ccoluumn111.hheadder11.caaptiion=出库库金额thiisfoorm.griid1.collumnn12.heaaderr1.ccapttionn=班班组tthissforrm.ggridd1.ccoluumn113.hheadder11.caaptiion=领料料人tthissforrm.ggridd1.ccoluumn114.hheadder11.caaptiion=负责责人tthissforrm.ggridd1.ccoluum

54、n115.hheadder11.caaptiion=保管管员tthissforrm.ggridd1.ccoluumn116.hheadder11.caaptiion=计划划员tthissforrm.ggridd1.ccoluumn117.hheadder11.caaptiion=料号号thhisfformm.grrid11.coolummn188.heeadeer1.capptioon=单位（177）、fformm1.mmyfiieldd2：tthissforrm.ggridd1.ccoluumn11.heeadeer1.capptioon=日期thiisfoorm.griid1.collum

55、nn2.hheadder11.caaptiion=器材材名称thiisfoorm.griid1.collumnn3.hheadder11.caaptiion=规格格型号thiisfoorm.griid1.collumnn4.hheadder11.caaptiion=类别别thhisfformm.grrid11.coolummn5.heaaderr1.ccapttionn=单单价tthissforrm.ggridd1.ccoluumn66.heeadeer1.capptioon=入库编编号tthissforrm.ggridd1.ccoluumn77.heeadeer1.capptioon=入库数

56、数量tthissforrm.ggridd1.ccoluumn88.heeadeer1.capptioon=入库金金额tthissforrm.ggridd1.ccoluumn99.heeadeer1.capptioon=负责人人thhisfformm.grrid11.coolummn100.heeadeer1.capptioon=保管员员thhisfformm.grrid11.coolummn111.heeadeer1.capptioon=计划员员thhisfformm.grrid11.coolummn122.heeadeer1.capptioon=料号thiisfoorm.griid1.col

57、lumnn13.heaaderr1.ccapttionn=单单位（18）、foorm11.myyfieeld33：thhisfformm.grrid11.coolummn1.heaaderr1.ccapttionn=日日期tthissforrm.ggridd1.ccoluumn22.heeadeer1.capptioon=器材名名称tthissforrm.ggridd1.ccoluumn33.heeadeer1.capptioon=规格型型号tthissforrm.ggridd1.ccoluumn44.heeadeer1.capptioon=类别thiisfoorm.griid1.collum

58、nn5.hheadder11.caaptiion=单价价thhisfformm.grrid11.coolummn6.heaaderr1.ccapttionn=出出库编号号thhisfformm.grrid11.coolummn7.heaaderr1.ccapttionn=出出库数量量thhisfformm.grrid11.coolummn8.heaaderr1.ccapttionn=出出库金额额thhisfformm.grrid11.coolummn9.heaaderr1.ccapttionn=班班组tthissforrm.ggridd1.ccoluumn110.hheadder11.caap

59、tiion=领料料人tthissforrm.ggridd1.ccoluumn111.hheadder11.caaptiion=负责责人tthissforrm.ggridd1.ccoluumn112.hheadder11.caaptiion=保管管员tthissforrm.ggridd1.ccoluumn113.hheadder11.caaptiion=计划划员tthissforrm.ggridd1.ccoluumn114.hheadder11.caaptiion=单位位（19）、Opptioongrroupp1.ooptiion11.cllickk：tthissforrm.ccombbo3.v

60、allue=ssel=SEELE maiin.rrq,qqcmcc,gggxh,lb,dj,pzbbh,rrksll,rkkje,ckbbh,ccksll,ckkje,bz,llrr,fzzr,bbgy,jhyy,lhh,dww FRROM maiin IINTOO CUURSOOR TTEMPP if emppt(tthissforrm.ccombbo1.vallue) orr emmpt(mbo22.vaaluee)DOO CAASE CCASEE THHISFFORMM.OPPTIOONGRROUPP2.VVALUUE=11 whhe= CAASE THIISFOORM.OPTTIONN