例如
窗口关闭前事件，下面标注颜色的已经在表事件里写过一遍了是，还在窗口中在写一遍？
If Tables("fa0101").Current.DataRow.RowState<>DataRowState.Unchanged Then
If MessageBox.Show("是否保存?","提示",MessageBoxButtons.YesNo,MessageBoxIcon.Information)=DialogResult.Yes Then
If Functions.Execute("DataColChanging",e)="Cancel" Then
e.Cancel=True
ElseIf Functions.Execute("DataColChanged",e)="Cancel" Then
e.Cancel=True
ElseIf Functions.Execute("BeforeSaveDataRow",e)="Cancel" Then
e.Cancel=True
ElseIf Functions.Execute("BeforeAddDataRow",e)="Cancel" Then
e.Cancel=True
ElseIf Functions.Execute("BeforeDeleteDataRow",e)="Cancel" Then
e.Cancel=True
End If
Tables("fa0101").Current.Save
Else
e.Cancel=True
End If
End If
Tables("fa0101").AllowEdit=False
newformenable=True
sh
加好友 
发短信
Post By：2018/6/30 11:09:00 [显示全部帖子]
