以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  能否单独获取字符串中的数字内容  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=16064)
--  作者：ajim
--  发布时间：2012/2/1 14:51:00
--  能否单独获取字符串中的数字内容
茶叶店10,皮革城5。我只想光获得数字区域
--  作者：狐狸爸爸
--  发布时间：2012/2/1 15:24:00
--  

可以：

 

Dim s1 As String = "茶叶店10"
Dim s2 As String
For Each c As Char In s1
   If Char.IsNumber(c) Then
        s2 = s2 & c
    End If
Next
output.show(s2)

 

只是何不从规范输入入手呢？