以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [讨论]通过按钮新增行，如何使新增首行的时候不跳出对话框？  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=74318)
--  作者：twef
--  发布时间：2015/9/8 13:38:00
--  [讨论]通过按钮新增行，如何使新增首行的时候不跳出对话框？

通过按钮新增首行的时候跳出对话框，如何使新增首行的时候不跳出对话框？

With Tables("项目情况登记表")
    If .Current Is Nothing OrElse .Current.DataRow.RowState = DataRowState.Unchanged Then \'如果当前行未曾修改
        Tables("项目情况登记表").AddNew()
    Else
        MessageBox.Show("当前数据已修改,请先保存!")
    End If
End With

不知道如何修改代码？

[此贴子已经被作者于2015/9/8 14:00:38编辑过]
--  作者：大红袍
--  发布时间：2015/9/8 14:10:00
--  

代码本身就没问题。
--  作者：大红袍
--  发布时间：2015/9/8 14:13:00
--  

弹出对话框，说明你表格当前行的数据已修改，且没有保存
--  作者：twef
--  发布时间：2015/9/8 14:13:00
--  

点击按钮，新增第一行时会跳出“当前数据已修改,请先保存！”这个对话框，新增第二行的时候就不会出现。如何使新增第一行的时候不要跳出对话框？原表格是空表，没有行，怎么可能有未保存的数据

[此贴子已经被作者于2015/9/8 14:16:05编辑过]
--  作者：大红袍
--  发布时间：2015/9/8 14:25:00
--  

你的表是不是窗口表，副本表？

 

只有一种可能，就是你表名写错了。

 

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