以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  备注型的二行数据,怎么写代码,把数字都取出来?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=114492)

--  作者:xxfoxtable
--  发布时间:2018/2/7 16:29:00
--  备注型的二行数据,怎么写代码,把数字都取出来?
39.5×3.5×0.1
6.38×4.7×0.1


--  作者:有点甜
--  发布时间:2018/2/7 17:17:00
--  
Dim str As String = "39.5×3.5×0.1" & vbcrlf & "6.38×4.7×0.1"
Dim mc = System.Text.RegularExpressions.Regex.Matches(str, "[0-9\\.]+")
For i As Integer = 0 To mc.count-1
    output.show(mc(i).value)
Next