- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 不规则字符如何拆分？ (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=163320)
-- 发布时间：2021/4/23 10:46:00
-- 不规则字符如何拆分？
如何实现将《编号表A》的数据拆成《编号表B》的数据？
此主题相关图片如下：拆分字符问题.jpg
-- 发布时间：2021/4/23 11:20:00
--
和这里2楼的用法一样：http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=162930&authorid=0&page=0&star=1
-- 发布时间：2021/4/23 13:12:00
--
Dim s As String = "A1B1CB1CBC"
Dim lst As new List(of String)
Dim m As String = s(0)
For i As Integer = 1 To s.Length - 1
If Char.IsDigit(s(i)) Then
m = m & s(i)
lst.Add(m)
m = ""
ElseIf m > ""
lst.Add(m)
m = s(i)
Else
m = s(i)
End If
Next
lst.Add(m)
For Each s1 As String In lst
Output.Show(s1)
Next
Dim s As String = "A1B1CB1CBC"这个固定是一个一个拆，而上面不是，没看懂
-- 发布时间：2021/4/23 13:15:00
--
还有二个问题：
1.如何让如：B,B1都看成一位数进行拆分？
2，如何让标识的拆分都在编号的第二位？
-- 发布时间：2021/4/23 13:49:00
--
1、因为没有规律，所以没有办法
2、使用插入行功能