Цикл While…Wend

Этот способ организации цикла повторяет команды, пока заданное условие верно. Он полностью эквивалентен циклу Do…Loop с условием While в первой строке оператора.

Синтаксис оператора

While condition

statements

Wend

• condition – тестируемое выражение со значением True или False;

• statements – последовательность операторов, выполняемых в цикле.

Внимание

• При таком способе организации цикла не применяется оператор немедленного завершения цикла.

Приведем процедуру расчета зарплаты с использованием этого оператора цикла

Sub salary_while_wend() Dim h As Long, r As Long, s As Double, Dim Fund As Long, id As Integer h = 1 r = 1 While h > 0 And r > 0 id=Val(InputBox("Код сотрудника")) h = Val(InputBox("Количество отработанных часов")) r = Val(InputBox("Почасовая оплата")) If h > 0 And r > 0 Then s = h * r Fund = s * 0.13 s = s – Fund MsgBox "Код сотрудника " & id & ", сумма на руки " & s End If Wend End Sub

Выполняется проверка введенных значений h и r, если оба не равны нулю, то проводится расчет и запрос на ввод данных о следующем сотруднике. В противном случае цикл завершается.

Раздел 5.Процедуры, подпрограммы и функции

Программа для решения некоторой задачи может иметь сложную структуру и быть как угодно велика, т.е. состоять из большого числа операторов.

Если программа имеет в своем составе блоки, которые предполагают автономную обработку данных, или же в программе неоднократно повторяются некоторые последовательности операторов, рекомендуется разбить программу на ряд процедур, каждая из которых возьмет на себя часть реализации общего алгоритма решения задачи. Процедуры представляют собой логические сегменты программы.

Преимущества

• При использовании процедур отпадает необходимость дублировать участки программы.

• Вызывая несколько раз процедуру, программа выполняет несколько раз одни и те же действия, записанные один раз.

• Программы, разбитые на процедуры, легче читаются и легче модифицируются. Легко можно локализовать часть программы, в которой произошла ошибка.

Процедура может располагаться на любом процедурном листе, в любом модуле или открытом проекте и может вызываться из любой процедуры.

Процедура состоит из некоторого количества операторов, объединенных в группу для решения некоторой задачи, т.е. это последовательность операторов языка, к которым возможно обращение как к связанной группе операторов. Невозможно выполнить часть процедуры – можно выполнить процедуру только целиком.

Важно

• Все исполняемые операторы модуля размещаются в процедурах.

• Вне процедур в начале модуля могут находиться только опции (например, Option Explicit), объявления модульных, глобальных переменных и переменных пользовательского типа.

Классификация процедур

Процедуры, разрабатываемые вручную, обычно оперируют различными данными: вычисляют значения переменных, отображают данные.

Процедуры, записываемые макрорекордером, содержат команды MS Excel и фактически расширяют возможности приложения для выполнения действий с электронными таблицами. Их называют командными процедурами, макропроцедурами или макросами¹. Далее термины "макрос" и "процедура" используются как синонимы.

Часто используют макрорекордер, чтобы создать основу будущей процедуры, например, записать операторы построения и форматирования диаграммы или операторы обработки объекта, которые позже можно включить внутрь цикла. Затем добавляют операторы языка VB для придания процедуре законченного вида. И наоборот, написав процедуру вручную, вставляют в нее операторы обработки объектов офисного приложения, записываемые макрорекордером.

Обычно в составе проекта присутствуют

• основная процедура, которая вызывает другие процедуры. Это самостоятельно используемая процедура;

• вызываемые процедуры, реализующие конкретные задачи проекта;

• процедуры обработки событий.

В качестве вызываемых процедур используются подпрограммы и функции: процедуры-функции возвращают некоторое значение в отличие от подпрограмм, которые значений не возвращают.

Замечание

• Под понятием "функция возвращает значение" подразумевается, что в процессе выполнения процедуре-функции присваивается некоторое значение, которое доступно вызвавшей ее процедуре.

Чтобы отличать процедуры-функции от остальных процедур, для последних будем использовать термин "процедуры общего типа". Для краткости вместо термина "процедура-функция" будем использовать термин "функция".

Процедуры обработки событий (событийные процедуры) связаны с конкретными событиями. Событие, например, это нажатие командной кнопки в диалоге, закрытие или активизация окна таблицы. Если установлена связь процедуры с событием объекта приложения, то процедура является событийной. Особенность событийных процедур в том, что они запускаются автоматически, если происходит некоторое событие.

Удобно

• написать автоматически запускаемые процедуры со специальными именами, например: Auto_Open – автопоцедура, выполняемая при открытии документа.

Далее под термином "процедура" будем подразумевать любую процедуру – вызывающую, вызываемую, процедуру-функцию или событийную процедуру, если специально не оговорено другое.