Массив в цикле

"Помогите, имеется строка, где через запятую занесены слова, как получить каждое слово используя разделитель ",".<br>использую Функцию РазложитьСтрокуВМассивПодстрок(Знач Стр, Разделитель = ",") но вычисляется только последний элемент, предыдущие откидываются, выборка через цикл-выдает ошибку,<br>///код выдает последний элемент<br>ДлинаРазделителя = СтрДлина(Разделитель);<br> Пока 1=1 Цикл<br> Поз = Найти(Стр,Разделитель);<br> Если Поз=0 Тогда<br> МассивСтрок.Добавить(Стр);<br> Возврат МассивСтрок;<br> КонецЕсли;<br> МассивСтрок.Добавить(Лев(Стр,Поз-1));<br> Стр = Сред(Стр,Поз+ДлинаРазделителя);<br> Сообщить(""""+Стр);<br> КонецЦикла;<br>///код через выборка через цикл<br>МассивСтрок= РазложитьСтрокуВМассивПодСтрок(СтруктураШапкиДокумента.Комментарий,",");<br> КоличествоПодстрок = МассивСтрок.Количество();<br>Для каждого строка из МассивСтрок Цикл<br> КонецЦикла;<br> <br>Нужно получить каждый элемент из строки и занести в ТЗ, для дальнейшего использования....."

"> выборка через цикл-выдает ошибку,<br>Какую ошибку?<br><br>Вот такой код прекрасно работает:<br>Стр = "1,2,тест,тест2";<br>Мас = ОбщегоНазначения.РазложитьСтрокуВМассивПодстрок (Стр, ",");<br>Для Каждого сСтр Из Мас Цикл<br> Сообщить (сСтр);<br>КонецЦикла;"

Я сделала проще выгрузила в списокзначений и в цикле получаю каждый элемент.

"Функция РазложитьСтрокуВМассивПодСтрок(Стр,Разделитель)<br> <br> МассивСтрок1 = Новый Массив;<br> <br> ДлинаРазделителя = СтрДлина(Разделитель);<br> Пока 1=1 Цикл<br> Поз = Найти(Стр,Разделитель);<br> Если Поз=0 Тогда<br> МассивСтрок1.Добавить(Стр);<br> Возврат МассивСтрок1;<br> КонецЕсли;<br> МассивСтрок1.Добавить(Лев(Стр,Поз-1));<br> Стр = Сред(Стр,Поз+ДлинаРазделителя);<br> КонецЦикла;<br> Возврат МассивСтрок1;<br>КонецФункции<br>&НаКлиенте<br>Процедура Команда1(Команда)<br> Стр=Объект.Реквизит1;<br> МассивСтрок= РазложитьСтрокуВМассивПодСтрок(Стр,",");<br> КоличествоПодстрок = МассивСтрок.Количество();<br> <br> Для каждого строка из МассивСтрок Цикл<br> Сообщить(строка);<br> КонецЦикла;<br><br>КонецПроцедуры"