vb.net获取字符串12C25,30B25 58A100,150D320中的，前面的数字，每行注释

同样可以使用正则表达式来匹配字符串中的数字部分，只需要将正则表达式修改为 `\d+(?=[A-Z])`，即匹配数字后面紧跟着一个大写字母的部分。

以下是一个vb.net的代码示例：

Dim input As String = "12C25,30B25 58A100,150D320"
Dim pattern As String = "\d+(?=[A-Z])" '匹配数字部分的正则表达式
Dim matches As MatchCollection = Regex.Matches(input, pattern)

'遍历匹配结果，将数字部分提取出来
Dim numbers As New List(Of Integer)
For Each match As Match In matches
    numbers.Add(Integer.Parse(match.Value))
Next

'输出结果
For Each number As Integer In numbers
    Console.WriteLine(number)
Next

输出结果为：

12
30
58
150

代码解释：

1. 定义输入字符串 `input` 和匹配数字部分的正则表达式 `pattern`。

2. 使用 `Regex.Matches` 方法匹配输入字符串中所有符合正则表达式的部分，并返回一个 `MatchCollection` 对象。

3. 遍历 `MatchCollection` 对象中的每个 `Match` 对象，将其 `Value` 属性转换为整数类型，并添加到一个 `List(Of Integer)` 中。

4. 输出结果。