主题：Identify列的问题

我在项目中建了一个IDENTIFY列，但是发现个问题不知道怎么解决，比如设置好IDENTIFY列，编号数字也出来了，以1~8行为例，我去掉了第七行，那现在编号数字就是1234568了，没有7了，怎么做可以使我删掉第7行的时候，第8行提上来以后，数字8自动变为7来填补呢？

只能写代码了。

如在DataRowAdded事件代码设置代码
e.DataRow("Identify") = DataTables("表A").Compute("Max(Identify)")+1

 

在DataRowDeleted事件中设计

Dim i As Integer
For Each dr As DataRow In DataTables("表A").DataRows
    i = i + 1
    dr("Identify") = i
Next

不要追求编号的连续，编号是行的身份标记，不能因为某行被删除，就修改其他行的编号。

再说连续有何意义呢？ Foxtable不是已经有行号列了吗？