以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  自动编号  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=81580)
--  作者：kaituozhe
--  发布时间：2016/3/1 16:16:00
--  自动编号
帮助中的编号是按分类、日期、月份编号的，我想要最简单的编号就是按表的顺序编号，但是在顺序调整后编号也能自动调整？代码怎么写？
--  作者：大红袍
--  发布时间：2016/3/1 16:21:00
--  

你直接用行号做顺序号不就行了？

 

增加行事件

e.DataRow("第一列") = e.DataTable.datarows.count

 

重新生成

 

For Each r As Row In Tables("表A").rows
    r("第一列") = r.index + 1
Next
--  作者：kaituozhe
--  发布时间：2016/3/1 16:31:00
--  

For Each r As Row In Tables("表A").rows
    r("第一列") = r.index + 1
Next

 

以上代码应该是那个事件中
--  作者：大红袍
--  发布时间：2016/3/1 16:45:00
--  
以下是引用kaituozhe在2016/3/1 16:31:00的发言：

For Each r As Row In Tables("表A").rows
    r("第一列") = r.index + 1
Next

 

以上代码应该是那个事件中

 

单独做一个按钮，可以重新生成。

 

增加行事件，写下面代码

 

e.DataRow("第一列") = e.DataTable.datarows.count