以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  克隆表中行数据时，软件自行退出,不知何故？  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=150142)
--  作者：dyzkdxy
--  发布时间：2020/5/22 2:26:00
--  克隆表中行数据时，软件自行退出,不知何故？
通过菜单操作或编写代码，克隆表中行数据时，软件自行退出,不知何故？但对其他表克隆行都正常。
把该表改名复制成另一个表时，通过菜单操作或编写代码都可以正常克隆行，是不是我在原表中设置了该表行数据不能重复的原因（时间久，记不清了是否设置了该限制）？如设置了，在哪里可取消这个限制？
  以下下2中代吗运行，都是软件自行退出：
1、通过设置按钮事件：Tables("订单").Current.Clone()

2、在订单表中的DataRowAdding代码如下：

If e.DataTable.DataRows.Count = 0 Then \'如果是一个空表
    Return \'那么返回
Else
      Dim dr As DataRow = e.DataTable.DataRows(e.DataTable.DataRows.Count - 1) \'获得最后一行
      For Each ColName As String In ColNames
            e.DataRow(ColName) = dr(ColName) \'将最后一行的内容复制到新增行中.
      Next
   End If
End If
--  作者：有点蓝
--  发布时间：2020/5/22 8:45:00
--  
把订单表所有表事件都注释掉，测试有没有问题？如果没有问题，再一一开启表事件，看是和哪个事件有冲突