[原帖地址]http://topic.csdn.net/u/20111017/17/115e0ab3-af38-4dc2-b65f-40871dfadce3.html
原帖作者要用正则取
<?xml version='1.0' encoding='utf-8'?><gbook><info gid='1' g1='233' g2='�ַ�����' g3='2010-10-10' g4='15:3' g5='8.92'
引号中的字符/.
解决方案:
取一个match
Imports System.Text.RegularExpressions
Dim str As String = "g19='0.028' g20='3' g21='1' g22='24.1' g23='10.8'"
Dim reg As New Regex("'([^']*)'")
Dim m As Match = reg.Match(str)
If m.success Then
MsgBox(m.Groups(0).ToString)
End If
只能取到第一个匹配的.
取多个match
Dim str As String = " g16='.03' g17='29.886' g18='0.022'"
Dim reg As New System.Text.RegularExpressions.Regex("'([^']*)'")
Dim m As System.Text.RegularExpressions.MatchCollection = reg.Matches(str)
For Each Match In m
ListBox1.Items.Add(Match.ToString)
Next