Текст=Новый ТекстовыйДокумент;

	Текст.УстановитьТекст(ЭлементыФормы.ПолеВвода1.Значение);

	Для i=1 По Текст.КоличествоСтрок() Цикл

		Строка = Текст.ПолучитьСтроку(i);

		Массив = ОбщегоНазначения.РазложитьСтрокуВМассивПодстрок(Строка, Символы.Таб);

		Попытка

			Сообщить(Массив[1]);

		Исключение

			

		КонецПопытки;

		

	КонецЦикла;