Question

文本框中的HTML源代码，怎么提取相关数据

Answer 1

Dim str As String = RichTextBox1.Text
Dim m As System.Text.RegularExpressions.Match
Dim mc As System.Text.RegularExpressions.MatchCollection
mc = System.Text.RegularExpressions.Regex.Matches(str, "(? <content> (? <= <li[^> ]*> )[\s\S]*?(?= </li> )) ", System.Text.RegularExpressions.RegexOptions.IgnoreCase)

For Each m In mc
MessageBox.Show(m.Groups( "content ").Value)
Next