Foxtable(狐表)用户栏目专家坐堂 → 产品条件,判断库存! 代码报错,郁闷


  共有7306人关注过本帖树形打印复制链接

主题:产品条件,判断库存! 代码报错,郁闷

帅哥哟,离线,有人找我吗?
xyw04
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:61 积分:501 威望:0 精华:0 注册:2013/2/26 0:51:00
产品条件,判断库存! 代码报错,郁闷  发帖心情 Post By:2013/3/20 7:38:00 [只看该作者]

表A 商品代码= 控件 商品代码

表A 颜色分类= 控件 颜色分类

以上符合,

 

在 Label_kcsl 显示符合库存数量!

 

Dim dr As DataRow
dr = DataTables("表A").Find("商品代码 = '" & e.Form.Controls("Label_spdm").value & "' And 颜色分类 = '" & e.Form.Controls("ComboBox_ysfl").value & " '")
If dr Is Nothing Then
    e.Form.Controls("Label_kcsl").Text = dr("库存数量")
End If


 回到顶部
帅哥哟,离线,有人找我吗?
muhua
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:等待验证 帖子:3855 积分:20692 威望:0 精华:5 注册:2012/6/21 14:03:00
  发帖心情 Post By:2013/3/20 8:13:00 [只看该作者]

用户已被锁定

 回到顶部
帅哥哟,离线,有人找我吗?
xyw04
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:61 积分:501 威望:0 精华:0 注册:2013/2/26 0:51:00
  发帖心情 Post By:2013/3/20 9:50:00 [只看该作者]

不知道, 怎么搞的!!! 麻烦
图片点击可在新窗口打开查看此主题相关图片如下:qq截图20130320094907.png
图片点击可在新窗口打开查看

 回到顶部
帅哥哟,离线,有人找我吗?
xyw04
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:61 积分:501 威望:0 精华:0 注册:2013/2/26 0:51:00
  发帖心情 Post By:2013/3/20 9:51:00 [只看该作者]

将 ComboBox_ysfl  改成 控件 Label_ysfl 也是 同样的提示!!

 

是不是 代码 表达错了!


 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47448 积分:251054 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2013/3/20 10:02:00 [只看该作者]

根据错误提示和控件名称,你的Label_spdm可能是Label控件,Label控件没有Value属性的,只有Text属性。
 
 
Dim dr As DataRow
dr = DataTables("表A").Find("商品代码 = '" & e.Form.Controls("Label_spdm").Text & "' And 颜色分类 = '" & e.Form.Controls("ComboBox_ysfl").value & "'")
If dr Is Nothing Then
    e.Form.Controls("Label_kcsl").Text = dr("库存数量")
End If
 
 

 回到顶部
帅哥哟,离线,有人找我吗?
xyw04
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:61 积分:501 威望:0 精华:0 注册:2013/2/26 0:51:00
  发帖心情 Post By:2013/3/20 10:14:00 [只看该作者]

Dim dr As DataRow
dr = DataTables("表A").Find("商品代码 = '" & e.Form.Controls("Label_spdm").Text & "' And 颜色分类 = '" & e.Form.Controls("ComboBox_ysfl").value & "'")
If dr Is Nothing Then
    e.Form.Controls("Label_kcsl").Text = dr("库存数量")
End If

 

这段代码,有问题, 表达不出来。。  学艺不精……  请狐爸指点.

 

表A 商品代码= 控件 商品代码

表A 颜色分类= 控件 颜色分类

以上符合,

在 Label_kcsl 显示符合库存数量!

 

最后,放在 哪个控件上,比较合适? 还是全局窗口事件


 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47448 积分:251054 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2013/3/20 10:20:00 [只看该作者]

直接做个例子发上来,设计好表,输入几行数据,设计好窗口,写好自己能写的代码,然后说明自己的目的是什么,遇到了什么问题。

 

你现在这样提问,我们想帮你也无从下手的哦


 回到顶部