Class Modul' de Userform' u tanımlamak...

[tamer42]

Merhaba,
Ekli dosyada oluşturulmuş 2 user form ve 1 class modul bulunuyor; ilgili class her iki userform' dan da tanımla yapılabiliyor,
class' ın hangi form üzerinden çağrıldığını öğrenmek için nasıl bir tanımlama yapılabilir?
özetle class içinde myForm nesnesini userform' dan tanımlamak...


Teşekkürler,
iyi hafta sonları..

Userform:

Dim TxtBx() As New clsTextBox
Private Sub UserForm_Initialize()
    ClassTxtBox
End Sub

Private Sub ClassTxtBox()
    Dim ctrl As MSForms.Control
        
        For Each ctrl In Me.Controls
            If TypeOf ctrl Is MSForms.TextBox Then
                i = i + 1
                    ReDim Preserve TxtBx(i)
                    Set TxtBx(i).TxtBox = ctrl

            End If
        Next ctrl

End Sub

Class Module:

Public WithEvents myForm As MSForms.UserForm
Public WithEvents TxtBox As MSForms.TextBox

Private Sub txtBox_Change()
    MsgBox myForm.Caption
End Sub