参考代码
Dim str As String = "12342CP00012"Dim reg As new System.Text.RegularExpressions.Regex("([0-9]+)|([a-zA-Z]+[0-9]+)")
Dim mc As Object = reg.Matches(str)For i As Integer = 0 To mc.count - 1 output.show(mc(i).Value)Next
加好友 
发短信
Post By：2014/10/9 15:16:00 [显示全部帖子]
