Foxtable(狐表)用户栏目专家坐堂 → 字符串+数字,怎样做序列填充


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

主题:字符串+数字,怎样做序列填充

美女呀,离线,留言给我吧!
yfy13338431925
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:二尾狐 帖子:512 积分:4492 威望:0 精华:0 注册:2018/12/5 23:10:00
字符串+数字,怎样做序列填充  发帖心情 Post By:2020/5/30 17:33:00 [只看该作者]

蓝老师:
北山风景(1)
北山风景(2)
北山风景(3)
青芝山晚霞风光(1)
青芝山晚霞风光(2)
青芝山晚霞风光(3)
按钮怎样做序列填充?

[此贴子已经被作者于2020/5/30 17:35:01编辑过]

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


加好友 发短信
等级:超级版主 帖子:106665 积分:542508 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/5/30 17:38:00 [只看该作者]

dim s as string = "北山风景"
for i as integer = 1 to 3
    msgbox(s & "(" & i & ")")
next

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


加好友 发短信
等级:九尾狐 帖子:2199 积分:18081 威望:0 精华:0 注册:2011/11/26 20:21:00
  发帖心情 Post By:2020/5/30 20:02:00 [只看该作者]

e.table.sort = "A"
e.table.rows(0)("B") = e.table.rows(0)("A") & 1

dim k as integer = 0

if e.table.rows.count > 1 then
for i as integer = 2 to e.table.rows.count - 1 
if e.table.rows(i)("A") = e.table.rows(i-1)("A")  then 
K += 1
else
k = 1
end if 

e.table.rows(i)("B")  = e.table.rows(i)("A") & k
next
end if 

用do loop也可以
[此贴子已经被作者于2020/5/30 20:09:41编辑过]

 回到顶部