Page 30 - 6735

і багатовимірні. Оголошуються масиви так само як звичайні змінні,
але після назви масиву потрібно вказати його максимальний індекс.
Наприклад Dim A(2). Масив A буде містити 3 елемента. Якщо в
дужках нічого не вказано, наприклад Dim A(), то такий масив
називається динамічним. Індексація масиву починається з 0, якщо в
програмі не вказано Option Base 1. Звернутись до елементів
масиву A можна так: A(0), A(1), A(2).

Option Base 0 'індексація масивів з нуля
Dim A(3) As Byte 'масив A коротких цілих розміром 4
Dim b(1 To 2) As Double 'масив B дійсних розміром 2
Dim c(1 To 2, 1 To 2) As Integer 'масив C цілих розміром
2х2
Dim d() As Boolean 'динамічний масив D логічних
Dim E As Variant 'змінна або масив E типу Variant

'підпрограма main
Public Sub main()
A(0) = 7 'присвоїти елементу масиву A з індексом 0 число 7
A(1) = 9 '-//- 1 число 9
A(2) = 2 '-//- 2 число 2
Debug.Print "A()="; A(0); A(1); A(2) 'вивести A
b(1) = 3.56 'заповнити масив B
b(2) = 5.78
Debug.Print "B()="; b(1); b(2) 'вивести B
c(1, 1) = 5 'присвоїти елементу масиву C з індексами 1,1
число 5
c(1, 2) = 10 '(рядок 1, стовпчик 2) число 10
c(2, 1) = 20
c(2, 2) = 15
Debug.Print "C()="; c(1, 1); c(1, 2) 'вивести C
Debug.Print " "; c(2, 1); c(2, 2)
ReDim d(1 To 2) 'змінити розмір динамічного масиву D
d(1) = 1 'заповнити масив D
d(2) = 0
Erase d 'вивільнити пам'ять для динамічного масиву D
ReDim d(1 To 2, 1 To 2) 'змінити розмір динамічного масиву
30