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

收藏 分享

资源预览需要最新版本的Flash Player支持。
您尚未安装或版本过低,建议您

源代码一封面1LABLE1的TIMER1控件的TIMER事件中添加如下代码IFTHISFORMLABEL1LEFTTHISFORMWIDTHTHISFORMLABEL1LEFT0ELSETHISFORMLABEL1LEFTTHISFORMLABEL1LEFT1ENDIFIINTRAND255JINTRAND255KINTRAND255THISFORMLABEL2FORECOLORRGBI,J,K2COMMAND1按钮控件的CLICK事件中添加如下代码设置文件目录为C\金孝镇\123456789\SETPATHTOC\金孝镇\123456789\调用用户登陆界面DOFORM用户登陆界面释放开始界面二登陆界面1COMMAND1按钮控件的CLICK事件中添加如下代码OPENDATABASE管理数据库USEYHGOTOP先打开“管理数据库”文件,然后使用YH表,并定位到第一个记录USER_NTHISFORMTEXT1VALUEUSER_PTHISFORMTEXT2VALUEIS_USERF定义逻辑变量IS_USER,用于判断是否为合法用户DOWHILENOTEOFIS_USERUSER_NYHUSER_NAMEANDUSER_PYHUSER_PASSWORDIFIS_USEREXITELSESKIPENDIFENDDO编历YH中所有的记录,判断输入的用户名称和用户密码是否存在IFIS_USERDOFORM主界面调用主界面USEELSEMESSAGEBOX用户名或用户密码不正确,016,提示CLOSALLENDIF2COMMAND2按钮控件的CLICK事件中添加如下代码USECLOSEALL关闭所有的表和数据库文件THISFORMRELEASE释放登陆界面三主界面主界面表单的INIT事件中添加如下代码THISFORMEDIT1WIDTHTHISFORMWIDTHTHISFORMEDIT1HEIGHTTHISFORMHEIGHT控制EDIT1控件随表单自动调整大小DOC\金孝镇\123456789\主菜单MPRWITHTHISFORM,T加载主菜单四商品管理界面(一)商品信息1FORM1的INIT事件中添加如下代码2COMMAND1第一个按钮控件的CLICK事件中添加如下代码GOTOPTHISFORMCOMMANDGROUP2COMMAND2ENABLEDFTHISFORMCOMMANDGROUP2COMMAND8ENABLEDTTHISFORMREFRESH定位到第一个记录,同时刷新表单3COMMAND2(上一个)按钮控件的CLICK事件中添加如下代码IFBOFSKIP1ELSEGOTOPENDIFTHISFORMCOMMANDGROUP2COMMAND8ENDBLEDTTHISFORMREFRESH刷新表单4COMMAND3(下一个)按钮控件的CLICK事件中添加如下代码IFBOFSKIP1ELSEGOBOTTOMENDIFTHISFORMCOMMANDGROUP2COMMAND2ENDBLEDTTHISFORMREFRESH刷新表单5COMMAND4最后一个按钮控件的CLICK事件中添加如下代码GOBOTTOMTHISFORMCOMMANDGROUP2COMMAND8ENDBLEDFTHISFORMCOMMANDGROUP2COMMAND2ENDBLEDTTHISFORMREFRESH6COMMAND6添加按钮控件的CLICK事件中添加如下代码APPENBLANK给货物信息表添加空白记录THISFORMCOMMANDGROUP2COMMAND7CAPTION保存THISFORMREFRESH7COMMAND9退出按钮控件的CLICK事件中添加如下代码DOCASECASETHISFORMCOMMANDGROUP2COMMAND9CAPTION退出USETHISFORMRELEASECASETHISFORMCOMMANDGROUP2COMMAND6CAPTION保存REPLACE库存表货号WITHTHISFORMTEXT_货号VALUEREPLACE库存表NAMEWITHTHISFORMTEXT_NAMEVALUEREPLACE库存表SPECWITHTHISFORMTEXT_SPECVALUEREPLACE库存表PREDUCED_AREAWITHTHISFORMTEXT_AREAVALUEREPLACE库存表DESCRIPTIONWITHTHISFORMTEXT_DESCRIPVALUETHISFORMCOMMANDGROUP2COMMAND9CAPTION退出ENDCASE(二)商品查询FORM1的CLICK事件中添加如下代码DOTOPLOCATEFOR库存表_NAMEALLTRIMTHISFORMTEXT1VALUETHISFORMRELEASE五进货管理界面(一)进货管理1LIST1控件的DBCLICK事件中添加如下代码货号_SELECTLIST1VALUE返回当前选择的货物的编号LOCATEFOR库存表货号货号_SELECT定位到与当前选择货号相同的记录THISFORMTEXT1VALUE库存表货号THISFORMTEXT2VALUE库存表NAMETHISFORMTEXT8VALUE库存表SPEC自动填写货物编号,名称,规格2COMMAND1按钮控件的CLICK事件中添加如下代码APPENDBLANK在表尾添加空记录REPLACE进货表货号WLTHALLTRIMTHISFORMTEXT1VALUEREPLACE进货表UNITWLTHALLTRIMTHISFORMTEXT4VALUEREPLACE进货表SALERWLTHALLTRIMTHISFORMTEXT8VALUEREPLACE进货表KEEPERWLTHALLTRIMTHISFORMTEXT6VALUEREPLACE进货表IN_TIMEWLTHALLTRIMTHISFORMTEXT7VALUEREPLACE进货表IN_COMWLTHALLTRIMTHISFORMTEXT8VALUEREPLACE进货表AMOUNTWLTHTHISFORMSPINNER1VALUE填写进货信息到进货表中THISFORMLIST2ADDITEMTHISFORMTEXT2VALUE将选中的货物添加到进货信息列表框的列表中3COMMAND2按钮控件的CLICK事件中添加如下代码IFTHISFORMLIST2VALUEMESSGEBOX请先选取要移去的货物编号,064,提示ELSETHISFORMLIST2REMOVEITEM将选中的进货从列表清单中删除LOCATEFOR进货表货号ALLTRIMTHISFORMTEXT1VALUEDELECT删除当前选中的进货ENDIF4COMMAND3按钮控件的CLICK事件中添加如下代码PACK清理纪录RELEASETHISFORM释放菜单(二)进货统计1COMMAND1按钮控件的CLICK事件中添加如下代码STAR_TIMETHISFORMTEXT1VALUEEND_TIMETHISFORMTEXT2VALUESELECT进货表,库存表NAME;FROM管理数据库进货表INNERJOIN管理数据库库存表;ON进货表货号库存表货号;;WHERE进货表货号STAR_TIME;AND进货表货号END_TIME;ORDERBY进货表货号查看介于符合条件的进货信息
编号:201311181626521518    类型:共享资源    大小:95.50KB    格式:DOC    上传时间:2013-11-18
  
5
关 键 词:
专业文献 学术论文 精品文档 超市售货
  人人文库网所有资源均是用户自行上传分享,仅供网友学习交流,未经上传用户书面授权,请勿作他用。
关于本文
本文标题:超市售货管理系统VF6.0源代码.doc
链接地址:http://www.renrendoc.com/p-101518.html

当前资源信息

4.0
 
(2人评价)
浏览:41次
网游小王子上传于2013-11-18

官方联系方式

客服手机:17625900360   
2:不支持迅雷下载,请使用浏览器下载   
3:不支持QQ浏览器下载,请用其他浏览器   
4:下载后的文档和图纸-无水印   
5:文档经过压缩,下载后原文更清晰   

精品推荐

相关阅读

人人文库
关于我们 - 网站声明 - 网站地图 - 资源地图 - 友情链接 - 网站客服客服 - 联系我们

网站客服QQ:2846424093    人人文库上传用户QQ群:460291265   

[email protected] 2016-2018  renrendoc.com 网站版权所有   南天在线技术支持

经营许可证编号:苏ICP备12009002号-5