以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 条件判断,库存数量! (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=30218) |
||||
-- 作者:xyw04 -- 发布时间:2013/3/23 10:05:00 -- 条件判断,库存数量! 大家早上好。 今天礼拜,又上来求指导了!
问题是这样的, 求库存数量, 根据 商品的代码, 商品的颜色, 判断商品的库存数量。(一个商品有多个颜色是很正常的!)
|
||||
-- 作者:唐尸三摆手 -- 发布时间:2013/3/23 10:09:00 -- \'没看你的项目,大致是这样
dim str1,str2 as string str1 = 当前的代码 str2 = 当前的颜色 dim dr as datarow = datatables("库存").find("代码 = \'"& str1 &"\' and 颜色 = \'"& str2 &"\'") if dr isnot nothing then 当前行的库存量 = dr("库存量") end if |
||||
-- 作者:xyw04 -- 发布时间:2013/3/23 10:28:00 -- 当前行的库存量 = dr("库存量") 语法错误
当前库存量:控件 "Label_kcsl" |
||||
-- 作者:xyw04 -- 发布时间:2013/3/23 10:32:00 -- Dim str1,str2 As String str1 = "Label_spdm" str2 = "ComboBox_ysfl" Dim dr As DataRow = DataTables("库存明细表").find("商品代码 = \'"& str1 &"\' and 颜色分类 = \'"& str2 &"\'") If dr IsNot Nothing Then e.Form.Controls("Label_kcsl").Text = dr("库存数量") End If
ComboBox_ysfl 改变后,不执行
|
||||
-- 作者:唐尸三摆手 -- 发布时间:2013/3/23 10:35:00 -- \'窗口增加一个按钮,代码如下
Dim str1,str2 As String |
||||
-- 作者:xyw04 -- 发布时间:2013/3/23 10:46:00 -- ComboBox_ysfl 不属于 label 公共成员 |
||||
-- 作者:xyw04 -- 发布时间:2013/3/23 10:52:00 -- 感谢 muhua ,不仅仅帮我解答了问题,还在问题上,更加完善! 谢谢 |