主题：汇总表压铸列公式如何设才能根据在损耗率计算窗口录入日期后

汇总表压铸列代码如何设才能根据在损耗率计算窗口的日期进行计算，

If e.DataCol.Name = "产品名称" Then
    Dim dr As DataRow = e.DataRow
    Dim dt As DataTable = DataTables("周转卡明细")
    dr("压铸") = dt.Compute("Sum(压铸良品数)","[产品名称] = '" & dr("产品名称") & "'")
End If

在dr("压铸") = dt.Compute("Sum(压铸良品数)","[产品名称] = '" & dr("产品名称") & "'")加多两个日期时间条件老是出错

多谢版主