Re: RegExp.Replace

[Bruce Steers <bsteers4@xxxxxxxxx>]

Sorry GianLuigi I have made a mistake. I just searched the lists for the
conversation and it turns out it was Oliver Cruilles that surprised
everyone with the simple solution.
At this point I think everyone facepalmed ;)
https://lists.gambas-basic.org/pipermail/user/2020-November/070587.html

Sorry about that

Respects
BruceS


On Tue, 2 Dec 2025 at 11:36, Gianluigi <gradobag@xxxxxxxxxxx> wrote:

> If you're sure of that, then I'm in worse shape than I thought. LOL
>
> Best Regards
> Gianluigi
>
> Il 02/12/25 10:51, Bruce Steers ha scritto:
> >
> > Use SPlit() with IgnorVoid parameter and Join again.
> >
> > InText = Split(InText, " \t", Null, True).Join(" ")
> >
> > This answer was provided by GianLuigi many moons ago as the fastest way
> > to make a multi spaced line have only 1 space between chars.
> > Ps. i use \t in the Split to catch tab spaces too.
> >
> > Respects
> > BruceS
> >
> >
> > On Tue, 2 Dec 2025 at 09:19, Ian Roper <westozscribe@xxxxxxxxx
> > <mailto:westozscribe@xxxxxxxxx>> wrote:
> >
> >     __
> >
> >     Public Function ClearDuplicateSpaces(InText As String) As String
> >
> >        While (InStr(InText, "  ") > 0)
> >          InText = Replace(InText, "  ", " ")
> >        Wend
> >        Return InText
> >
> >     End
> >
> >
> >     On 2/12/25 3:13 pm, CD wrote:
> >>     Hello,
> >>
> >>     I have a string like this:
> >>
> >>     Dim s As String = "A     B    C D   E"
> >>
> >>     s = RegExp.Replace(s, "\\s+", " ")
> >>
> >>     Print s
> >>
> >>     I would like to get "A B C D E"
> >>
> >>     What should I write in the Pattern string?
> >>     I've tried many things, without success.
> >>     So what should I change to get the desired result?
> >>
> >>     Regards
> >>
>
>
>