Foxtable(狐表)用户栏目专家坐堂 → [求助]单元格字符分拆


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

主题:[求助]单元格字符分拆

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


加好友 发短信
等级:超级版主 帖子:109678 积分:558082 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/4/26 16:16:00 [显示全部帖子]

"截取案号"全部以“行”字开头?

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


加好友 发短信
等级:超级版主 帖子:109678 积分:558082 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/4/26 17:12:00 [显示全部帖子]

Dim s As String = "(2018)鲁01行123456"
Dim p2 As String = "鲁\d+"
Dim r As New System.Text.RegularExpressions.Regex(p2)
Dim str = r.Split(s)
For Each a As String In str
    Output.Show(a)
Next

 回到顶部