Удалить концевые символы «-» из строки в VB6

Question

Мне нужно удалить завершающие символы «-» из строки в VB6. Как я могу достичь этого? Любая помощь или намеки приветствуются.

Answer 1

Это должно работать, но оно будет выполняться относительно медленно. Я думаю, что скорость будет приемлемой во многих ситуациях.

Do While Right(s, 1) = "-" 
    s = Left(s, Len(s) - 1) 
Loop