а=Найти(б); Если а>0 Тогда в=Лев(г,а)...
Не, то, чтобы я не знал о RegExp раньше. Еще до 1С активно использовал их в PHP, но в 1С как-то не использовал. Сам даже не знаю почему.
Использовать их не просто, а очень просто, например вот так (запишу, как памятку себе):
Код создания объекта очень простой, а в написании самой сложной части (шаблона) помогают программы тестирования регулярных выражений.РегЭксп = Новый COMОбъект("VBScript.RegExp"); РегЭксп.IgnoreCase = Истина; РегЭксп.Global = Истина; РегЭксп.MultiLine = Ложь; РегЭксп.Pattern = "([^0]*)0+(.*)"; Результат = РегЭксп.Replace(Номер, "$1-$2");
Лично я сейчас пользуюсь Rad Software Regular Expression Designer, так же совсем недавно я встретил интересную публикацию на инфостарт. Там можно скачать обработку 1С, предназначенную для тестирования RegExp.
Есть и платные аналоги.
С инструментом тестирования разработка поискового шаблона превращается в удовольствие.
Используйте RegExp-ы и хорошего вам дня, и хорошего кода.