On Sep 01, 2006 8:50 PM, Brendan Murphy wrote:
>
> If anybody else any other tricks that they would like to
> share, please feel free to share them. An old dog can
> learn new tricks!
>

I found a solution to remove extras spaces (replace 2 or more spaces
by 1) on RS forums that is very fast.

Dim s As String = (string to remove extra spaces)
Dim oldLen, newLen As Integer

newLen = Len(s)
Do
  oldLen = newLen
  s = ReplaceAll(s, "  ", " ")
  newLen = Len(s)
Loop Until newLen = oldLen

Credits: Urs Geiser (Posted on RS forums)

Carlos

_______________________________________________
Unsubscribe or switch delivery mode:
<http://www.realsoftware.com/support/listmanager/>

Search the archives of this list here:
<http://support.realsoftware.com/listarchives/lists.html>

Reply via email to