Foxtable(狐表)用户栏目专家坐堂 → 求助(多条件判断引用)


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

主题:求助(多条件判断引用)

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


加好友 发短信
等级:幼狐 帖子:104 积分:1044 威望:0 精华:0 注册:2015/2/9 21:01:00
求助(多条件判断引用)  发帖心情 Post By:2017/11/20 21:19:00 [显示全部帖子]

有2个表, 一个单价表,一个销售表
想在销售表里输入客户,地方,数量,自动从单价表里找到数量在期初数量和限定数量之间的单价填入销售表的单价里
因为多了条件判断,实在写不出代码
我本身写的是:
Dim dr As DataRow = e.DataRow
Select Case e.DataCol.name
    Case "客户","客户","地方","数量"
        If dr.Isnull("客户") OrElse dr.Isnull("客户") OrElse dr.Isnull("地方") OrElse dr.Isnull("数量") Then
            dr("单价") = Nothing
        Else
            Dim pr As DataRow
            pr = DataTable("单价").find("客户 = '" & dr("客户") &"'" AndAlso "客户 = '" & dr("客户") &"'" AndAlso dr("数量") >= dr(DataTables("单价").DataRows("期初数量")) AndAlso dr("数量") < dr(DataTables("单价").DataRows("限定数量")))
            dr("单价") = pr("单价")
        End If
End Select


显示出错,datatable不能用表达式

疯了1天了!求帮助
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.foxdb


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


加好友 发短信
等级:幼狐 帖子:104 积分:1044 威望:0 精华:0 注册:2015/2/9 21:01:00
  发帖心情 Post By:2017/11/21 9:09:00 [显示全部帖子]

非常感谢!

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


加好友 发短信
等级:幼狐 帖子:104 积分:1044 威望:0 精华:0 注册:2015/2/9 21:01:00
  发帖心情 Post By:2017/11/21 10:07:00 [显示全部帖子]

   麻烦再问下,这行最后为什么不加上 &” ?         pr = DataTables("单价").find("客户 = '" & dr("客户") & "' and 地方 =  '" & dr("地方") & "' and 期初数量  <= " &  dr("数量") & " and 限定数量 > " & dr("数量"))
加上后提示表达式出错  pr = DataTables("单价").find("客户 = '" & dr("客户") & "' and 地方 =  '" & dr("地方") & "' and 期初数量  <= " &  dr("数量") & " and 限定数量 > " & dr("数量") & ”)

这是为什么?

 回到顶部