主题：求助：某列改变后，期待能够执行该列值进行对比查找数据。

Select Case e.DataCol.Name

    Case "年月日"

        e.DataRow("应收")=  Format(DataTables("消费明细").Compute("sum(累计消费)","消费时间 >= #" & Date.Today & " 00:00:00#  and 消费时间<= #" & Date.Today & " 23:59:59#"),"f")

        e.DataRow("人数")= DataTables("消费信息").Compute("sum(就餐人数)","就餐时间 >= #" & Date.Today & " 00:00:00#  and 就餐时间<= #" & Date.Today & " 23:59:59#")

        e.DataRow("实收")= Format(DataTables("结账登记").Compute("sum(消费金额)","结账时间 >= #" & Date.Today & " 00:00:00#  and 结账时间<= #" & Date.Today & " 23:59:59#"),"f")

       

End Select