有两张表
销售单——销售明细单
以单据编号建立关联,同时设置了同步更新、同步删除。
在窗口中进行操作,
窗口打开的时候,自动为销售单增加一个新行,
代码如下:
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
以上操作部分正常。
但是如果,点击明细表为明细表增加一个明细后,没有保存直接关闭,那么会出现这样的结果
销售单刚刚增加的这行没有加入(正确)
销售明细单的数据已经加入到销售明细单中了(错误)
不能实现删除同步删除关联行的功能,请大家帮助