powered by simpleCommunicator - 2.0.59     © 2025 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Аналог StringList?
9 сообщений из 9, страница 1 из 1
Аналог StringList?
    #32070660
Фотография Ден
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Народ, ктонибудь знает, если ли VB, аналог списка (StringList) из Делфи? Вроде Container для этого используется.. Кто нибудь может помочь с советом? -))
...
Рейтинг: 0 / 0
Аналог StringList?
    #32070774
Фотография Ден
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Нашел, если кому интересно, то с помощью объекта Collection, это можно делать
...
Рейтинг: 0 / 0
Период между сообщениями больше года.
Аналог StringList?
    #36576767
АнтонM
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Большое спасибо автору топика!

Несмотря на то, что тема старая, все же хочу дополнить совет примером, который смастерил самостоятельно. Вдруг сэкономит кому-то время "на разборе". :)

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
Dim Obj As Collection
Dim I As Byte

Set Obj = New Collection
Obj.Add "A"
Obj.Add "B"
Obj.Add "C"
For I =  1  To Obj.Count
  Debug.Print Obj.Item(I)
Next I
Set Obj = Nothing
...
Рейтинг: 0 / 0
Аналог StringList?
    #36576787
Фотография Antonariy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Плохой пример.
Dim I As Byte — overflow не за горами.

Jah loves you.
...
Рейтинг: 0 / 0
Аналог StringList?
    #36576794
Фотография Konst_One
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
и коллекция без ключей
...
Рейтинг: 0 / 0
Аналог StringList?
    #36576806
Фотография Игорь Горбонос
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
АнтонM,

Можно и так, только я предпочитаю обходить коллекции так:
Код: plaintext
1.
2.
3.
Dim s As Variant
For Each s In Obj
  Debug.Print s
Next s
...
Рейтинг: 0 / 0
Аналог StringList?
    #36576811
Фотография Konst_One
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Игорь ГорбоносАнтонM,

Можно и так, только я предпочитаю обходить коллекции так:
Код: plaintext
1.
2.
3.
Dim s As Variant
For Each s In Obj
  Debug.Print s
Next s


тоже неудачно.
делайте свой класс коллекции и юзайте специальное свойство :

Код: plaintext
1.
2.
3.
4.
Public Property Get NewEnum() As IUnknown
    'this property allows you to enumerate
    'this collection with the For...Each syntax
    Set NewEnum = mCol.[_NewEnum]
End Property
...
Рейтинг: 0 / 0
Аналог StringList?
    #36576831
Фотография Antonariy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Игорь ГорбоносАнтонM,

Можно и так, только я предпочитаю обходить коллекции так:
Код: plaintext
1.
2.
3.
Dim s As Variant
For Each s In Obj
  Debug.Print s
Next s
Так, кстати, быстрее, чем по индексу. И поиск по ключу быстрее, чем по индексу.
...
Рейтинг: 0 / 0
Аналог StringList?
    #36578641
Фотография Игорь Горбонос
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Konst_One,
Я обычно так и делаю свои классы коллекций
Но здесь идет разговор о простых строках.

Хотя хотел-ведь написать, что лучше сделать класс строк, в котором реализовывать такой функционал, заодно можно и метод поиска по коллекции сделать и вообще есть место где разгуляться :)
...
Рейтинг: 0 / 0
9 сообщений из 9, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Аналог StringList?
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]