Foxtable(狐表)用户栏目专家坐堂 → [求助]动态表达式数字参数总出错


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

主题:[求助]动态表达式数字参数总出错

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


加好友 发短信
等级:四尾狐 帖子:820 积分:5641 威望:0 精华:1 注册:2015/11/28 14:00:00
[求助]动态表达式数字参数总出错  发帖心情 Post By:2016/8/27 15:58:00 [只看该作者]

 Dim idiord As List(of String)
        Dim ez As Integer
        If e.NewValue Is Nothing Then
            ez = -1
        Else
            ez = e.NewValue 
        End If
        idiord = DataTables("tabDIYTable29").GetValues("iOrd","ID =  ez")
        If idiord.Count = 1 Then
            Dim dr As DataRow = DataTables("tabDIYTable29").Find("ID =  ez")
            e.DataRow("仓库名称") = dr("F160")
            e.DataRow("现有库存") = dr("F162")
            e.DataRow("最近入库日期") = dr("F166")
            e.DataRow("最近出库日期") = dr("F165")
            e.DataRow("最低库存") = dr("F2429")
            e.DataRow("最高库存") = dr("F2430")
            Dim zxr As Date = dr("F165")
            If zxr.AddDays(93) < Date.Today Then
                e.DataRow("销售状态") = ""
            Else
                e.DataRow("销售状态") = "滞销"
            End If
        Else If idiord.Count > 1 Then
           
        Else
        End If
这句idiord = DataTables("tabDIYTable29").GetValues("iOrd","ID =  ez")中表达式总出错,求指点。

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


加好友 发短信
等级:狐神 帖子:5015 积分:25363 威望:0 精华:0 注册:2015/8/18 9:21:00
  发帖心情 Post By:2016/8/27 16:25:00 [只看该作者]

idiord = DataTables("tabDIYTable29").GetValues("iOrd","ID =  '" & ez)

Dim dr As DataRow = DataTables("tabDIYTable29").Find("ID =  '" & ez)

 回到顶部