主题：关联表编号列名不同，要自动带出编号数据

 您好！

     关联表父表（总计划布料需求汇总表）的列名是（布料编号），子表（总计划布料需求1）的列名是（布料编号1）。但是在子表输入编号后，主表不能自动带出编号，不知道哪一个关节填错了？谢谢！

If e.DataCol.Name = "布料编号1"  Then
    If e.DataRow.IsNull("布料编号1") = False
        e.DataRow("已裁数1") = DataTables("总计划布料需求1").Compute("sum(已裁数1)","布料编号1='" & e.NewValue & "'")
    End If
End If

If e.DataCol.Name = "布料编号"  Then
    If e.DataRow.IsNull("布料编号") = False
        Dim dr As DataRow = DataTables("总计划布料需求汇总表").Find("布料编号='" & e.NewValue & "'")
        If dr Is Nothing Then
            dr = DataTables("总计划布料需求汇总表").AddNew
            dr("布料编号") = e.NewValue
        End If
        DataTables("总计划布料需求汇总表").DataCols("布料编号").RaiseDataColChanged(dr)
    End If
ElseIf e.DataCol.Name = "已裁数1"  Then
    Dim dr As DataRow = DataTables("总计划布料需求汇总表").Find("布料编号='" & e.DataRow("布料编号")  & "'")
    If dr IsNot Nothing Then
        DataTables("总计划布料需求汇总表").DataCols("布料编号").RaiseDataColChanged(dr)
    End If
End If