Single statement to remove multiple spaces in a string

We can use System.Text.RegularExpressions Namespace to remove multiple spaces in a string

For example

Imports System.Text.RegularExpressions

Dim MyTrimmedWord() As String = Regex.Split(textbox1.text, "\s+")

will remove multiple spaces from the string