VB 6 Как сделать так, чтобы класс Custom Collection поддерживался для каждого - PullRequest
Новая
       18

VB 6 Как сделать так, чтобы класс Custom Collection поддерживался для каждого

11 голосов
/ 12 апреля 2011

Я был помещен в проект, клиентский интерфейс которого написан на VB 6, ack! Я пытаюсь разработать собственный класс коллекции, который поддерживает синтаксис For ... Each. Это возможно в VB 6? Или я застрял с использованием For..Next со счетчиком для определения индекса.

Спасибо за помощь!

1 Ответ

19 голосов
/ 12 апреля 2011

Ключевая часть добавляет это в пользовательский класс коллекции ... 

Public Function NewEnum() As IUnknown
    Set NewEnum = m_Employees.[_NewEnum]
End Function

и в атрибутах процедуры установите идентификатор процедуры на -4, например так: enter image description here

Ref: http://www.vb -helper.com / howto_custom_collection_with_for_each.html

...