# RTrim Function

แกแขแ แแแแฃแแ แแแแแกแแฎแฃแแแแแก แแแแแจแ แจแแแก แฐแแ แแแก.

แแแ แแแแ แแแฎแแ: LTrim แคแฃแแฅแชแแ

## แกแแแขแแฅแกแ

`RTrim (Text As String)`

## แแแแ แฃแแแแฃแแ แแแแจแแแแแแแ:

แกแขแ แแฅแแแแแ

## Parameters:

แขแแฅแกแขแ: แแแแแกแแแแ แ แกแขแ แแแแฃแแ แแแแแกแแฎแฃแแแแ.

## แแแแแแแแ:

`Sub ExampleSpaces`

`Dim sText2 As String,sText As String,sOut As String`

`    sText2 = " <*Las Vegas*> "`

`    sOut = "'"+sText2 +"'"+ Chr(13)`

`    sText = Ltrim(sText2) ' sText = "<*Las Vegas*> "`

`    sOut = sOut + "'"+sText +"'" + Chr(13)`

`    sText = Rtrim(sText2) ' sText = " <*Las Vegas*>"`

`    sOut = sOut +"'"+ sText +"'" + Chr(13)`

`    sText = Trim(sText2) ' sText = "<*Las Vegas*>"`

`    sOut = sOut +"'"+ sText +"'"`

`    MsgBox sOut`

`End Sub`