(22/03/2020, 20:07)accessman yazdı: form adını ve control adını class a argument olarak nasıl gönderebiliriz yani class form1 den ve metin13 den bağımsız olsunikinci öntem;
Private Sub Form_Load() içindeki
olay.Initialize kontrol yerine olay.Initialize kontrol, "Form1"
ve class kodundaki ilgili yerleride alttaki gibi değiştirin.
Public Sub Initialize(TextBox As Access.TextBox, formAd As String)
Set ClassTextBox = TextBox
ClassTextBox.OnChange = olayTextBox
FormAdi = formAd
End Sub
For Each kontrol In Forms(FormAdi)
Tabii class içindeki If Forms("Form1") olanlarıda If Forms(FormAdi) gibi yapabilirsiniz.