- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- [求助]分离字符串问题 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=52395)
-- 发布时间：2014/6/15 9:50:00
-- [求助]分离字符串问题
如图1：第一列的字符串，我要将其分离到第二列字符部分和第三列数字部分，
如图2：如何编码？
此主题相关图片如下：图1.png
此主题相关图片如下：图2.png
[此贴子已经被作者于2014-6-15 10:05:55编辑过]
-- 发布时间：2014/6/15 9:55:00
--
呃，字符串是什么样的？什么规则分离？
-- 发布时间：2014/6/15 10:01:00
--
以下是引用dqlgood在2014-6-15 9:50:00的发言：
如图1：第一列的字符串，我要将其分离到第二列字符部分和第三列数字部分，
如图1：第一列的字符串，我要将其分离到第二列字符部分和第三列数字部分，
如图2：如何编码？
[此贴子已经被作者于2014-6-15 9:51:24编辑过]
此主题相关图片如下：问题2.png
如图：第一列的字符串，我要将其分离到第二列字符部分和第三列数字部分，对不起，刚才上传出了点问题。
-- 发布时间：2014/6/15 10:04:00
--
参考代码
Dim Info As String = "abc123"
Dim reg As new System.Text.RegularExpressions.Regex("[a-zA-Z]+|[0-9]+")
Dim mc As object = reg.Matches(info)
msgbox(mc(0).Value)
msgbox(mc(1).Value)
-- 发布时间：2014/6/15 10:41:00
--
谢谢！但如果是汉字如何解决？
如：Dim Info As String = "王老吉123"
-- 发布时间：2014/6/15 10:44:00
--
如下
Dim Info As String = "abc士大夫123"
Dim reg As new System.Text.RegularExpressions.Regex("[a-zA-Z\\u4e00-\\u9fa5]+|[0-9]+")
Dim mc As object = reg.Matches(info)
msgbox(mc(0).Value)
msgbox(mc(1).Value)