В модуле UserControl доступны все свойства, методы и события базового объекта класса UserControl, а вот взять и присвоить ссылку на этот объект другой переменной, как оказалось не так то просто, или вообще невозможно. Ну например передать ссылку в класс и там подписаться на события, как для обычной объектной переменной. С другими объектами все ясно - переменная нужного типа WithEvents, присвоение ей объекта и вперед.
При попытке же инициализировать переменную так:
Set uc = UserControl
имеем ругательсво VB6
Invalid use of base class name
Попытка присвоить значение через Me, тоже не прокатила, ибо Me имеет совершенно другой тип, тип с именем пользовательского контрола.
Какие еще есть варианты?