[已解决]用表达式还是代码？有点难！ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

If e.DataCol.name="生产日期" Then
    If e.DataRow.IsNull("单号")=False AndAlso e.DataRow.IsNull("工序")=False Then
        Dim d1 As Date = e.DataTable.Compute("max(生产日期)","单号='" & e.DataRow("单号") & "' and 工序='" & e.DataRow("工序") & "'")
        Dim d2 As Date =e.DataTable.Compute("min(生产日期)","单号='" & e.DataRow("单号") & "' and 工序='" & e.DataRow("工序") & "'")
        If d1 <> d2 Then
            If e.DataRow("生产日期") = d1 Then
                e.DataRow("滞留天数")=(d1-d2).Totaldays
            End If
        Else
            e.DataRow("滞留天数") = Nothing
        End If
    End If
End If

主题：[已解决]用表达式还是代码？有点难！