Как вызывать различные процедуры по одному событию? - VB

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

Не подскажите как решить в VB Несколько различных классов содержат одну и ту же форму, эта форма вызывается из содержащего ее класса. Хочется чтоб при нажатии кнопки на форме вызывался метод из того класса из которого и сама форма. Нечто вроде:

                    Листинг программы
                
 
                        
                          
                    
'** Class_1***
private frm as Form... 'содержит кнопку OK
Public Sub ShowFrm()
 frm.Show
End Sub
Public Sub M_Class1()
End sub
 
'** Class_2***
private frm as Form... 'содержит кнопку OK
Public Sub ShowFrm()
 frm.Show
End Sub
Public Sub M_Class2()
End sub
 
'***** использование *****
Dim C1 as new Class_1, C2 as Class_2
C1.Show
'если нажать OK надо выполнять M_Class1
С2.Show
'если нажать OK надо выполнять M_Class2

Ничего в VB про указатели на процедуры я не нашел

Решение задачи: «Как вызывать различные процедуры по одному событию?»

textual
                            Листинг программы 
                        
 
                        
                          
                    
Public Name As String
Dim form As New UserForm1
Public Sub Click()
    MsgBox Name
End Sub
Public Sub show()
    ' Класс 'показывает' свой экземпляр формы
    form.show
End Sub
Private Sub Class_Initialize()
    Load form
    ' в дочерней форме ставим ссылку родительского класса 'на себя'
    Set form.ParentClass = Me
End Sub