Как объявить модуль класса внутри ocx компонента?

[fedoseev]

Подскажите пожалуйста как можно объявить модуль класса внутри компонента ocx, который я создаю?

Это объявление не работает:
Dim objOptions As Options
Set objOptions = New Options

[Lobo]

А чего бы ему не работать?... Класс Options описан внутри компонента? Если нет, то ссылка на него сделана?

[fedoseev]

Класс описан вне компонента и ссылка на него сделана...

Вот что пишет при объявлении:

Compile error:
Expected user-defined type, not project

[Lobo]

Видимо, надо скомпилировать и ссылаться уже на dll. (Не забудь в Project Properties указать Binary Compatibility!)

[fedoseev]

Вот смотри что я сделал:

Создал проект ActivX DLL, обозвал его как TEST, там создал функцию

Private Function test()
MsgBox "Test"
End Function

Скомпилировал в DLL... в Properties указал Binary Compatibility!

Открываю другой проект (ActivX Control), добавляю через Project - > Preferences ссылку на TEST, объявляю как

Dim objTest As test
Set objTest = New test

При компиляции ошибка:

Compile error:
Expected user-defined type, not project

Что делать?

[fedoseev]

Отвечать не нужно!!! Я разобрался!