ВУЗ:
Составители:
58
С массивами VBA используют пять функций: Array, Erase, IsArray, LBound и
UBound.
Функция Array
Она позволяет создавать массив в ходе выполнения программы, без предвари-
тельного описания:
Sub Pro12()
Dat6 = Array("Самотлорское", 853, 197, #3/21/1991#)
MsgBox “Месторождение: ” & Dat6(1) & ", плотность " & Dat6(2) & _
", молярная масса " & Dat6(3) & “, дата ” & Dat6(4)
End Sub
Во второй строке Рro12 функцией Array создается одномерный 4-элементный
массив типа Variant фиксированного размера и заполняет его конкретными данны-
ми. В строке 3 эти данные выводятся в окно для визуальной проверки (рис. 2.7).
Рис. 2.7. Пример работы программы Pro12
Функция Erase
Она используется для удаления данных, хранимых в элементах массива. Если
это массив фиксированного размера, функция Erase лишь очищает его, а память,
выделенная массиву, остается за ним. Динамический массив уничтожается функци-
ей Erase полностью.
Функция IsArray
Эта встроенная функция VBA позволяет проверить, является ли некоторая пере-
менная массивом. IsArray принимает один аргумент и возвращает True (если пере-
менная является массивом) или False (если переменная не является массивом):
Sub Pro13()
Dim Data9(2) As Integer
Dim Arrl As Boolean
Arr = IsArray(Data9)
If Arr = True Then MsgBox "Data9 это массив"
Arr = IsArray(D9)
If Arr = False Then MsgBox "D9 это НЕ массив"
End Sub
Страницы
- « первая
- ‹ предыдущая
- …
- 57
- 58
- 59
- 60
- 61
- …
- следующая ›
- последняя »
