主题：跨表统计+时间条件

If e.DataCol.Name = "产品" Then '发生变化的是产品列。
    '则累计订单表中同名产品总的销售量，然后赋值给变动行的数量列
    e.DataRow("数量") = DataTables("订单").Compute("Sum(数量)","[产品] = '" & e.NewValue & "'")
End If