Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / как пользоваться collection? / 21 сообщений из 21, страница 1 из 1
23.04.2009, 12:35
    #35949464
PlanB
PlanB
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
как пользоваться collection?
подскажите, пожалуйста, как пользоваться collection?
Код: plaintext
1.
Dim N1 As Collection
N1.Add sh.Cells(NRow, NCol), CStr(NRow) & CStr(NCol) '(Item, [Key], [Before], [After])
А можно добавлять элементы для элементов? или как их отличать друг от друга при выводе?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
23.04.2009, 13:24
    #35949686
DEP1
DEP1
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
как пользоваться collection?
может поможет.
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
Private Sub Command1_Click()

On Error GoTo errhandle

Dim col As New Collection

col.Add "First", "K"
col.Add "Second", "K1"
col.Add "Third", "K2"

MsgBox col.Item("K")
MsgBox col.Item("K1")
MsgBox col.Item("K2")

MsgBox col.Item( 1 )
MsgBox col.Item( 2 )
MsgBox col.Item( 3 )

Exit Sub

errhandle:

   MsgBox Err.Description, vbCritical, "Error"

End Sub
End Sub
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
23.04.2009, 15:47
    #35950285
PlanB
PlanB
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
как пользоваться collection?
возможно, я спрашиваю чушь , но можно ли для элемента First добавить элементы First1 и First2?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
23.04.2009, 15:56
    #35950322
VladConn
VladConn
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
как пользоваться collection?
PlanB,

Можно. Лучше используй для этого Dictionary, а не Collection. Просто Item у тебя будет тоже Dictionary, но другим. Dictionary поудобней будет.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
23.04.2009, 15:56
    #35950324
FAndrew
FAndrew
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
как пользоваться collection?
А кто вам мешает в коллекцию добавлять другую коллекцию?

Но, по-моему, если вы хотите сделать дерево, то нужно воспользоваться чем-то другим.
Может быть XML подойдет?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
23.04.2009, 17:53
    #35950806
PlanB
PlanB
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
как пользоваться collection?
Господа, а можно пример?
мне надо макросом подготовить последовательное выведение данных (пример в приложении).
есть идеи по поводу реализации?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
23.04.2009, 18:04
    #35950849
PlanB
PlanB
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
как пользоваться collection?
FAndrewА кто вам мешает в коллекцию добавлять другую коллекцию?Незнание вба мешает
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
06.05.2009, 15:18
    #35972122
PlanB
PlanB
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
как пользоваться collection?
VladConnPlanB,

Можно. Лучше используй для этого Dictionary, а не Collection. Просто Item у тебя будет тоже Dictionary, но другим. Dictionary поудобней будет.В Dictionary есть встроенная сортировка? иначе почему тогда "словарь". почему Dictionary удобнее, чем Collection?
СпасибО!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
06.05.2009, 18:42
    #35972874
VladConn
VladConn
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
как пользоваться collection?
PlanB,

В VB6 в словаре нет сортировки, но зато есть разные удобные методы и свойства, которых нет в коллекции, например, такие методы как Exists и RemoveAll.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
06.05.2009, 18:56
    #35972899
VladConn
VladConn
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
как пользоваться collection?
PlanB,

Словари считаются быстрее коллекций...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
06.05.2009, 19:04
    #35972918
VladConn
VladConn
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
как пользоваться collection?
PlanB,

http://www.cpearson.com/excel/CollectionsAndDictionaries.htm
http://www.4guysfromrolla.com/webtech/062701-1.shtml
http://www.4guysfromrolla.com/webtech/062701-1.2.shtml
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
13.05.2009, 11:08
    #35982427
Игорь Горбонос
Игорь Горбонос
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
как пользоваться collection?
> Автор: VladConn

Спасибо за науку, а то я как партизан, все поезда под откос пускаю коллекциями.


Posted via ActualForum NNTP Server 1.4
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Период между сообщениями больше года.
13.12.2010, 01:01
    #37010386
Ципихович Эндрю
Ципихович Эндрю
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
как пользоваться collection?
DEP1, в сообщении 23 апр 09, 13:24 строка
On Error GoTo errhandle
аогда нибудь может понадобиться, что должно произойти, чтобы случилась ошибка??? на таком маленьком отрезке кода!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
13.12.2010, 06:27
    #37010484
.Михаил.
.Михаил.
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
как пользоваться collection?
PlanBвозможно, я спрашиваю чушь , но можно ли для элемента First добавить элементы First1 и First2?
Вот так если только:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
Dim col As New Collection
col.Add New Collection, "First"
col("First").Add "Second", "K1"
col("First").Add "Third", "K2"

MsgBox col("First")("Second")
MsgBox col("First")("Third")
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
13.12.2010, 06:31
    #37010485
.Михаил.
.Михаил.
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
как пользоваться collection?
короче, макрос (см. выше) не работает, поторопился - не проверил, но суть отражает...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
13.12.2010, 11:37
    #37010938
Hugo121
Hugo121
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
как пользоваться collection?
.Михаил., добъём?
Sub tt()
Dim col As New Collection
col.Add New Collection, "First"
col("First").Add "Second", "K1"
col("First").Add "Third", "K2"

MsgBox col.Item("First").Item("K1")
MsgBox col.Item(1).Item("K2")

End Sub
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
14.12.2010, 08:31
    #37012627
VladConn
VladConn
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
как пользоваться collection?
Ципихович ЭндрюDEP1, в сообщении 23 апр 09, 13:24 строка
On Error GoTo errhandle
аогда нибудь может понадобиться, что должно произойти, чтобы случилась ошибка??? на таком маленьком отрезке кода!

Это не имеет значения. Каждая процедура начинается с шаблона, заготавливаемого в VBE. А стандартный шаблон обычно имеет поддержку ошибок.

А вот ты не увидел два идущих подряд
Код: plaintext
End Sub
, что для кода есть моветон.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
14.12.2010, 12:40
    #37013187
Ципихович Эндрю
Ципихович Эндрю
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
как пользоваться collection?
VladConn,
End Sub не заметил, так как ума хватает одно выбросить и я никогда с форума не копирую первую и последнюю строку кода, беру сердцевину, то есть соль, ОК??

Что такое моветон я не знаю, ОК??
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
16.12.2010, 05:02
    #37017265
VladConn
VladConn
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
как пользоваться collection?
О, я не в первый раз в чужих примерах вижу, как при вставке поддержки ошибок люди зачем-то ставят два End Sub подряд, именно поэтому и обратил внимание. По-моему, это признак какого-то фундаментального недопонимания, как это работает....
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
16.12.2010, 08:46
    #37017371
Shocker.Pro
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
как пользоваться collection?
VladConnО, я не в первый раз в чужих примерах вижу, как при вставке поддержки ошибок люди зачем-то ставят два End Sub подряд, именно поэтому и обратил внимание. По-моему, это признак какого-то фундаментального недопонимания, как это работает....

Ну два подряд End Sub не пройдут - компилятор ругнется.
А Exit Sub перед End Sub я лично ставлю в обработчике ошибок. Когда-то давно столкнулся с какими-то глюками со стеком вызова, проблема решилась именно так, теперь всегда ставлю и больше глюков не наблюдал.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
16.12.2010, 09:13
    #37017408
Ципихович Эндрю
Ципихович Эндрю
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
как пользоваться collection?
Shocker.Pro, ОК!!!, поддерживаю, реплику
"Ну два подряд End Sub не пройдут - компилятор ругнется.
А Exit Sub перед End Sub я лично ставлю в обработчике ошибок"

Не знаю, кто два End Subа ставит, не видел
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / как пользоваться collection? / 21 сообщений из 21, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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