会员注册 | 登录 | 微信快捷登录 支付宝快捷登录 QQ登录 微博登录 | 帮助中心 人人文库renrendoc.com美如初恋!
站内搜索 百度文库

热门搜索: 直缝焊接机 矿井提升机 循环球式转向器图纸 机器人手爪发展史 管道机器人dwg 动平衡试验台设计

   首页 人人文库网 > 资源分类 > DOC文档下载

超市售货管理系统VF6.0源代码.doc

  • 资源星级:
  • 资源大小:95.50KB   全文页数:11页
  • 资源格式: DOC        下载权限:注册会员/VIP会员
您还没有登陆,请先登录。登陆后即可下载此文档。
  合作网站登录: 微信快捷登录 支付宝快捷登录   QQ登录   微博登录
友情提示
2:本站资源不支持迅雷下载,请使用浏览器直接下载(不支持QQ浏览器)
3:本站资源下载后的文档和图纸-无水印,预览文档经过压缩,下载后原文更清晰   

超市售货管理系统VF6.0源代码.doc

源代码一封面1Lable1的Timer1控件的Timer事件中添加如下代码ifthisform.label1.leftthisform.widththisform.label1.left0elsethisform.label1.leftthisform.label1.left1endifiintrand255jintrand255kintrand255thisform.label2.forecolorrgbi,j,k2Command1按钮控件的Click事件中添加如下代码设置文件目录为c\金孝镇\123456789\setpathtoc\金孝镇\123456789\调用用户登陆界面doform用户登陆界面释放开始界面二登陆界面1Command1按钮控件的Click事件中添加如下代码opendatabase管理数据库useyhgotop先打开管理数据库文件,然后使用yh表,并定位到第一个记录user_nthisform.text1.valueuser_pthisform.text2.valueis_user.f.定义逻辑变量is_user,用于判断是否为合法用户dowhile.not.eofis_useruser_nyh.user_name.and.user_pyh.user_passwordifis_userexitelseskipendifenddo编历yh中所有的记录,判断输入的用户名称和用户密码是否存在ifis_userdoform主界面调用主界面useelsemessagebox用户名或用户密码不正确,016,提示closallendif2Command2按钮控件的Click事件中添加如下代码usecloseall关闭所有的表和数据库文件thisform.release释放登陆界面三主界面主界面表单的init事件中添加如下代码thisform.edit1.widththisform.widththisform.edit1.heightthisform.height控制edit1控件随表单自动调整大小doc\金孝镇\123456789\主菜单.mprwiththisform,.t.加载主菜单四商品管理界面(一)商品信息1Form1的Init事件中添加如下代码2Command1第一个按钮控件的Click事件中添加如下代码gotopthisform.commandgroup2.command2.enabled.f.thisform.commandgroup2.command8.enabled.t.thisform.refresh定位到第一个记录,同时刷新表单3Command2(上一个)按钮控件的Click事件中添加如下代码ifbofskip1elsegotopendifthisform.commandgroup2.command8.endbled.t.thisform.refresh刷新表单4Command3(下一个)按钮控件的Click事件中添加如下代码ifbofskip1elsegobottomendifthisform.commandgroup2.command2.endbled.t.thisform.refresh刷新表单5Command4最后一个按钮控件的Click事件中添加如下代码gobottomthisform.commandgroup2.command8.endbled.f.thisform.commandgroup2.command2.endbled.t.thisform.refresh6Command6添加按钮控件的Click事件中添加如下代码appenblank给货物信息表添加空白记录thisform.commandgroup2.command7.caption保存thisform.refresh7Command9退出按钮控件的Click事件中添加如下代码docasecasethisform.commandgroup2.command9.caption退出usethisform.releasecasethisform.commandgroup2.command6.caption保存replace库存表.货号withthisform.text_货号.valuereplace库存表.namewiththisform.text_name.valuereplace库存表.specwiththisform.text_spec.valuereplace库存表.preduced_areawiththisform.text_area.valuereplace库存表.descriptionwiththisform.text_descrip.valuethisform.commandgroup2.command9.caption退出endcase(二)商品查询form1的click事件中添加如下代码dotoplocatefor库存表_namealltrimthisform.text1.valuethisform.release五进货管理界面(一)进货管理1List1控件的Dbclick事件中添加如下代码货号_selectlist1.value返回当前选择的货物的编号locatefor库存表.货号货号_select定位到与当前选择货号相同的记录thisform.text1.value库存表.货号thisform.text2.value库存表.namethisform.text8value库存表.spec自动填写货物编号,名称,规格2Command1按钮控件的Click事件中添加如下代码appendblank在表尾添加空记录replace进货表.货号wlthalltrimthisform.text1.valuereplace进货表.unitwlthalltrimthisform.text4.valuereplace进货表.salerwlthalltrimthisform.text8.valuereplace进货表.keeperwlthalltrimthisform.text6.valuereplace进货表.in_timewlthalltrimthisform.text7.valuereplace进货表.in_comwlthalltrimthisform.text8.valuereplace进货表.amountwlththisform.spinner1.value填写进货信息到进货表中thisform.list2.additemthisform.text2.value将选中的货物添加到进货信息列表框的列表中3Command2按钮控件的Click事件中添加如下代码ifthisform.list2.valuemessGEBOX请先选取要移去的货物编号,064,提示elsethisform.list2.removeitem将选中的进货从列表清单中删除locatefor进货表.货号alltrimthisform.text1.valuedelect删除当前选中的进货endif4Command3按钮控件的Click事件中添加如下代码pack清理纪录releasethisform释放菜单(二)进货统计1Command1按钮控件的Click事件中添加如下代码star_timethisform.text1.valueend_timethisform.text2.valueselect进货表.,库存表.namefrom管理数据库进货表innerjoin管理数据库库存表on进货表.货号库存表.货号where进货表.货号star_timeand进货表.货号end_timeorderby进货表.货号查看介于符合条件的进货信息

注意事项

本文(超市售货管理系统VF6.0源代码.doc)为本站会员(网游小王子)主动上传,人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对上载内容本身不做任何修改或编辑。 若此文所含内容侵犯了您的版权或隐私,请立即通知人人文库网([email protected]),我们立即给予删除!

温馨提示:如果因为网速或其他原因下载失败请重新下载,重复下载不扣分。

copyright@ 2015-2017 人人文库网网站版权所有
苏ICP备12009002号-5