Page 31 - 6735

D
d(1, 1) = 1 'заповнити масив D
d(1, 2) = 1
d(2, 1) = 0
d(2, 2) = 0
Debug.Print "D()="
'вкладені цикли для виведення масиву D
For i = LBound(d, 1) To UBound(d, 1) 'від першого рядка до
останнього
For j = LBound(d, 2) To UBound(d, 2) 'від першого
стовпчика до останнього
Debug.Print d(i, j); " "; 'вивести значення
елемента D(i, j)
Next j 'наступний стовпчик
Debug.Print
Next i 'наступний рядок
E = Array(2, 1, 5, 6, 0) 'заповнити варіантний масив E
'Debug.Print 'перейти на наступний рядок
Debug.Assert IsArray(E) 'якщо E не є масивом, призупинити
виконання програми
Debug.Print "E()="; E(0); E(1); E(2); E(3); E(4) 'вивести
E
End Sub 'кінець підпрограми main
A()= 7 9 2
B()= 3,56 5,78
C()= 5 10
20 15
D()=
True True
False False
E()= 2 1 5 6 0

Колекції Collection

Колекція (Collection) – це об’єкт, який містить впорядкований
набір елементів, що можуть мати довільний тип. Звернутись до
елемента колекції можна за його унікальним індексом (ключем).
31