Public Function ExcludeChars(ByVal str As String, ByVal ParamArray Chars() As Char) As String For Each c As Char In Chars str = str.Replace(c.ToString(), String.Empty) Next Return str End Function
dans Delphi / Pascal