有两张表

销售单——销售明细单

以单据编号建立关联，同时设置了同步更新、同步删除。

在窗口中进行操作，

窗口打开的时候，自动为销售单增加一个新行，

代码如下：

Tables("销售单").AddNew()

如果没有输入完毕就点击关闭按钮，那么本行将不会加入到销售单中。

关闭按钮如下：

 Case "btngb"
        Dim Result As DialogResult
        If Tables("销售单").Current.DataRow.RowState = DataRowState.Unchanged
            e.Form.Close
        Else
            Result = MessageBox.Show("该条记录没有保存,是否放弃?", "提示", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
            If Result = DialogResult.no Then
                Return
            End If
            Tables("销售单").Current.Reject()
            e.Form.Close
        End If
以上操作部分正常。

但是如果，点击明细表为明细表增加一个明细后，没有保存直接关闭，那么会出现这样的结果

销售单刚刚增加的这行没有加入（正确）

销售明细单的数据已经加入到销售明细单中了（错误）

不能实现删除同步删除关联行的功能，请大家帮助

Tables("销售单").Current.Reject()

改为：

Tables("销售单").Current.Delete