Foxtable(狐表)用户栏目专家坐堂 → 请高手帮我看一下,这段代码哪里有错误。


  共有4011人关注过本帖平板打印复制链接

主题:请高手帮我看一下,这段代码哪里有错误。

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


加好友 发短信
等级:二尾狐 帖子:529 积分:3605 威望:0 精华:0 注册:2011/10/11 17:20:00
  发帖心情 Post By:2014/2/26 16:00:00 [只看该作者]

If Tables("成本核算表").Rows("订单数量") < Tables("成本核算表").Rows("面料_附加费下限") Or Tables("成本核算表").Rows("订单数量") = Tables("成本核算表").Rows("面料_附加费下限") Then
    Tables("成本核算表").Rows("单价") = Tables("成本核算表").Rows("面料_供应商报价") + Tables("成本核算表").Rows("面料_放样费")+Tables("成本核算表").Rows("面料_小缸费")+Tables("成本核算表").Rows("面料_描稿费")+Tables("成本核算表").Rows("面料_开版费")
ElseIf Tables("成本核算表").Rows("订单数量") > Tables("成本核算表").Rows("面料_附加费下限") Or Tables("成本核算表").Rows("订单数量") < Tables("成本核算表").Rows("面料_附加费上限") Or Tables("成本核算表").Rows("订单数量") = Tables("成本核算表").Rows("面料_附加费上限")    Then
    Tables("成本核算表").Rows("单价") = Tables("成本核算表").Rows("面料_供应商报价") + Tables("成本核算表").Rows("面料_放样费")+Tables("成本核算表").Rows("面料_描稿费")+Tables("成本核算表").Rows("面料_开版费")
Else
     Tables("成本核算表").Rows("单价") = Tables("成本核算表").Rows("面料_供应商报价")
End If

那这样写,怎么还是出错啊。

长时间没有用,很多都忘记了。

狐狸爸爸,各为高手,帮我看一下!谢谢


 回到顶部
总数 19 1 2 下一页