3.7 Оператори циклу
Циклом називають групу операторів, що повторюється багаторазово з різноманітними значеннями деякої перемінної, що називається перемінною циклу. Оператори циклу організують повторення груп операторів. Синтаксис операторів циклу:
Оператор циклу з лічильником або з відомим числом повторень:
For лічильник = початок To кінець Step крок
[Оператори - тіло циклу]
Next лічильник
Оператор повторює виконання операторів тіло циклу, змінюючи значення перемінної лічильник від значення початок до значення кінець із кроком крок. Наведемо декілька прикладів використання цього оператора циклу.
Приклад 3.7.1. Обчислити таблицю значень функції
y=
,
Для значень х, що змінюються від -2 до 2 із кроком h=0.2. Таблицю помістити на робочий лист.
Sub Таблиця()
Dim x as Single, z as Single, i as Integer
Dim a as Single, b as Single, h as Single
a=InputBox(“Введіть початкове значення аргументу x”)
b= InputBox(“Введіть кінцеве значення аргументу x”)
h= InputBox(“Введіть крок для аргументу x”)
Worksheets(“Лист1”) . Activate
Range(“A1”). Value=”x”
Range(“B1”). Value=”y” ‘ Записуємо заголовки колонок таблиці
i=2 ‘ Номер рядка, починаючи з якого записуємо значення
For x=a To b Step h
If x<=0 Then
y = 3*sin(x)-cos(x)^2
Else
y = 3*sqr(1+x^2)
End if
Cells(i,1). Value = x ‘ Записуємо обчислені значення
Cells(i,2). Value = y
i = i + 1 ‘ збільшуємо номер рядка на 1
Next x
End sub
3.8 Одновимірні масиви
Масив (array) – це група однотипних змінних, які об’єднані загальним іменем.
Кожен об’єкт масиву позначається як змінна з індексом. Для доступу до цієї змінної застосовується її номер (індекс).
Наприклад:
Dim A(8) As Integer .
Об’являється, що А – масив, який складається з дев’яти елементів цілого типу. Першим елементом буде А(0), другим – А(1), т.д. до А(8). Відзначимо, що нумерація елементів починається з 0, а не з 1. Якщо потрібно починати індексацію всіх масивів з 1(одиниці), то в секції (General) (Declarations) треба записати оператор Option Base 1 .
Для установки інших границь масиву можна використовувати наступний синтаксис:
Dim B(10 To 200) As Single ,
де 10 – нижня границя, 200 – верхня границя індексів масиву B.
Таким чином можна задавати любий діапазон індексів. Це особливо корисно, якщо індекс несе смислове навантаження (дата, номер замовлення і т.п.).
Інколи, при об’явленні масиву, його розмір невідомий. Тоді треба об’являти динамічний масив без зазначення розміру:
Dim A() As Integer .
Це дозволяє змінювати його розмір під час виконання програми за допомогою оператора Redim , після якого вказується ім’я та розмір масиву:
Redim A(10) .
3.9 Матриці
В мові VBA матрицям відповідають двовимірні масиви, де перший індекс позначає номер рядка, а другий – номер стовпця.
Аналогічно, як і для одновимірних масивів, необхідно масив об’явити. Наприклад:
Dim A(8,7) As Integer .
Цей запис означає, що об’являється А – двовимірний масив, який складається з дев’яти рядків та восьми стовпчиків елементів цілого типу.
Для об’явлення масиву, розмір якого невідомий, достатньо об’явити динамічний масив без зазначення розміру:
Dim B() As Single ,
в подальшому змінивши його розмір під час виконання програми оператором Redim :
Redim B(m,n) ,
де m, n – визначені під час виконання програми.
Для організації вводу і виводу усіх елементів, необхідно написати два вкладених цикли, які змінюють перший та другий індекси матриці. Порядок циклів залежить від необхідності порядку перегляду елементів матриці. Якщо необхідно провести якісь розрахунки для кожного рядка матриці, то зовнішній цикл організуємо за першим індексом, відповідним номерам рядків. Якщо ж розрахунки проводяться для кожного стовпця, то зовнішній цикл організуємо за другим індексом, відповідним номерам стовпців.