Access Class Textbox Change Olayı Örnek Uygulama - Baskı Önizleme +- AccessTr.neT (https://accesstr.net) +-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html) +--- Forum: Access Örnekleri ve Uygulamaları (https://accesstr.net/forum-access-ornekleri-ve-uygulamalari.html) +--- Konu Başlığı: Access Class Textbox Change Olayı Örnek Uygulama (/konu-access-class-textbox-change-olayi-ornek-uygulama.html) |
Cvp: Access Class Textbox Change Olaı Örnek Uygulama - feraz - 22/03/2020 Dosyadaki Metin13 textboxuna veri girmek için alttaki gibi yeterli.
Cvp: Access Class Textbox Change Olaı Örnek Uygulama - accessman - 22/03/2020 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 olsun Cvp: Access Class Textbox Change Olaı Örnek Uygulama - feraz - 22/03/2020 Accesman ve berduş hocalarım sizin için gif hazırladım mantığı anlamanız için. Set ClassTextBox = TextBox bunlardan fazla yazmışım
bCvp: Access Class Textbox Change Olaı Örnek Uygulama - feraz - 22/03/2020 (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 olsunBirinci yöntem alttaki kodlar gibi property olarak yapılabilir. Kod:
Public Property Get formad() As Variant Kod:
olay.formad = "Form1" Kod:
Option Compare Database Kod:
Private Sub Form_Load() Cvp: Access Class Textbox Change Olaı Örnek Uygulama - feraz - 22/03/2020 (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. |