主题：[求助]请问怎么在表内统计款数

DatacolChanged事件

Select Case e.DataCol.name
    Case "订单号"
        Dim filter As String = "订单号 = '" & e.DataRow("订单号") & "'"
        Dim sum1 As Double = e.DataTable.Compute("count(订单号)", filter)
        e.DataTable.ReplaceFor("款数",sum1,filter)
        filter = "订单号 = '" & e.oldvalue & "'"
        sum1 = e.DataTable.Compute("count(订单号)", filter)
        e.DataTable.ReplaceFor("款数",sum1,filter)
End Select