String VBScript中是否有用于修剪特定角色的内置函数？

VBScript

Trim

、

LTrim

和

RTrim

中有一些函数用于删除字符串开头和/或结尾的空格。是否有任何函数可以为任何角色执行此操作？例如：

RTrim(" Hello, World!000", "0")     ' returns " Hello, World!"

---

没有内置函数，但您可以编写自己的函数：

Function RTrimChar(byRef myString, byVal myChar)
    While Right(myString,1) = myChar
        myString = Left(myString, Len(myString)-1)
    End While
    RTrimChar = myString
End Function

---

VBScript中没有用于此的特定函数，但您可以在自定义函数中使用正则表达式替换：

Function CustomRTrim(str, c)
  If c = "" Then
    CustomRTrim = str
  Else
    Set re = New RegExp
    re.Pattern = Left(c, 1) & "*$"
    CustomRTrim = re.Replace(str, "")
  End If
End Function

没有，但是你可以用一个。要开始，请执行以下操作：

>> set r = New RegExp
>> r.Pattern = "0+$"
>> WScript.Echo r.Replace(" Hello, World! 00 a0000", "")
>>
 Hello, World! 00 a
>>

---

（以上是我的REPL的逐字输出；因此我更愿意保留格式）

为什么要使用“*$”而不是“+$”？因为这不会有什么区别。