VBA RTrim 去掉右边空格

去除字符串右边的空格。


语法

Function RTrim(str)

去除字符串str左边的空格,然后返回。


示例

Sub sub11()
  Dim s1, s2 As String

  's1的前面有8个空格,后面有3个空格
  s1 = "    to www.xiaobuteach.com  "
  s2 = RTrim(s1)

  Debug.Print "s1 len:" & Len(s1)
  Debug.Print "s2 len:" & Len(s2)
  Debug.Print "begin" & s1 & "end"
  Debug.Print "begin" & s2 & "end"

End Sub

输出结果:

s1 len:33
s2 len:30
begin    to www.xiaobuteach.com  end
begin    to www.xiaobuteach.comend