Example - Trim, LTrim, RTrim Functions

  1. ' This example uses the LTrim and RTrim functions to strip leading and

    ' trailing spaces, respectively, from a string variable. It

    ' uses the Trim function alone to strip both types of spaces.

    ' LCase and UCase are also shown in this example as well as the use

    ' of nested function calls

     

    Sub Main

    1. MyString = "<-Trim->"          ' Initialize string.

      TrimString = LTrim(MyString)          ' TrimString = "<-Trim->".

      MsgBox "|" & TrimString & "|"

      TrimString = LCase(RTrim(MyString))            ' TrimString = "<-trim->".

      MsgBox "|" & TrimString & "|"

      TrimString = LTrim(RTrim(MyString))            ' TrimString = "<-Trim->".

      MsgBox "|" & TrimString & "|"

       

      ' Using the Trim function alone achieves the same result.

      TrimString = UCase(Trim(MyString))           ' TrimString = "<-TRIM->".

      MsgBox "|" & TrimString & "|"

    End Sub