Все сдаюсь...

Народ, помогайте!
Нужно чтобы при нажатии кнопки цифры сменялись в реальном времени.. гм. не понятно? Я нажал на кнопку - програ зависла, потом выдала в окне поле отчета 2000. Так не нужно.  Нужно чтобы цифры сменялись 1, потом 2 потом 3.... 2000


Процедура отображение(а)
          ЭлементыФормы.ПолеОтчета.Очистить();
          Макет         = ПолучитьМакет("Макет");
          ОбластьМакета = Макет.ПолучитьОбласть("Строка");
          ОбластьМакета.Параметры.ПечПараметр = а;
          ЭлементыФормы.ПолеОтчета.Вывести(ОбластьМакета);
          ЭтаФорма.Обновить();
КонецПроцедуры    
    
Процедура КнопкаВыполнитьНажатие(Кнопка)
    Для а = 0 По 2000 Цикл
    Отображение(а);
    КонецЦикла;          
КонецПроцедуры

а = 0;