Есть ли встроенная функция в VBScript для обрезки определенного символа?

Question

Есть функции в VBScript Trim, LTrim и RTrim, чтобы удалить пробелы из начала и конца строки. Есть ли какая-нибудь функция для любого персонажа? Например:

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

Answer 1

Функция не существует встроенная, но вы можете написать свой собственный:

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

Answer 2

Там нет никакой конкретной функции для этого в 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 

Answer 3

Нет, но вы можете использовать regular expression. Для начала:

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

(выше дословно выход моего РЕПЛ, поэтому я предпочел бы сохранить формат)