父表统计子表 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

如果数据没有全部加载需要使用sqlCompute统计的，新增的数据必须先保存

Select Case e.DataCol.Name
    Case "fa piao不含税金额","fa piao进项税额" ,"fa piao征税率","fa piao退税率"
        Dim pr As DataRow
        Dim filter As String
        filter = "工作号 = '" & e.DataRow("工作号") & "' And 报关单项号 = '" & e.DataRow("报关单项号") & "' And 工厂编号= '" & e.DataRow("客户ID") & "'"
        pr = DataTables("采购信息").sqlFind(Filter)
        If pr IsNot Nothing Then

e.DataRow.save
            DataTables("采购信息").DataCols("工作号").RaiseDataColChanged(pr)
            DataTables("采购信息").DataCols("报关单项号").RaiseDataColChanged(pr)
           DataTables("采购信息").DataCols("工厂编号").RaiseDataColChanged(pr)

        End If
End Select

主题：父表统计子表