资源描述:
《基于条码的仓库管理系统.doc》由会员上传分享,免费在线阅读,更多相关内容在教育资源-天天文库。
1、基于条形码的仓库管理系统源码五.出库查询与入库查询设计代码主要思路:1.先在表单上建立一个分页容器由两页构成,在第一分页中设置一些想要根据什么查询,然后将查询结果显示在第二个分页“查询结果”中。运行效果如下:2.“按条形码查询”按钮代码:ifallt(thisform.pp.p1.text3.value)==""messagebox("条形码不能为空不能为空,请输入相应信息!","系统信息:")elsethisform.pp.p2.bg.recordsource="selectdistincttiaomaas条形码,商品名,sum(数量)as数量,出库价格,出库日期,经手人fromchukuW
2、HEREchuku.tiaoma==allt(thisform.pp.p1.text3.value)nowait"thisform.pp.p2.setfocusthisform.refreshendif3.“按商品名称“模糊查询代码:ifallt(thisform.pp.p1.text1.value)==""messagebox("商品名称不能为空,请输入相应信息!","系统信息:")elsethisform.pp.p2.bg.recordsource=[select商品名,tiaomaas条形码,数量,出库价格,出库日期,经手人fromchukuWHEREchuku.商品名like"%"+a
3、llt(thisform.pp.p1.text1.value)+"%"nowait]thisform.pp.p2.setfocusthisform.refreshendif4.按出库价格查询代码c=thisform.pp.p1.text4.valueifc<0messagebox("输入的价格有错,请重新输入!","系统提示:")elsedocasecasethisform.pp.p1.optiongroup1.value=1thisform.pp.p2.bg.recordsource="select出库价格,tiaomaas条形码,商品名,数量,出库日期,经手人fromchukuWHEREc
4、huku.出库价格>thisform.pp.p1.text4.valueorderbychuku.出库价格nowait"thisform.pp.p2.setfocusthisform.refreshcasethisform.pp.p1.optiongroup1.value=2thisform.pp.p2.bg.recordsource="select出库价格,tiaomaas条形码,商品名,数量,出库日期,经手人fromchukuWHEREchuku.出库价格5、tfocusthisform.refreshcasethisform.pp.p1.optiongroup1.value=3d=thisform.pp.p1.text5.valueifd<0messagebox("请在出库价格区间中输入一个数值!","系统提示:")elsethisform.pp.p2.bg.recordsource="select出库价格,tiaomaas条形码,商品名,数量,出库日期,经手人fromchukuWHEREchuku.出库价格>=thisform.pp.p1.text4.value.and.chuku.出库价格<=thisform.pp.p1.text5.valu
6、eorderbychuku.出库价格nowait"thisform.pp.p2.setfocusthisform.refreshendifendcaseendif5.按出库数量查询代码:最多的n条记录ifthisform.pp.p1.text2.value=<0messagebox("出库数量有误,请输入相应信息!","系统信息:")elsethisform.pp.p2.bg.recordsource="selectsum(数量)as数量,tiaomaas条形码,商品名,出库价格,经手人,出库日期fromchukugroupbychuku.tiaomaorderby1desctopthisfo
7、rm.pp.p1.text2.valuenowait"thisform.pp.p2.setfocusthisform.refreshendif6.按利润查询代码:c=thisform.pp.p1.text7.valueifc<=0messagebox("你填的有错误,请重新填写!",16,"系统提示")elsethisform.pp.p2.bg.recordsource="selectsum((c