2、将窗口的BeforeClose事件代码设置为:
If Tables("员工").Current.DataRow.RowState <> DataRowState.Unchanged Then '如果当前行已经修改过 e.Cancel = TrueEnd If
上面的代