主题：跨表月份的获取？？

http://www.foxtable.com/help/topics/0681.htm

datacolchanged事件

If e.DataCol.Name = "客户" Then
    Dim d As Date = new Date(Date.Today.Year, 1, 1)
    e.DataRow("一月_销售") = DataTables("明细").Compute("sum(销售金额)", "日期 >= #" & d & "# and 日期 < #" & d.AddMonths(1) & "# and 客户 = '" & e.DataRow("客户") & "'")
    e.DataRow("一月_付款") = DataTables("明细").Compute("sum(付款金额)", "日期 >= #" & d & "# and 日期 < #" & d.AddMonths(1) & "# and 客户 = '" & e.DataRow("客户") & "'")
    e.DataRow("二月_销售") = DataTables("明细").Compute("sum(销售金额)", "日期 >= #" & d.AddMonths(1) & "# and 日期 < #" & d.AddMonths(2) & "# and 客户 = '" & e.DataRow("客户") & "'")
    e.DataRow("二月_付款") = DataTables("明细").Compute("sum(付款金额)", "日期 >= #" & d.AddMonths(1) & "# and 日期 < #" & d.AddMonths(2) & "# and 客户 = '" & e.DataRow("客户") & "'")
End If