以文本方式查看主题 -  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp) --  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2) ----  [求助]序号一键刷新  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=169993)

--  作者：Cloud --  发布时间：2021/7/8 17:07:00 --  [求助]序号一键刷新 求大神指点：                For Each cl As Col In CurrentTable.Cols     Dim r1 As Row = CurrentTable.Current     CurrentTable.Position = CurrentTable.Position + 1     CurrentTable.Current("序号") =r1("序号") + 1 Next    用了这一段代码可以按一次刷新多行，但是不能将整个表的所有行都刷新，最多刷新32行，这是咋回事。求解                             谢谢

--  作者：有点蓝 --  发布时间：2021/7/8 17:29:00 --   for i as integer = 0 to CurrentTable.rows.count - 1 CurrentTable.rows(i)("序号") = i+1 next

--  作者：Cloud --  发布时间：2021/7/8 17:31:00 --   谢谢