vb.net 把字符串 150C25@150(6) 分割为 150,C,25,150,6 形式代码和每行注释

以下是 VB.NET 的代码示例和注释，用于将字符串 "150C25@150(6)" 拆分为 "150", "C", "25", "150" 和 "6"：

Dim input As String = "150C25@150(6)" ' 原始字符串
Dim output As List(Of String) = New List(Of String) ' 输出结果列表

' 用 @ 符号分割字符串，取得前半部分 "150C25"
Dim parts1 As String() = input.Split(New Char() {"@"c}, StringSplitOptions.RemoveEmptyEntries)
If parts1.Length > 0 Then
    ' 用 C 字符分割前半部分，取得 "150" 和 "25"
    Dim parts2 As String() = parts1(0).Split(New Char() {"C"c}, StringSplitOptions.RemoveEmptyEntries)
    ' 将 "150" 和 "25" 添加到输出结果列表中
    For Each part As String In parts2
        output.Add(part)
    Next
End If

' 用圆括号分割字符串，取得后半部分 "150(6)"
Dim parts3 As String() = input.Split(New Char() {"("c, ")"c}, StringSplitOptions.RemoveEmptyEntries)
If parts3.Length > 1 Then
    ' 将 "150" 和 "6" 添加到输出结果列表中
    output.Add(parts3(0))
    output.Add(parts3(1))
End If

' 输出结果列表中的每个元素
For Each item As String In output
    Console.WriteLine(item)
Next

注释中详细解释了代码中每一行的作用。此代码使用了字符串的 Split 方法和 Char 数组，可以将字符串按照指定的分隔符拆分成多个子字符串。请注意，此代码仅适用于给定的字符串格式，如果字符串格式有所不同，则需要进行相应的修改。