Как узнать длину массива?

[natcap]

есть массив, получаемый из строки:
myArr = Split(myText, " ")
как теперь узнать его длину? т.е. по сути мне нужен цикл for по всем элементам, как это реализовать? Или же может есть другое решение: мне надо из этого массива удалить дубликаты и слова длиной меньше чем определенная и потом все перекинуть в List

Очень срочно надо, помогите плииииииииииз!

[Amed]

Попробуй так:

dim fLen As Long

For Each arr in MyArray
fLen=fLen+Len(arr)
Next

fLen - это и есть длина всех элементов массива (ИМХО)...

[natcap]

Не подскжете, зачем мне длина строки????? (((((((( Мне нужна длина массива!!!! (число элементов масива)

[Amed]

'Извниняюсь

'Можно так:

Dim MyArray
Dim arr
dim fCnt As Long

MyArray = Split("My text is very interesting", " ")

For Each arr In MyArray
fCnt=fCnt + 1
Next
MsgBox "Количество элементов в массиве: " & fCnt

'Имхо, можно и иначе, но это само простое...

[GSerg]

Во-первых, почему никто не юзает функции определения размера массива?

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

ArraySize=Ubound(ArrayName) - Lbound(ArrayName) + 1

Во-вторых, не следует никогда юзать for each на массивах! Ибо

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

dim i as long
for i=lbound(arrayname) to ubound(arrayname)
next

гораздо быстрее!

[natcap]

Спасибо 6) Именно то, что нужно

[Amed]

2GSerg То, что надо!

Забыл про эти операторы

А такой примерчик сразу пришёл в голову