用正则取出数字
Dim str As String = "234都123欧2"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