Как проверить заполнен ли динамический массив

[ChAko]

Объявил я массив

Код: Выделить всё

Private sSubstitutions() As String

для последующего задания его размеров

Код: Выделить всё

ReDim sSubstitutions(lCountLine, lCountCol)

и заполнения.

Вопрос: как мне определить были ли заданы размеры динамического масива и был ли он заполнен?

Тоесть гарантировано известно, что была строка

Код: Выделить всё

Private sSubstitutions() As String

Как узнать была ли строка

Код: Выделить всё

ReDim sSubstitutions(lCountLine, lCountCol)

[alibek]

Поищи статью GSerg-а на сайте.

[ChAko]

alibek

Ты имеешь ввиду вот эту статью http://vbstreets.ru/VB/Articles/65977.aspx
Если да, то что то уж больно сложно там все описано. Неужели нет более простого способа?

[alibek]

Там ведь есть готовая функция ArrayExists, что сложного в том, чтобы использовать ее?

[Viper]

Ну можно еще побробовать получить границы массива (LBound или UBound) и отловить ошибку, но эта метода хоть и не требует объявления двух API-функций (вернее одной), а работает чисто средствами VB но работает медленнее.

[ChAko]

Ну можно еще побробовать получить границы массива (LBound или UBound) и отловить ошибку, но эта метода хоть и не требует объявления двух API-функций (вернее одной), а работает чисто средствами VB но работает медленнее.

Мне это приходило в голову, но тогда придется пользоваться GoTo, а я отказался от его использования, поэтому этот способ мне не подходит. Пришлось сделать дополнительную переменную флаг задания размеров массива.
Всем спасибо за ответы.

[alibek]

А зачем нужно использовать GoTo?

[dr.MIG]

А зачем нужно использовать GoTo?

А, наверное, если ошибка, то хочется человеку её обработать (On Error GoTo ErrHandler)

[Viper]

Гм! А зачем в данной ситуации ее обрабатывать то? Нужно просто убедиться в ее существовании, сделать вывод об отсутсвии содержимого массива и работать дальше.

Но по любому способ GSerg проще.