我想得到动态的six七位数如下图：
id="tid_3660328">
并将它们附加到 TextBox1 的末尾。
也就是说，我要获取号码：3660328
来自：id="tid_
和：">
我的问题是如何在 VB.NET 中做到这一点。我的第一个想法是“正则表达式”，这是我零经验的话题。感谢您的帮助。
注意：我想我可以在这里使用代码，但使用我自己的正则表达式：https://stackoverflow.com/a/9332731
【问题讨论】：
这是使用 RegEx 的好地方。
如果你只想找到正好是七位数的数字，你可以使用这个 RegEx 模式：
id="tid_(\d{7})">
或者，如果你不在乎它有多少位，你可以使用这个模式：
id="tid_(\d+)">
模式的含义如下：
id="tid_ - 匹配的字符串必须以此文本开头(...) - 创建一个组，以便我们稍后可以访问匹配的这部分的值。\d - 任何数字字符{7} - 连续七个数字字符"> - 匹配的字符串必须以此文本结尾在第二种模式中，替换 {7} 的 + 仅表示一个或多个而不是七个。
在 VB.NET 中，您可以使用 RegEx 模式搜索输入字符串，如下所示：
Public Function FindNumbers(input As String) As List(Of String)
Dim numbers As New List(Of String)()
Dim pattern As String = "id=""tid_(\d{7})"">"
For Each i As Match In Regex.Matches(input, pattern)
numbers.Add(i.Groups(1).Value)
Next
Return numbers
End Function
请注意，在 VB 中的字符串文字中，您必须通过加倍来转义引号。您还会注意到，我们使用的是i.Groups(1).Value，而不是i.Value。原因是i.Value 将等于整个匹配字符串（例如id="tid_3660328">），而组1 将仅等于数字部分（例如3660328）。
要在下面回答您的问题，调用此函数并将其输出到TextBox，您可以执行以下操作：
Dim numbers As List(Of String) = FindNumbers("id=""tid_3660328"">")
Text1.Text = String.Join(Environment.NewLine, numbers.ToArray())
【讨论】：
< 字符对 RegEx 具有特殊含义，因此您需要使用 \ 字符对其进行转义。 （例如pattern = "\<blah>"）避开尖括号也没有什么坏处。
考虑以下正则表达式...
(?<=tid_).*?(?=\"\>)
解释：
【讨论】：