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