以文本方式查看主题 -  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp) --  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2) ----  多个表其中的一个数据有改动不能退出  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=184874)

--  作者：青丘狐 --  发布时间：2023/1/12 10:32:00 --  多个表其中的一个数据有改动不能退出 If DataTables("入库").HasChanges Then      If DataTables("入库明细码单").HasChanges Then          If DataTables("入库明细").HasChanges Then             If MessageBox.Show("尚未保存数据，确定退出吗？", "提示", MessageBoxButtons.YesNo, MessageBoxIcon.Question) = DialogResult.Yes Then                 e.Form.Close             End If          End If     End If End If 退出按钮 多个表其中的一个数据有改动不能退出，保存后才能退出，请问怎样改代码 [此贴子已经被作者于2023/1/12 10:32:24编辑过]

--  作者：有点蓝 --  发布时间：2023/1/12 10:34:00 --   If DataTables("入库").HasChanges orelse DataTables("入库明细码单").HasChanges orelse ........ Then              If MessageBox.Show("尚未保存数据，确定退出吗？", "提示", MessageBoxButtons.YesNo, MessageBoxIcon.Question) = DialogResult.Yes Then                 e.Form.Close             End If  End If

--  作者：青丘狐 --  发布时间：2023/1/12 10:51:00 --   If DataTables("入库").HasChanges OrElse DataTables("入库明细").HasChanges OrElse DataTables("入库明细码单").HasChanges Then      If MessageBox.Show("尚未保存数据，确定退出吗？", "提示", MessageBoxButtons.YesNo, MessageBoxIcon.Question) = DialogResult.Yes Then         e.Form.Close     End If  End If 之前用AND连接不成功 可以了谢谢老师 [此贴子已经被作者于2023/1/12 10:53:07编辑过]

--  作者：有点蓝 --  发布时间：2023/1/12 10:56:00 --   把基础学好：http://www.foxtable.com/webhelp/topics/0220.htm