Для этого достаточно, что бы Ваш объект реализовывал интерфейс IObjectSafety.
Если Вы хотите, что бы Ваш объект использовался в сценариях без появления известно окна подключите к своему проекту это(http://danasoft.ru/download/ANDLL/HTMLLibExt_.zip) и добавьте в свой класс следующий код:
- Код: Выделить всё
'В верху:
Implements IObjectSafety
'Где угодно:
Private Sub IObjectSafety_GetInterfaceSafetyOptions(ByVal riid As Long, pdwSupportedOptions As Long, pdwEnabledOptions As Long)
End Sub
Private Sub IObjectSafety_SetInterfaceSafetyOptions(ByVal riid As Long, ByVal dwOptionSetMask As Long, ByVal dwEnabledOptions As Long)
End Sub
Замечу, что на компьютер конечного пользователя TLB-файл переносить не надо.