以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  关闭窗口提示保存怎样做得到  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=140345)
--  作者：system1977
--  发布时间：2019/9/3 21:11:00
--  关闭窗口提示保存怎样做得到
1、使用录入窗口录入数据，点击关闭窗口的时候判断表内容有没有被修改，有修改则提示保存，没变动直接关闭窗口
2、设置一个按钮，能撤消此次保存前录入的所有数据？
--  作者：有点蓝
--  发布时间：2019/9/3 21:46:00
--  
窗口BeforeClose事件

If DataTables("AA").HasChanges Then
    If MessageBox.Show("保存?", "提示", MessageBoxButtons.YesNo, MessageBoxIcon.Question) = DialogResult.Yes  Then
        DataTables("AA").save
    Else
        DataTables("AA").RejectChanges
    End If
End If

HasChanges逻辑型，判断DataTable的数据是否已经被修改
RejectChanges撤销自打开文件或最近一次保存以来，对该表做出的修改。
--  作者：system1977
--  发布时间：2019/9/4 11:36:00
--  
谢啦！！！！！！！！！！！！！