参考代码
Dim str As String = "11%专piao|3%专piao|11%普piao|3%普piao"Dim mc = System.Text.RegularExpressions.Regex.Matches(str,"[0-9%]+")If mc.count >= 1 Then msgbox(mc(0).value) msgbox(mc(1).value)End If
加好友 
发短信
Post By：2018/3/25 17:53:00 [只看该作者]
