- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 有条件的列计算 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=92641)
-- 发布时间：2016/11/9 11:45:00
-- 有条件的列计算
此主题相关图片如下：微信截图_20161109111951.png
在表“应收记录”里面，具有相同的合同号，收租方式，收租月
然后10月、11月、12月对应的收租月都是09月，希望把10月、11月、12月这三行对应的租金加起来，写入到本期最近应收里面，如截图。
其他行的对应计算方式一样。
-- 发布时间：2016/11/9 12:27:00
--
Select Case e.DataCol.name
Case "收租月","本月租金"
If e.DataRow.IsNull("合同号") = False Then
Dim filter9 As String = "合同号=\'" & e.DataRow("合同号") & "\' and 收租月=\'" & e.DataRow("收租月") & "\'"
Dim sum As Double = e.DataTable.Compute("sum(本月租金)",filter9)
e.DataTable.ReplaceFor("本期应收合计",sum,filter9)
End If
End Select