以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  关于 DataColChanging 与 新增行的矛盾  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=58547)
--  作者：netfox168
--  发布时间：2014/10/18 23:09:00
--  关于 DataColChanging 与 新增行的矛盾
在表属性>事件>DataColChanging 编写以下代码：

If e.DataCol.Name = "作废" Then
    If MessageBox.Show("作废操作不可恢复 , 并会删除与此相关的记录 , 是否继续 ?","提示",MessageBoxButtons.YesNo,MessageBoxIcon.Question)=DialogResult.No
        e.Cancel = True
        Return
    Else
        其他代码...
    End If
End If

其中“作废”是逻辑列。原意是在勾选“作废”前给个提示，选择是或否。但在新增行时，这段代码同样被执行，原因是 “作废” 列在 “变动”。如何避免在新增行执行这段代码？
--  作者：y2287958
--  发布时间：2014/10/19 7:50:00
--  
判断一下行状态呗

e.DataRow.RowState <> DataRowState.Added
--  作者：有点甜
--  发布时间：2014/10/19 9:09:00
--  

 新增行代码改一下。

 

 SystemReady = False

 Tables("表A").AddNew

 SystemReady = True

 

 http://www.foxtable.com/help/topics/2218.htm