主题：表间数据传递问题

我想在表B删除行时将表B[分段明细]列最后一行数据传递到表A的[库存分段]列，谁帮我看一下表B删除行的代码。

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:管理项目1.foxdb

 DataRowDeleting事件，加入如下代码，删除原本的代码

Dim dr As DataRow =e.DataRow.GetParentRow("表A")
If dr IsNot Nothing Then
    Dim fdr As DataRow = e.DataTable.Find("第二列 = '" & e.DataRow("第二列") & "' and 明细分段 is not null and _Identify <> " & e.DataRow("_Identify"), "_sortkey desc")
    If fdr IsNot Nothing Then
        dr("库存分段") = fdr("明细分段")
    End If
End If