If DataTables("合同主表").HasChanges Or DataTables("合同明细").HasChanges Then
If MessageBox.Show("合同单已经被修改,是否保存?", "提示", MessageBoxButtons.YesNo, MessageBoxIcon.Question) = DialogResult.Yes Then
DataTables.Save()
e.form.close()
Else
If MessageBox.Show("您确定不保存!", "提示", MessageBoxButtons.YesNo, MessageBoxIcon.Question) = DialogResult.Yes Then
DataTables("合同主表").RejectChanges()
DataTables("合同明细").RejectChanges()
e.form.close()
End If
End If
Else
Forms("合同").close
End If
“合同“窗口是一个并列窗口，我在窗口的beforeclose事件中加入上面的代码，我点击并列窗口的x按钮，结果就把整个项目都给我关闭了，麻烦老师看一下是什么原因
加好友 
发短信
Post By：2018/12/10 14:11:00 [只看该作者]
