- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- [求助]序列填充相关 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=100939)
-- 发布时间：2017/5/22 9:18:00
-- [求助]序列填充相关
此主题相关图片如下：11.jpg
在发票号码列输入一个8位数的号码，再在右边行数里输入多行点击序列填充时能增加相应的行数以及根据第一行的号码向下按序列填充
序列填充代码
此主题相关图片如下：1111.jpg
问题是新增是不会序列填充 帮看下是不是代码有问题
-- 发布时间：2017/5/22 10:24:00
--
?????
-- 发布时间：2017/5/22 10:40:00
--
Dim idx As Integer = val(Tables("表A").Rows(0)("第一列"))
msgbox(idx)
For i As Integer = 1 To 10
Dim nr As Row = Tables("表A").addnew
idx += 1
nr("第一列") = idx
Next