以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  Dim r As Row = Tables("组化推论主表").AddNew() 如何在流程上增加确认和取消  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=171572)

--  作者:xa139
--  发布时间:2021/9/3 14:27:00
--  Dim r As Row = Tables("组化推论主表").AddNew() 如何在流程上增加确认和取消
使用 Dim r As Row = Tables("组化推论主表").AddNew() 增加一行
如何增加 确认保存 和 取消功能,主表和子表可同事取消新增和修改,并且主表和子表取消后能同时删除


--  作者:有点蓝
--  发布时间:2021/9/3 14:51:00
--  
If DataTables("组化推论主表").HasChanges Then
    If 
MessageBox.Show("产品表已经被修改,是否取消更改?""提示", MessageBoxButtons.YesNo, MessageBoxIcon.Question) = DialogResult.Yes Then
        DataTables
("
组化推论主表").RejectChanges()
        DataTables("组化推论子表").RejectChanges()
    End
 If
End
 
If