Foxtable(狐表)用户栏目专家坐堂 → [求助]序列填充相关


  共有1891人关注过本帖树形打印复制链接

主题:[求助]序列填充相关

帅哥哟,离线,有人找我吗?
allenyen
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:97 积分:1341 威望:0 精华:0 注册:2012/12/30 12:52:00
[求助]序列填充相关  发帖心情 Post By:2017/5/22 9:18:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下:11.jpg
图片点击可在新窗口打开查看


在fa piao号码列输入一个8位数的号码,再在右边行数里输入多行点击序列填充时能增加相应的行数以及根据第一行的号码向下按序列填充

 

序列填充代码


图片点击可在新窗口打开查看此主题相关图片如下:1111.jpg
图片点击可在新窗口打开查看

 

问题是新增是不会序列填充  帮看下是不是代码有问题


 回到顶部
帅哥哟,离线,有人找我吗?
allenyen
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:97 积分:1341 威望:0 精华:0 注册:2012/12/30 12:52:00
  发帖心情 Post By:2017/5/22 10:24:00 [只看该作者]

?????

 回到顶部
帅哥哟,离线,有人找我吗?
有点色
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By: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


 回到顶部