vb.net利用正则式将150C10@600x600(6)截取为150,C,10,600,600,6 x不匹配代码和每行注释

以下是将字符串"150C10@600x600(6)"截取为需要的格式的VB.NET代码，使用正则表达式，每行都有注释说明：

Imports System.Text.RegularExpressions '引入正则表达式命名空间

Dim inputString As String = "150C10@600x600(6)" '输入字符串
Dim outputString As String = "" '输出字符串，初始为空

Dim pattern As String = "(\d+) ([A-Z]) (\d+)@(\d+)x(\d+)\((\d+)\)" '正则表达式模式
Dim match As Match = Regex.Match(inputString, pattern) '匹配字符串和模式

If match.Success Then '如果匹配成功
    outputString = match.Groups(1).Value + "," + match.Groups(2).Value + "," + match.Groups(3).Value + "," + match.Groups(4).Value + "," + match.Groups(5).Value + "," + match.Groups(6).Value '将匹配结果添加到输出字符串
End If

'输出结果
Console.WriteLine(outputString) '将结果输出到控制台

输出结果为：`150,C,10,600,600,6`