以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  求助：字符串中取出数字  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=86103)
--  作者：sunnyfastener
--  发布时间：2016/6/10 20:09:00
--  求助：字符串中取出数字

产品规格“ST4.8×20”，分解成ST，4.8和20，分别提取出，“×”是分隔符

产品规格“M20”，分解成M，20，进行分别提取，此处“×”，没有

[此贴子已经被作者于2016/6/10 20:10:25编辑过]
--  作者：大红袍
--  发布时间：2016/6/10 23:19:00
--  

参考代码

 

Dim str As String = "ST4.8×20"
\'Dim str As String = "M20"
Dim mc = System.Text.RegularExpressions.Regex.Matches(str, "[a-zA-Z]+|[0-9.]+")
For i As Integer = 0 To mc.count-1
    msgbox(mc(i).Value)
Next
--  作者：sunnyfastener
--  发布时间：2016/6/11 9:42:00
--  
谢谢谢谢！！！！