Foxtable(狐表)用户栏目专家坐堂 → 请问如何对文本字符的数字后缀做自增长?


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

主题:请问如何对文本字符的数字后缀做自增长?

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


加好友 发短信
等级:三尾狐 帖子:780 积分:5756 威望:0 精华:0 注册:2012/10/21 7:57:00
请问如何对文本字符的数字后缀做自增长?  发帖心情 Post By:2015/12/22 14:42:00 [只看该作者]

有个文本字段 里面记录了文本+数字

例如: ST09240    BUD329001     CFC2389之类的

(字符前缀无长度规律,数字也无长度规律)

请教,如何能让其按数字后缀自增长?

即:ST09240 --> ST09241    ST09242...

     BUD329001 --> BUD329002  BUD329003...

     CFC2389 --> CFC2390  CFC2391....

 

请给一个自增长的代码,我好写到新增按钮里。


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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/12/22 15:05:00 [只看该作者]

参考

 

Dim str As String = "abcef0180"
Dim mc = System.Text.RegularExpressions.Regex.Matches(str, "[a-zA-Z0]+|[0-9]+")
If mc.count = 2 Then
    str = mc(0).value & mc(1).value + 1
    msgbox(str)
End If

 回到顶部