从VB.net中的字符串中删除所有标点符号

Question

如何从vb.net中的字符串中去除所有标点符号？我真的不想为每个标点符号做stringname.Replace("$", "")，尽管它可以工作。

我该如何快速有效地做到这一点？

除了编码该代码这对我来说....

Answer 1

您可以使用正则表达式匹配要删除任何东西：

str = Regex.Replace(str, "[^A-Za-z]+", String.Empty); 

[^...]是负集是任何字符相匹配不在集合中。你可以放置任何你想要保留的角色。

Answer 2

快速例如使用正则表达式正赛的东西。只要把你想它删除字符：

  Imports System.Text.RegularExpressions 
      Dim foo As String = "The, Quick brown fox. Jumped over the Lazy Dog!" 
      Console.WriteLine(Regex.Replace(foo,"[!,.\"'?]+", String.Empty)) 

Answer 3

如果你想有一个非正则表达式的解决方案，你可以尝试这样的事：

Dim stringname As String = "^^^%%This,,,... is $$my** original((((stri____ng." 

Dim sb As New StringBuilder 
Dim c As Char 

For Each c In stringname 
    If Not (Char.IsSymbol(c) OrElse Char.IsPunctuation(c)) Then 
     sb.Append(c) 
    End If 
Next 

Console.WriteLine(sb.ToString) 

输出为“This is my original string”。