毕业论文论文范文课程设计实践报告法律论文英语论文教学论文医学论文农学论文艺术论文行政论文管理论文计算机安全
您现在的位置: 毕业论文 >> 论文 >> 正文

VF进销存管理系统论文(系统结构图+源代码) 第15页

更新时间:2008-11-6:  来源:毕业论文

VF进销存管理系统论文(系统结构图+源代码) 第15页

在“盘点”按钮的Click事件下添加如下代码:
IF empty(thisform.text4.value)=.f.
 sp=alltrim(thisform.msgrid.textmatrix(thisform.msgrid.row,2))
 spbh=alltrim(thisform.msgrid.textmatrix(thisform.msgrid.row,1))
 jg=val(thisform.msgrid.textmatrix(thisform.msgrid.row,6))
 a=messagebox("确定要对商品 [ "+SP+" ] 进行盘点吗?",32+4,"系统提示")
 IF a=6
  bysl=thisform.text2.value-thisform.text4.value  &&算出盘点数量与库存数量的差
  sl=thisform.text4.value
  UPDATE 库存信息表  SET 库存数量=sl WHERE 商品编号=spbh
  IF thisform.text3.value<>bysl    &&查看已记载的损溢数量与应该报损数量是否相同
   mynum=thisform.rainfunction1.autonumber("报损报溢表","SY")    &&生成编号
   je=jg*bysl
   INSERT INTO 报损报溢表 (编号,商品编号,损溢数量,盘点否,日期,金额,备注);
   VALUES(mynum,spbh,bysl,.t.,date(),je,"盘点")    &&在报损报溢表中插入记录
   UPDATE 报损报溢表 SET 盘点否=.t. WHERE 盘点否=.f.
  ENDIF
  thisform.msgrid.textmatrix(thisform.msgrid.row,3)    
  thisform.text4.enabled=.f.
  thisform.text3.value=bysl
  thisform.msgrid.textmatrix(thisform.msgrid.row,7)=thisform.text4.value
  thisform.msgrid.textmatrix(thisform.msgrid.row,8)=je*bysl
  messagebox("对商品 [ "+SP+" ] 的盘点工作已经完成!",48,"系统提示")
  thisform.combo1.setfocus
 ENDIF
ELSE
 messagebox("盘点数量不能为空!",16,"系统提示")
ENDIF
 
附录A  参考文献
1.《Visual Basic精彩编程200例》机械工业出版社 赛奎春、高春艳等
2003年1月 
2.《Visual Basic数据库开发实例解析》机械工业出版社 刘志铭、高春艳等
2003年8月 
3.《Visual FoxPro数据库开发实例解析》机械工业出版社 王晶莹、王国辉等
2003年9月 
4.《Power Builder数据库开发实例解析》机械工业出版社 华传铭、张振坤等
2003年9月 
5.《Delphi数据库开发实例解析》机械工业出版社 赛奎春、郑骁鹏等
2004年2月 
6.《PowerBuilder 精彩编程200例》机械工业出版社 张振坤、李文立等 
2004年9月
7.《Visual FoxPro 精彩编程200例》机械工业出版社 王国辉、董韶华等
2004年9月
8.《ASP数据库开发实例解析》机械工业出版社 李严、于亚芳、王国辉 
2004年12月
9.《Delphi工程应用与项目实践》机械工业出版社 宋坤、赵智勇等
2005年1月 
10.《Visual Basic工程应用与项目实践》机械工业出版社 高春艳、李俊民等
2005年1月 
11.《Visual C++工程应用与项目实践》机械工业出版社 张雨、阮伟良等
2005年1月
12.《JSP工程应用与项目实践》机械工业出版社 陈威、白伟明、李楠
2005年2月
13.《ASP工程应用与项目实践》机械工业出版社 王国辉、牛强、李南南
2005年4月
14.《Visual Basic 信息系统开发实例精选》机械工业出版社 高春艳、李俊民、张耀庭等 
2005年7月
15.《ASP 信息系统开发实例精选》机械工业出版社 王国辉、牛强、李南南等
2005年7月 
16.《Delphi 信息系统开发实例精选》机械工业出版社 宋坤、赵智勇、刘强等
2005年7月 
17.《Visual foxpro数据库开发关键技术与实例应用》人民邮电出版社 周桓、张雨、王国辉
2004年5月
18.《Power Builder数据库开发关键技术与实例应用》人民邮电出版社 刘志铭、张振坤、冯文萃 2004年5月
19.《Delphi数据库开发关键技术与实例应用》人民邮电出版社 赛奎春、陈紫鸿、宋昆
2004年5月
20.《Visual basic数据库开发关键技术与实例应用》人民邮电出版社 高春艳、李艳
2004年5月
21.《Visual C++ 管理信息系统完整项目实例剖析》人民邮电出版社 明日科技
2005年7月 
22.《Visual Basic 管理信息系统完整项目实例剖析》人民邮电出版社 明日科技
2005年7月 
23.《PowerBuilder 管理信息系统完整项目实例剖析》人民邮电出版社 明日科技
2005年7月 
24.《Visual FoxPro管理信息系统完整项目实例剖析》人民邮电出版社 明日科技
2005年7月 
25.《SQL Server数据库开发实例解析》机械工业出版社 宋昆、李严等
2006年1月
26.《Access数据库开发实例解析》机械工业出版社 李俊民、高春燕等
2006年1月
27.《Visual Basic数据库系统开发完全手册》人民邮电出版社 明日科技王春才、高春艳、
李俊民 2006年3月
28.《Visual C++ 数据库系统开发完全手册》人民邮电出版社 明日科技 王端、于速、张雨
2006年3月
29.《Delphi数据库系统开发完全手册》人民邮电出版社 明日科技 宋坤、邹天思
2006年3月
30.《JSP数据库系统开发完全手册》人民邮电出版社 明日科技 王国辉、李文立、杨亮
2006年3月
31.《Visual Basic数据库系统开发案例精选》人民邮电出版社 明日科技 高春艳、李俊民、
刘彬彬 2006年5月
32.《Delphi 数据库系统开发案例精选》人民邮电出版社 明日科技 李文立、刘强、梁冰
2006年5月
33.《ASP数据库系统开发案例精选》人民邮电出版社 明日科技 孙明丽、邹天思、盖天宇
2006年5月
34.《JSP数据库系统开发案例精选》人民邮电出版社 明日科技 王国辉、王易

 << 上一页  [11] [12] [13] [14] [15] [16] 下一页

VF进销存管理系统论文(系统结构图+源代码) 第15页下载如图片无法显示或论文不完整,请联系qq752018766
设为首页 | 联系站长 | 友情链接 | 网站地图 |

copyright©751com.cn 辣文论文网 严禁转载
如果本毕业论文网损害了您的利益或者侵犯了您的权利,请及时联系,我们一定会及时改正。