Asp.net Net VB独立数字和字母表

给定一个字符串abc123。如何将它们分开并放入变量中？例如，abc将存储在字符串变量a中，123将存储在整数变量b中。谢谢

Dim str = "abc123"

Dim letters = New [String](str.Where(Char.IsLetter).ToArray())
Dim digits = Convert.ToInt32(New [String](str.Where(Char.IsDigit).ToArray()))

注意：我用c编写代码，所以我使用c到VB代码转换器生成了此代码。

创建两个StringBuilder以累积字母和数字的片段，如下所示：

Dim letters As New StringBuilder()
Dim digits As New StringBuilder()

Dim theString As String = "abc123"
For Each c As Char In theString
    If Char.IsDigit(c) Then 
        digits.Append(c)
    End If
    If Char.IsLetter(c) Then
        letters.Append(c)
    End If
Next

Dim a As String = letters.ToString()
Dim b As String = digits.ToString()

现在循环给定字符串并确定字符是数字还是字母，将其添加到相应的StringBuilder中，如下所示：

Dim letters As New StringBuilder()
Dim digits As New StringBuilder()

Dim theString As String = "abc123"
For Each c As Char In theString
    If Char.IsDigit(c) Then 
        digits.Append(c)
    End If
    If Char.IsLetter(c) Then
        letters.Append(c)
    End If
Next

Dim a As String = letters.ToString()
Dim b As String = digits.ToString()

最后，您可以获得每个StringBuilder的字符串表示形式，如下所示：

Dim letters As New StringBuilder()
Dim digits As New StringBuilder()

Dim theString As String = "abc123"
For Each c As Char In theString
    If Char.IsDigit(c) Then 
        digits.Append(c)
    End If
    If Char.IsLetter(c) Then
        letters.Append(c)
    End If
Next

Dim a As String = letters.ToString()
Dim b As String = digits.ToString()

---

你已经试过什么了？