删除字符串中多余的空格

Question

我想使用 VB.net ex 删除多余的空格

。

"The   Quick          Brown Fox"

我想要输出

"The Quick Brown Fox"

谢谢， 英奇卡

Answer 1

您可以使用一个简单的正则表达式来实现：

Dim cleaned As String = Regex.Replace(input, "\s{2,}", " ")

Answer 2

我意识到这个问题相当老了，但还有另一个选项不涉及正则表达式，或手动循环字符串并替换：

Private Function StripSpaces(input As String) As String
    Return String.Join(" ", input.Split(New Char() {}, StringSplitOptions.RemoveEmptyEntries))
End Function

以及 C# 等效项：

private string StripSpaces(string input)
{
    return string.Join(" ", input.Split((char[])null, StringSplitOptions.RemoveEmptyEntries));
}

使用“null”值作为 String.Split 原因分割字符是所有在发送到 Char.IsWhiteSpace。因此，以这种方式调用该方法将在所有空格上拆分字符串，删除空字符串，然后将其重新连接在一起，并在每个拆分数组元素之间添加一个空格。

Answer 3

您真正想要的是将任何多个空格压缩为一个空格，一种方法是搜索两个空格并将它们替换为一个空格，直到没有两个相邻的空格为止，如下所示：

   Dim myString As String = "The   Quick     Brown     Fox"
   While myString.IndexOf("  ") <> -1
       myString = myString.Replace("  ", " ")
   End While
   Console.WriteLine(myString)

但是，这并不是万无一失的，因为 .net 字符串 的一些意识形态，这可能会发生进入无限循环，但仅限于一些非常奇怪的输入。

---

编辑：正如其他答案中所指出的，使用正则表达式这种特定的处理速度更快（也更简单）。

Answer 4

试试这个：

Dim output As String = Regex.Replace("The   Quick          Brown Fox","\\s+" , " ")