- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 请帮助解决：如何把产品名称列的产品号自动变为品号列的数字？ (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=26365)
-- 发布时间：2012/12/1 17:17:00
-- 请帮助解决：如何把产品名称列的产品号自动变为品号列的数字？
请帮助解决：如何把产品名称列的产品号自动变为品号列的数字？
此主题相关图片如下：152.jpg
-- 发布时间：2012/12/1 17:23:00
--
知识点
Dim data As String = "abc11234-455555-cccdddrrr"
Dim catchs As New System.Text.RegularExpressions.Regex("[0-9]+")
Dim mc As System.Text.RegularExpressions.MatchCollection = catchs.Matches(data)
msgbox(mc(0).Value)
-- 发布时间：2012/12/25 21:40:00
--
谢谢
-- 发布时间：2012/12/26 8:07:00
--
这段代码没见过啊，能解释下吗
-- 发布时间：2012/12/26 8:43:00
--
以下是引用nblwar在2012-12-26 8:07:00的发言：
这段代码没见过啊，能解释下吗
这段是正则的通用代码，用来截取符合条件的字符串这段代码没见过啊，能解释下吗
Dim data As String = "abc11234-455555-cccdddrrr"
Dim catchs As New System.Text.RegularExpressions.Regex("[0-9]+") \'定义匹配规则
Dim mc As System.Text.RegularExpressions.MatchCollection = catchs.Matches(data) \'截取，存入一个集合
msgbox(mc(0).Value