通过菜单操作或编写代码，克隆表中行数据时，软件自行退出,不知何故？但对其他表克隆行都正常。把该表改名复制成另一个表时，通过菜单操作或编写代码都可以正常克隆行，是不是我在原表中设置了该表行数据不能重复的原因（时间久，记不清了是否设置了该限制）？如设置了，在哪里可取消这个限制？
以下下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
加好友 
发短信
Post By：2020/5/22 2:26:00 [显示全部帖子]
