多个表其中的一个数据有改动不能退出 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 多个表其中的一个数据有改动不能退出

共有5264人关注过本帖树形打印复制链接主题：多个表其中的一个数据有改动不能退出

青丘狐

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：小狐帖子：348 积分：2679 威望：0 精华：0 注册：2018/11/11 15:52:00

多个表其中的一个数据有改动不能退出 发帖心情

Post By：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

退出按钮多个表其中的一个数据有改动不能退出，保存后才能退出，请问怎样改代码

[此贴子已经被作者于2023/1/12 10:32:24编辑过]

有点蓝

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：超级版主帖子：111393 积分：567029 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：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

青丘狐

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：小狐帖子：348 积分：2679 威望：0 精华：0 注册：2018/11/11 15:52:00

Post By：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

之前用AND连接不成功可以了谢谢老师

[此贴子已经被作者于2023/1/12 10:53:07编辑过]

有点蓝

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：超级版主帖子：111393 积分：567029 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2023/1/12 10:56:00 [只看该作者]

主题：多个表其中的一个数据有改动不能退出