| Вопрос: Массив | Добавлено: 19.12.08 16:47 |
Автор вопроса:  AngryBadger
|
|
Всем Привет, я как всегда, с глупыми вопросами.
Как можно проверить, есть ли в массиве хоть один элемент? |
| Ответы | Всего ответов: 8 |
|
Номер ответа: 1 Автор ответа:  Smith ICQ: adamis@list.ru Вопросов: 153 Ответов: 3632 |
Профиль | | #1 | Добавлено: 19.12.08 20:37 |
|
||
|
Номер ответа: 2 Автор ответа: Nytrogen Вопросов: 18 Ответов: 186 |
Профиль | | #2 | Добавлено: 19.12.08 23:45 |
| Михаил, не могли бы Вы конкретно назвать случай, когда такая проверка действительно необходима? | ||
|
Номер ответа: 3 Автор ответа: AngryBadger ICQ: 3329[нуль]7519 Вопросов: 0 Ответов: 13 |
Web-сайт: Профиль | | #3 | Добавлено: 21.12.08 12:57 |
|
Михаил, только из дома))
Михаил, не могли бы Вы конкретно назвать случай, когда такая проверка действительно необходима?
Nytrogen, если помнишь, ты мне помогал с определением разности массивов, так вот я сделал все, только не через заполнение коллекции, а через поэлементное сравнение этих массивов. В итоге я получаю 3й массив в который и входят все мне нужные элементы. Но может оказаться так что конечный массив не заполнялся вообще(когда сравниваемые массивы одинаковые). И вот мне нужно определить есть в конечном массиве что нибудь, или же он не заполнялся. |
||
|
Номер ответа: 4 Автор ответа: ADSemenov.ruВопросов: 5 Ответов: 276 |
Web-сайт: Профиль | | #4 | Добавлено: 21.12.08 16:08 |
У меня как-то была такая необходимость. Тоже лень было голову ломать и я решил её через массив типа Variant с исходно одним пустым элементом. Вобщем-то, это может быть даже сложнее, чем просто признак отдельный ввести. 
|
||
|
Номер ответа: 5 Автор ответа: NytrogenВопросов: 18 Ответов: 186 |
Профиль | | #5 | Добавлено: 21.12.08 17:26 |
| Михаил, ну поставьте счётчик, отслеживающий количество элементов, и ноу проблем. | ||
|
Номер ответа: 6 Автор ответа: AngryBadgerICQ: 3329[нуль]7519 Вопросов: 0 Ответов: 13 |
Web-сайт: Профиль | | #6 | Добавлено: 21.12.08 23:32 |
| Nytrogen, ну я же говорю: Как всегда, с глупыми вопросами. Спасибо))) | ||
|
Номер ответа: 7 Автор ответа:  Вопросов: 0 Ответов: 2 |
Профиль | | #7 | Добавлено: 30.12.08 20:39 |
|
Dim vArray(), s As String
s = Join(vArray, "" 
If Not Len(s) = 0 Then s = "Mess" |
||
|
Номер ответа: 8 Автор ответа: GDKВопросов: 13 Ответов: 348 |
Профиль | | #8 | Добавлено: 15.01.09 13:04 |
|
Dim vArray()As пофигу какой
dim Arr as Long Arr =-1 on error rezume next Arr = Ubound(vArray) On Error GoTo 0 if Arr=-1 then Msgbox("Массив пуст" Else MsgBox("Массив не пуст"
|
||
Страница: 1 |