- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- [求助]请教关于统计的问题【已解决】 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=103388)
-- 发布时间：2017/7/6 22:00:00
-- [求助]请教关于统计的问题【已解决】
此主题相关图片如下：qq图片20170706215648.png
图中 红框内只统计当前客户ID一样的。不知道怎么写了
Dim dt As Date = Date.Now
Dim r2 As DataRow = DataTables("UserYE").Find("客户ID = \'" & e.DataRow("客户ID") & "\'")
If r2 IsNot Nothing Then
r2("客户余额") = DataTables("UserCK").Compute("Sum(存款金额)") - DataTables("订单表").Compute("Sum(金额)")
r2("更新日期") = dt
r2.Save
End If
[此贴子已经被作者于2017/7/6 23:18:57编辑过]
-- 发布时间：2017/7/6 22:22:00
--
麻烦有点色老师，帮忙看下~
-- 发布时间：2017/7/6 23:25:00
--
Dim dt As Date = Date.Now
Dim r2 As DataRow = DataTables("UserYE").Find("客户ID = \'" & e.DataRow("客户ID") & "\'")
If r2 IsNot Nothing Then
r2("客户余额") = DataTables("UserCK").Compute("Sum(存款金额)", "客户ID = \'" & e.DataRow("客户ID") & "\'") - DataTables("订单表").Compute("Sum(金额)","客户ID = \'" & e.DataRow("客户ID") & "\'")
r2("更新日期") = dt
r2.Save
End If