(Visual Basic) 如何将字符串值拆分为字符串数组？

Question

我有一个字符串数组：

array()

和

string = "('one','two','third', ...)"

值一二三个是例子。该字符串可能包含三个以上的单词。

如何用以下内容填充 array()：

"one"
"two"
"three"
...

Answer 1

Dim s = "('one','two','three', ...)"
Dim tokens = From token In s.Trim("(", ")").Split(","c)
             Select token.Trim("'"c)
Dim array() As String = tokens.ToArray()

记得添加 Imports System.Linq

演示：https://dotnetfiddle.net/Ayy0y1

请注意，没有必要使用 LINQ，我只是发现它比以下内容更具可读性：

Dim array As String() = s.Trim("(", ")").Split(","c)
For i As Int32 = 0 To array.Length - 1
    array(i) = array(i).Trim("'"c)
Next

Answer 2

使用 String.Split 将起始字符串分解为一个由拆分项填充的数组。

Dim items = "one two three four five"
Dim array = items.Split(" ")
' Outputs array = [ "one", "two", "three", "four", "five" ]

Answer 3

另一个解决方案是使用正则表达式：

Dim str As String = "('one','two','three')"
str = RegularExpressions.Regex.Replace(str, "\('|'\)", "")
Dim array() As String = RegularExpressions.Regex.Split(str, "','")

如果有空格需要删除，则：

Dim str As String = "( 'one','two' , 'three ')"
str = RegularExpressions.Regex.Replace(str, "\s+|\(\s*'|'\s*\)", "")
Dim array() As String = RegularExpressions.Regex.Split(str, "','")

Answer 4

从您提供的字符串开始：

Dim myString As String = "('one','two','three')"
Debug.WriteLine(myString)

输出：

('one','two','three')

接下来通过用空引号（什么都没有）替换不需要的字符来删除它们。 Chr(39) 函数表示单引号：

myString = myString.Replace("(", "").Replace(")", "").Replace(Chr(39), "")
Debug.WriteLine(myString)

输出：

one,two,three

接下来使用 .Split() 方法将其转换为数组：

Dim myStringArray() As String = myString.Split(",")
For i As Integer = 0 To myStringArray.Length - 1
    Debug.WriteLine(myStringArray(i))
Next i

输出：

one
two
three

无需任何“Imports”语句即可工作