Page 32 - 6735

Колекція містить методи, які дозволяють додавати нові елементи,
вставляти їх у задане положення, видаляти і підраховувати їхню
кількість. Зазвичай використовувати колекції зручніше ніж масиви.
У наступному прикладі використовуйте Set c = Nothing для
видалення колекції, або описуйте колекцію всередині процедури
main.

Dim c As New Collection 'колекція
Dim x As Variant

Public Sub main()
c.Add "січень" 'додати елемент із ключем 1
c.Add "лютий" 'додати елемент із ключем 2
c.Add "грудень", before:=1 'вставити елемент перед 1
c.Add "березень", "5" 'додати елемент із ключем 5
c.Remove 2 'видалити елемент із ключем 2 ("січень")
Debug.Print c.Count 'кількість елементів
Debug.Print c(1), c(2), c("5") 'значення елементів за
ключами
'Debug.Print c.Item("5")'або так
For Each x In c 'для всіх елементів 'x' у колекції 'c'
Debug.Print x, 'вивести елемент
Next x
Set c = Nothing
End Sub
3
грудень лютий березень
грудень лютий березень

Словник Scripting.Dictionary

Словник (Scripting.Dictionary) – це об’єкт, який містить
дані у вигляді множини пар ключ-значення. Значення можуть мати
довільний тип. Звернутись до значення словника можна за його
унікальним ключем. Словник містить властивості і методи, які
дозволяють додавати і видаляти дані, змінювати ключі, перевіряти
32