If DataTables("物料信息表").HasChanges ThenIf MessageBox.Show("物料信息表已经被修改,是否保存","提示",MessageBoxButtons.YesNo,MessageBoxIcon.Question)=DialogResult.Yes Then DataTables("物料信息表").saveEnd If
End IfForms("物料信息表").close