| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 字母数字和文字分离 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=26802) |
| -- 作者：piaoliangmm -- 发布时间：2012/12/14 15:13:00 -- 字母数字和文字分离 请教高手，如何将下面字母数字和文字分离，例如：第一个分离为“YZKSS124072”和“十堰中油2400方”，以此类推。求助代码，谢谢！ YZKSS124072十堰中油2400方 YZKSS122051天津中信麒瑞 BT111212Z383天津博思特 WJ110698-YR038吴江奥林清华 YZKSS124036江西计华能源100方 |
| -- 作者：lin_hailun -- 发布时间：2012/12/14 15:26:00 -- 可以参考一下代码，修改。 Dim data As String = "YZKSS124072十堰中油2400方" Dim catchs As New System.Text.RegularExpressions.Regex("[a-zA-Z0-9-]+") Dim mc As System.Text.RegularExpressions.MatchCollection = catchs.Matches(data) msgbox(mc(0).Value & " " & data.SubString(mc(0).Value.Length)) |
| -- 作者：szp2012 -- 发布时间：2012/12/14 16:34:00 -- 请问 System.Text 相关知识帮助中有没有 |
| -- 作者：lin_hailun -- 发布时间：2012/12/14 16:53:00 -- http://social.msdn.microsoft.com/Search/zh-CN?query=System.Text&ac=8 |
| -- 作者：szp2012 -- 发布时间：2012/12/14 16:58:00 -- 谢谢，有点专业 如果仅用狐表能解决楼主的问题吗 |
| -- 作者：lin_hailun -- 发布时间：2012/12/14 17:16:00 -- 以下是引用szp2012在2012-12-14 16:58:00的发言：
谢谢，有点专业 如果仅用狐表能解决楼主的问题吗 麻烦一点，查出第一个不是字母或者数字的位置，然后，截取字符串就行了。 |