vb.net - 如何查找字符串拆分期间使用的分隔符(VB.NET)

Question

假设我有一个字符串，我想根据几个字符进行拆分，例如 "." , "!" , 和 "?" .我如何确定这些字符中的哪一个拆分了我的字符串，以便我可以将相同的字符添加回相关拆分段的末尾？

    Dim linePunctuation as Integer = 0
    Dim myString As String = "some text. with punctuation! in it?"

    For i = 1 To Len(myString)
        If Mid$(entireFile, i, 1) = "." Then linePunctuation += 1
    Next

    For i = 1 To Len(myString)
        If Mid$(entireFile, i, 1) = "!" Then linePunctuation += 1
    Next

    For i = 1 To Len(myString)
        If Mid$(entireFile, i, 1) = "?" Then linePunctuation += 1
    Next

    Dim delimiters(3) As Char
    delimiters(0) = "."
    delimiters(1) = "!"
    delimiters(2) = "?"

    currentLineSplit = myString.Split(delimiters)

    Dim sentenceArray(linePunctuation) As String
    Dim count As Integer = 0

    While linePunctuation > 0

        sentenceArray(count) = currentLineSplit(count)'Here I want to add what ever delimiter was used to make the split back onto the string before it is stored in the array.'

        count += 1
        linePunctuation -= 1

    End While

Answer 1

如果您像这样向正则表达式添加捕获组:

SplitArray = Regex.Split(myString, "([.?!])")

然后返回的数组包含标点符号之间的文本以及每个标点符号字符的单独元素。 Split() .NET 中的函数包括通过捕获返回数组中的组匹配的文本。如果您的正则表达式有多个捕获组，则它们的所有匹配项都包含在数组中。

这将您的样本分为:

some text
.
 with punctuation
!
 in it
?

然后，您可以遍历数组以获取“句子”和标点符号。