有生产涂布不良记录表、生产复卷不良记录表、生产统计表,生产统计表不能更新数据:在生产统计表输入工单号后,能把生产涂布不良记录表、生产复卷不良记录表两表数据相加,但更改生产涂布不良记录表、生产复卷不良记录表数据时,生产统计表就不能自动更新了If e.DataCol.Name = "工单号" Then
Dim Filter As String = "[工单号] = '" & e.NewValue & "'"
e.DataRow("坑点") = DataTables("生产涂布不良记录表").Compute("Sum(坑点)", Filter) + DataTables("生产复卷不良记录表").Compute("Sum(坑点)", Filter)
e.DataRow("黑点") = DataTables("生产涂布不良记录表").Compute("Sum(黑点)", Filter) + DataTables("生产复卷不良记录表").Compute("Sum(黑点)", Filter)
End If