Question

Hey all, i am trying to replace large spaces between text with just one. My output looks like this right now:

5964215">

        This is just the first example of the spaces
    5964478">

        This would be the 2nd example of showing how many spaces this thing has in each sentence.
    5964494">

That comes from a textbox that has multi-line to true. Here is what it looks like when it doesn’t have multi-line to true.

http://www.june3rdsoftware.com/forums/vb6.jpg

I can not seem to get the spaces to go away! BTW, this text is from a webpage if that makes any difference.

David

Answer 1

According to the suggestion of MvanGeest, here is some VB code to replace blocks of white spaces:

Sub test()
    Dim x As String, y As String
    x = "abcd       defg             1233"
    Dim re As New RegExp
    re.Pattern = "\s+"
    re.Global = True
    y = re.Replace(x, " ")
    Debug.Print y
End Sub

To make this work, you will have to add a reference to “Microsoft VBScript Regular Expresssions” to your project.