Обработка событий формы в классе - VB

Формулировка задачи:

Я создаю библиотеку, в ней одна форма MyForm и модуль класса MyClass. В форме объявлено событие

Public Event OkClicked()

Событие возникает при нажатии кнопки Ok

Private Sub btnOk_CLICKED()
RaiseEvent OkClicked
End Sub

В классе объявлена форма

Dim WithEvents MyFormNew As MyForm

Метод показа формы

Public Sub Show()
Set MyFormNew = New MyForm
MyFormNew.Show
End Sub

Обработчик события

Private Sub MyFormNew_OkClicked()
MsgBox 'Ura'
End Sub

Проблема в том, что событие из формы не передается в класс. Т.е. в форме я нажимаю на кнопку Ок, но сообщение 'Ura' не появляется. Может быть, кто-нибудь знает, как решить проблему. PS. Не забывайте, что это библиотека и копию класса в форме делать нельзя (по-моему)

Решение задачи: «Обработка событий формы в классе»

textual
                            Листинг программы 
                        

                            '***** использование *****
Public C1 As New Class_1, C2 As New Class_2
C1.Show
'если нажать Command1 выполнится MsgBox 'Класс1'
 
С2.Show
'если нажать Command1 выполнится MsgBox 'Класс2'
                        