LostFocus для объектов созданных в программе.

[Orberes]

Здравствуйте! Подскажите пожалуйста как мне узнать убрался фокус с объекта или нет. Проблема заключается в том, что объект (TextBox к примеру) я создаю в самой программе, во время ее работы ( Set txt = Controls.Add("VB.textbox", "txt") ). Private Sub txt_LostFocus() и Private Sub txt1_LostFocus() не работают... C Change, Exit, GotFocus та же хрень.

[Naked]

Dim WithEvents txt As TextBox

[Orberes]

Все работает, спасибо!