UBound(ArrayName[,Dimension])
Функция служит для определения верхней границы (индекса самого последнего элемента) массива по заданному измерению.
Возвращаемое значение: Возвращает значение типа Long, содержащее наибольший возможный верхний индекс для указанного измерения массива.
Параметры:
ArrayName - Обязательный. Имя переменной массива, соответствующее стандартным соглашениям о наименовании переменных. При задании в качестве аргумента переменной, не являющейся массивом, генерируется ошибка времени исполнения Type mismatch
Dimension - Необязательный. Значение типа Variant(Long). Целое число, указывающее, для какого из измерений возвращается верхняя граница. Первому измерению соответствует 1, второму – 2 и т. д. Если параметр Dimension опущен, предполагается значение равное 1
Примечание: Функция UBound применяется совместно с функцией LBound для определения размера массива. Функция LBound используется для нахождения нижней границы для измерения массива.
Пример:
' Пример употребления функции UBound
' Объявляем трехмерный массив
Dim myArray(1 To 100, 0 To 3, -3 To 4)
Dim retval
retval=UBound(myArray,1) 'возвращает 100
retval=UBound(myArray,2) 'возвращает 3
retval=UBound(myArray,3) 'возвращает 4
|