我正在尝试根据单词数组拆分长字符串。例如：
单词：trying, long, array
句子：“我正在尝试根据单词数组拆分一个长字符串。”
结果字符串数组：
同一个词可能有多个实例，因此有两个实例尝试导致拆分或数组，可能会发生。
在 .NET 中是否有一种简单的方法可以做到这一点？
【问题讨论】：
标签： regex vb.net string substring
在结果中保留分隔符的最简单方法是使用Regex.Split method 并在组 中使用alternation 构造模式。该组是将分隔符包含在结果中的关键，否则它将删除它们。该模式看起来像(word1|word2|wordN)，括号用于分组。此外，您应该始终使用Regex.Escape method 对每个单词进行转义，以避免将它们错误地解释为正则表达式元字符。
我还建议阅读我对类似问题的回答（以及其他人的回答）以了解更多详情：How do I split a string by strings and include the delimiters using .NET?
由于我用 C# 回答了这个问题，这里有一个 VB.NET 版本：
Dim input As String = "I am trying to split a long string based on an array of words."
Dim words As String() = { "trying", "long", "array" }
If (words.Length > 0)
Dim pattern As String = "(" + String.Join("|", words.Select(Function(s) Regex.Escape(s)).ToArray()) + ")"
Dim result As String() = Regex.Split(input, pattern)
For Each s As String in result
Console.WriteLine(s)
Next
Else
' nothing to split '
Console.WriteLine(input)
End If
如果您需要修剪每个要拆分的单词周围的空格，您可以为模式添加前缀和后缀 \s* 以匹配周围的空格：
Dim pattern As String = "\s*(" + String.Join("|", words.Select(Function(s) Regex.Escape(s)).ToArray()) + ")\s*"
如果您使用的是 .NET 4.0，则可以将 ToArray() 调用放在 String.Join 方法中。
编辑：顺便说一句，您需要预先决定拆分的工作方式。它应该匹配单个单词还是其他单词的子字符串？例如，如果您的输入中包含单词 “belong”，则上述解决方案将拆分为“long”，从而产生 {"be", "long"}。这是想要的吗？如果不是，那么对模式的微小更改将确保拆分匹配完整的单词。这是通过用字边界\b 元字符包围模式来实现的：
Dim pattern As String = "\s*\b(" + String.Join("|", words.Select(Function(s) Regex.Escape(s)).ToArray()) + ")\b\s*"
\s* 根据我之前提到的修剪是可选的。
【讨论】：
你可以使用正则表达式。
(.*?)((?:trying)|(?:long)|(?:array))(.*)
如果匹配，会给你三个组：
您可以在 (3) 上继续匹配，直到匹配完为止。
我已经玩过这个，但我无法获得一个将在目标词的 all 实例上拆分的单个正则表达式。也许有更多正则表达式的人可以解释一下。
我假设 VB 支持正则表达式。如果没有，我建议使用其他语言。当然 C# 有正则表达式。
【讨论】：
你可以用“”分割， 而不是遍历单词，看看哪个单词包含在“拆分单词”数组中
【讨论】：
Dim testS As String = "I am trying to split a long string based on an array of words."
Dim splitON() As String = New String() {"trying", "long", "array"}
Dim newA() As String = testS.Split(splitON, StringSplitOptions.RemoveEmptyEntries)
【讨论】：
类似的东西
Dim testS As String = "I am trying to split a long string based on a long array of words."
Dim splitON() As String = New String() {"long", "trying", "array"}
Dim result As New List(Of String)
result.Add(testS)
For Each spltr As String In splitON
Dim NewResult As New List(Of String)
For Each s As String In result
Dim a() As String = Strings.Split(s, spltr)
If a.Length <> 0 Then
For z As Integer = 0 To a.Length - 1
If a(z).Trim <> "" Then NewResult.Add(a(z).Trim)
NewResult.Add(spltr)
Next
NewResult.RemoveAt(NewResult.Count - 1)
End If
Next
result = New List(Of String)
result.AddRange(NewResult)
Next
【讨论】：
彼得，我希望以下内容适用于使用正则表达式按单词数组拆分字符串
// Input
String input = "insert into tbl1 inserttbl2 insert into tbl2 update into tbl3
updatededle into tbl4 update into tbl5";
//Regex Exp
String[] arrResult = Regex.Split(input, @"\s+(?=(?:insert|update|delete)\s+)",
RegexOptions.IgnoreCase);
//Output
[0]: "insert into tbl1 inserttbl2"
[1]: "insert into tbl2"
[2]: "update into tbl3 updatededle into tbl4"
[3]: "update into tbl5"
【讨论】：