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

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

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

'第一个数字
Dim firstNumber As String = inputString.Substring(0, inputString.IndexOf("C")) '获取第一个数字
outputString += firstNumber + "," '添加到输出字符串，并在后面加上逗号

'字母
Dim letter As String = inputString.Substring(inputString.IndexOf("C") + 1, 1) '获取字母
outputString += letter + "," '添加到输出字符串，并在后面加上逗号

'第二个数字
Dim secondNumber As String = inputString.Substring(inputString.IndexOf("C") + 2, inputString.IndexOf("@") - inputString.IndexOf("C") - 2) '获取第二个数字
outputString += secondNumber + "," '添加到输出字符串，并在后面加上逗号

'第一个x后面的数字
Dim thirdNumber As String = inputString.Substring(inputString.IndexOf("@") + 1, inputString.IndexOf("x") - inputString.IndexOf("@") - 1) '获取第三个数字
outputString += thirdNumber + "," '添加到输出字符串，并在后面加上逗号

'第二个x后面的数字
Dim fourthNumber As String = inputString.Substring(inputString.IndexOf("x") + 1, inputString.IndexOf("(") - inputString.IndexOf("x") - 1) '获取第四个数字
outputString += fourthNumber + "," '添加到输出字符串，并在后面加上逗号

'括号中的数字
Dim fifthNumber As String = inputString.Substring(inputString.IndexOf("(") + 1, inputString.IndexOf(")") - inputString.IndexOf("(") - 1) '获取第五个数字
outputString += fifthNumber '添加到输出字符串

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

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