49. Массивы в vba. Основные понятия

Массив – это n-мерная совокупность индексированных переменных одного типа. Массиву присваивается имя – имя переменной, за которым в круглых скобках указано одно (для одномерных) или два (для двухмерных) натуральных положительных числа. Элементы из которых состоит массив называют переменными, которые в памяти размещаются последовательно. Все элементы массива имеют одно имя, но различные номера в массиве. Число элементов в массиве задается при его объявлении в операторе Dim и во время выполнения программы не изменяется.

Объявление массива – это задание имени массиву, а также определение типа и количества его элементов. С элементами массива можно работать также как и при использовании обычной переменной. Массивы могут быть как числовыми так и символьными.

Общий вид объявления массива:

Dim <имя массива> (<размер массива>) AS <тип данных>

Пример:

Dim mass(23) AS Integer - одномерный массив

Dim MASS(5 TO 8) AS Integer – двумерный массив

50. Управление выполнения программ в vba

Управление выполнением программ осуществляют следующие оперторы:

If – Then (оператор условного перехода) передает управление ходом выполнения программы в зависимости от истинности некоторого условия.

Стандартный синтаксис конструкции If - Then таков:

If <условие> Then

<оператор, если условие – истина>

[ Else

<оператор иначе, если условие – ложь >]

End If

Если условие истинно, то выполняются операторы за словом Then. Иначе выполняется оператор иначе.

Пример

If stip<10000

THEN stip=(stip*25)/100

Else stip=(stip*15)/100

End If

Select Case

Конструкция Select Case применяется при выборе между несколькими вариантами.

Конструкция Select Case имеет следующий синтаксис:

Select Case тестируемое_выражение

[ Case список условий-п

[операторы-п]]

…

[ Case Else

[иначе операторы]]

End Select

Пример конструкции Select Case

Sub GreetMe()

Select Case Time

Case Is < 0.5

Msg = " Доброе утро "

Case 0.5 To 0.75

Msg = " Добрый день "

Case Else

Msg = " Добрый вечер "

End Select

MsgBox Msg

End Sub

Циклическая обработка операторов

Цикл— это процесс повторения набора операторов.

Если заранее известно сколько раз должен повториться цикл, то применяют цикл For - Next .

For < счетчик> = < начало> То < конец> [ Step < шаг>]

[ < операторы > ]

[ Exit For ]

[<операторы>]

Next [< счетчик>]

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

51.Инструкция Do…Loop

Повторяет блок инструкций, пока условие Boolean равно True или до тех пор, пока условие станет True.

Do { While | Until } condition

[ statements ]

[ Exit Do ]

[ statements ]

Loop

-or-

Do

[ statements ]

[ Exit Do ]

[ statements ]

Loop { While | Until } condition

While

Требуется, если используется Until. Повторяет цикл до тех пор, пока condition равно False.

Until

Требуется, если используется While. Повторяет цикл до тех пор, пока condition равно True.

condition

Необязательный параметр. Выражение типа Boolean. Если condition равно Nothing, Visual Basic обрабатывает его как False.

statements

Необязательный атрибут. Один или несколько операторов, повторяемых, пока condition равно или пока не станет равно True.

Exit Do

Необязательный атрибут. Передача управления из цикла Do.

Loop

Обязательный параметр. Завершение определения цикла Do.

• Природа условий. Условие обычно является результатом сравнения двух значений, но оно может быть любым выражением, значение которого при вычислении имеет тип Тип данных Boolean (Visual Basic) (True или False). Сюда же относятся значения других типов данных, например числовых типов, преобразованные в тип Boolean.

• Проверка условий. Можно проверить condition только один раз, в начале либо в конце цикла. While или Until можно использовать для указания condition, но не оба одновременно.

• Число итераций. Если проверить condition в начале цикла (в инструкции Do), цикл может никогда не выполниться, даже один раз. Если проверить в конце цикла (в инструкции Loop), цикл всегда выполняется по крайней мере один раз.

• Вложенные циклы. Циклы Do могут вкладываться друг в друга. Также можно вложить друг в друга различные виды управляющих структур.

Пример: IntЧисло=1

IntS=1

Do While intЧисло<50

S=S*intЧисло

Loop