Progress.StepIt

(строка) Имя объекта ход процесса (progress).

-- Set the progress bar range from 0 to 50
-- Устанавливаем пределы изменения индикатора (диапазон) от 0 до 50
Progress.SetRange("Status", 0, 50);

-- Set the current position to 0 (the beginning)
-- Устанавливаем текущее положение индикатора в 0 (в начало)
Progress.SetCurrentPos("Status", 0);

-- Set the step size to 10
-- Устанавливаем размер шага равным 10
Progress.SetStep("Status", 10);

-- nLoopControl is used to control the loop below
-- Устанавливаем значение переменной nLoopControl, используемой для управления циклом ниже
nLoopControl = 5;

-- Do the following as long as nLoopControl is greater than 0
-- In this case, this loop will be performed 5 times
-- Выполняем следующее действие до тех пор пока переменная nLoopControl больше 0
-- В нашем случае этот цикл будет выполнен 5 раз
while nLoopControl > 0 do
   -- Increment the current progress
   -- Увеличиваем текущее состояние индикатора
   Progress.StepIt("Status");

   -- Check to see if any errors occurred calling the Progress.StepIt action.
   -- If any error occurred, display the error message.
   -- Проверяем, не было ли каких ошибок при вызове действия Progress.StepIt.
   -- Если была ошибка, показываем сообщение об ошибке.
   error = Application.GetLastError();
   if (error ~= 0) then
       Dialog.Message("Error", _tblErrorMessages[error], MB_OK, MB_ICONEXCLAMATION, MB_DEFBUTTON1);
   end

   -- Subtract 1 from nLoopControl
   -- Вычитаем 1 из nLoopControl
   nLoopControl = nLoopControl - 1;
end

Устанавливаем пределы изменения (диапазон) индикатора объекта ход процесса "Status" от 0 до 50, устанавливаем размер шага равный 10, устанавливаем текущее положение равное 0, и увеличиваем на шаг индикатор прогресса 5 раз.