vb.net 使用正则表达式拆分字符串

Question

我需要在几个规则上用正则表达式分割一个字符串，我在以前的帖子的帮助下做了一些事情，但我不知道如何完全做到这一点。

输入字符串（故意写得难看）是：

Berlin "New York"Madrid 'Frankfurt Am Main' Quebec Łódź   München Seattle,Milano

拆分代码是：

Dim subStrings() As String = Regex.Split(myText, """([^""]*)""|,| ")

这样做的结果是：

0)  
1)  
2)Berlin  
3)  
4)New York  
5)Madrid  
6)'Frankfurt  
7)Am  
8)Main'  
9)Quebec  
10)Łódź  
11)  
12)  
13)München  
14)Seattle  
15)Milano  

简而言之，字符串应该被“”（空格）和/或“,”字符和/或单引号或双引号分割成数组。 引用的术语应视为单个单词。 这意味着单引号中的术语（在第 6 位）将被视为与双引号中的术语相同。 这样，第 6 位的“Frankfurt Am Main”将是“一个词”，与第 4 位的“New York”相同。此外，我想如果可以制作正则表达式，空匹配将不会进入 subStrings() 数组。 毕竟，给定示例的理想结果应该是：

0)Berlin  
1)New York  
2)Madrid  
3)Frankfurt Am Main  
4)Quebec  
5)Łódź  
6)München  
7)Seattle  
8)Milano  

所以，请如果有人知道如何为我解决这个具体的正则表达式。

Answer 1

您可以使用Regex.Matches和以下正则表达式来提取字符串：

"([^"]*)"|'([^']*)'|([^,\s]+)

请参阅正则表达式演示。

细节

• "([^"]*)" - " ，然后第 1 组匹配除"之外的任何 0+ 个字符，然后"
• | - 或者
• '([^']*)' - ' ，然后第 2 组匹配除'之外'任何 0+ 个字符，然后是'
• | - 或者
• ([^,\\s]+) - 第 3 组：除,和空格之外的任何 1+ 个字符

VB.NET 代码片段：

Dim text = "Berlin ""New York""Madrid 'Frankfurt Am Main' Quebec Łódź   München Seattle,Milano"
Dim pattern As String = """([^""]*)""|'([^']*)'|([^,\s]+)"
Dim matches() As String = Regex.Matches(text, pattern) _
          .Cast(Of Match)() _
          .Select(Function(m) m.Groups(1).Value & m.Groups(2).Value & m.Groups(3).Value) _
          .ToArray()

结果：

使用以下Regex.Split方法可以获得相同的Regex.Split ：

pattern = """([^""]*)""|'([^']*)'|[,\s]+"
Dim matches() As String = Regex.Split(text, pattern).Where(Function(m) Not String.IsNullOrWhiteSpace(m)).ToArray()

请参阅正则表达式演示。