VBA Rtrim()函数

Rtrim()函数删除字符串右侧的空格。

语法

RTrim(String)

示例

添加一个模块，并将下面的代码放在编辑器中。

Private Sub Constant_demo_Click()
   Dim var as Variant
   var =       "Microsoft VBScript           "
   msgbox("After Rtrim : " & RTrim(var))
End Sub

执行上面示例代码，得到以下结果 -

After Rtrim : Microsoft VBScript