Foxtable(狐表)用户栏目专家坐堂 → 合计


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

主题:合计

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


加好友 发短信
等级:六尾狐 帖子:1470 积分:8981 威望:0 精华:0 注册:2013/10/24 9:12:00
合计  发帖心情 Post By:2014/5/14 16:55:00 [只看该作者]

    Dim f As New Filler
    f.SourceTable = DataTables("收购")
    f.SourceCols = "单价"
    f.DataTable = DataTables("验收单")
    f.DataCols = "单价"
    f.ExcludeExistValue = True
    f.Fill()
    For Each dr As DataRow In DataTables("验收单").DataRows
        Dim s1 As Object = "单价 = '" & dr("单价") & "'"
        dr("头数") = DataTables("收购").Compute("Sum(头数)",s1)
        dr("重量") = DataTables("收购").Compute("Sum(重量)",s1)
        dr("收购金额") = DataTables("收购").Compute("Sum(收购金额)",s1)
        dr("piao据张数") = DataTables("收购").Compute("Sum(piao据张数)",s1)
        dr("收购金额") = round2(dr("收购金额"),2)       
    Next


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


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2014/5/14 16:56:00 [只看该作者]

你的问题是什么?

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


加好友 发短信
等级:六尾狐 帖子:1470 积分:8981 威望:0 精华:0 注册:2013/10/24 9:12:00
  发帖心情 Post By:2014/5/14 16:57:00 [只看该作者]

为什么收购金额会出现错误,重量:7240  单价:6.8   金额:49232.01,为什么金额会多0.01?

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


加好友 发短信
等级:六尾狐 帖子:1470 积分:8981 威望:0 精华:0 注册:2013/10/24 9:12:00
  发帖心情 Post By:2014/5/14 16:58:00 [只看该作者]

其中收购金额是收购表中重量*单价

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


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2014/5/14 17:00:00 [只看该作者]

用高精度小数.

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


加好友 发短信
等级:六尾狐 帖子:1470 积分:8981 威望:0 精华:0 注册:2013/10/24 9:12:00
  发帖心情 Post By:2014/5/14 17:14:00 [只看该作者]

谢了!

 回到顶部