Замена пробелов в строке

[Dmitry Qwe]

Хочу в строке все большие пробелы заменить на одинарные, но почему то цикл у меня выходит бесконечный

Код Выделить Развернуть


ИсхСтрока1 = "Привет                Да    Нет";
    Пока СтрНайти(ИсхСтрока1, "  ") Цикл
         Строка = СтрЗаменить (ИсхСтрока1, "  "," ");
  КонецЦикла;



[alex0402]

ИсхСтрока1 = "Привет                Да    Нет";     Пока СтрНайти(ИсхСтрока1, "  ") Цикл          Строка = СтрЗаменить (ИсхСтрока1, "  "," ");   КонецЦикла;

Код Выделить Развернуть


ИсхСтрока1 = "Привет                Да    Нет";   
Пока СтрНайти(ИсхСтрока1, "  ") Цикл       
   ИсхСтрока1 = СтрЗаменить (ИсхСтрока1, "  "," "); 
КонецЦикла;