Foxtable(狐表)用户栏目专家坐堂 → [求助]缺少运算符


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

主题:[求助]缺少运算符

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


加好友 发短信
等级:幼狐 帖子:92 积分:1862 威望:0 精华:0 注册:2014/4/11 21:10:00
[求助]缺少运算符  发帖心情 Post By:2017/11/5 14:14:00 [只看该作者]

求助:
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:测试粘片基.foxdb

点 粘片基 后报错

错误所在事件:表,业务估价,DataColChanged
详细错误信息:
调用的目标发生了异常。
语法错误:“粘片基”运算符后缺少操作数。

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2017/11/5 21:20:00 [只看该作者]

Select Case e.DataCol.name
    Case "数量", "K数", "粘片基"
        Dim zpj As String = iif(e.DataRow("粘片基") = True, "粘片基", "")
        If zpj = "" Then
            e.DataRow("粘片基费") = Nothing
        Else
            Dim fdr1 As DataRow = DataTables("粘片基").find("盒子大小K <= " & e.DataRow("K数") & "", "盒子大小K desc")
            If fdr1 IsNot Nothing Then
                e.DataRow("粘片基费") = IIF(e.DataRow("数量")>fdr1("起订个数"),fdr1("开机费") + (e.DataRow("数量") - fdr1("起订个数")) * fdr1("单价"), fdr1("开机费"))
            End If
        End If
End Select

 


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


加好友 发短信
等级:幼狐 帖子:92 积分:1862 威望:0 精华:0 注册:2014/4/11 21:10:00
  发帖心情 Post By:2017/11/7 22:25:00 [只看该作者]

ok了,谢谢老师

 回到顶部