以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  序号请教  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=55321)
--  作者：hbhb
--  发布时间：2014/8/14 13:24:00
--  序号请教
大师：窗口中的按钮按一下增加一行，序号列自动增加序号为何不对？

Dim r As Row
Dim a As WinForm.Table = e.Form.Controls("Table1")
 r = a.Table.AddNew
r("序号") = "_Identify"
--  作者：lsy
--  发布时间：2014/8/14 13:43:00
--  
Dim r As Row
Dim a As WinForm.Table = e.Form.Controls("Table1")
 r = a.Table.AddNew
r("序号") = r("_Identify")
--  作者：hbhb
--  发布时间：2014/8/14 14:23:00
--  
谢谢！
为何不是从1开始增加，如何与行号相同
--  作者：Bin
--  发布时间：2014/8/14 14:26:00
--  
行号是会随着排序变的,不科学.

_Identify你删除了之后会继续删除之后的位置.   12 3 你删了3 再增加一行就是4了.
--  作者：有点甜
--  发布时间：2014/8/14 14:26:00
--  
以下是引用hbhb在2014-8-14 14:23:00的发言：
谢谢！
为何不是从1开始增加，如何与行号相同

 

Dim r As Row
Dim a As WinForm.Table = e.Form.Controls("Table1")
 r = a.Table.AddNew
r("序号") = r.Index + 1
--  作者：hbhb
--  发布时间：2014/8/14 14:30:00
--  
谢谢！