以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  Identify列的问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=9019)
--  作者：yuemiao816
--  发布时间：2011/1/18 14:08:00
--  Identify列的问题
我在项目中建了一个IDENTIFY列，但是发现个问题不知道怎么解决，比如设置好IDENTIFY列，编号数字也出来了，以1~8行为例，我去掉了第七行，那现在编号数字就是1234568了，没有7了，怎么做可以使我删掉第7行的时候，第8行提上来以后，数字8自动变为7来填补呢？
[此贴子已经被作者于2011-1-18 14:10:16编辑过]
--  作者：czy
--  发布时间：2011/1/18 15:10:00
--  

只能写代码了。

如在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
--  作者：狐狸爸爸
--  发布时间：2011/1/18 15:31:00
--  

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

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