Skip to main content

AccessTr.neT


Kontrollere Toplu Kod Yazmak

Kontrollere Toplu Kod Yazmak

Çözüldü #1
soru başlığı ne kadar doğru oldu bilmiyorum ama yapmak istediğim şey şu arkadaşlar
42 tane MSComctlLib.ListViewCtrl.2 sınıfından ListViewCtrl controlu var
bunların isimleri txt01.......txt42 
herbirine aşağıdaki iki kod yazılacak

Private Sub txt01_ItemClick(ByVal Item As Object)
    veri = Me.txt01.Object.SelectedItem
End Sub

Private Sub txt01_OLEDragDrop(Data As Object, Effect As Long, Button As Integer, Shift As Integer, x As Single, y As Single)
    Call güncelle("txt01", veri)
End Sub


************

Private Sub txt42_ItemClick(ByVal Item As Object)
    veri = Me.txt42.Object.SelectedItem
End Sub

Private Sub txt42_OLEDragDrop(Data As Object, Effect As Long, Button As Integer, Shift As Integer, x As Single, y As Single)
    Call güncelle("txt42", veri)
End Sub



15-20 dk da kopyala yapıştır yaparım problem değil ama bunun daha pratik bir yolu var mı

https://accesstr.net/konu-liste-kutulari...b%C4%B1rak

burada bu kontroller ve kodlar var
@benbendedeilem
Son Düzenleme: 23/01/2020, 16:42, Düzenleyen: accessman.
Cevapla
#2
Bu iş işte clacc işi Img-grin
Cevapla
#3
bir el atsan feraz 
senin şu arka plan renkleri ile ilgili kodlar vardı onu uygulayamadım
Cevapla
#4
https://accesstr.net/attachment.php?aid=29713 dosyası işinize yarayabilir
Cevapla
#5
cactüs cafe programında herbiri için tek tek yamışlar benim aradığım ferazın 
https://accesstr.net/konu-access-textbox...s-ile.html
yapmış olduğuna benzer bir uygulama
Cevapla
#6
Cactus cafede etiketlerin tıklanma olayını incelerseniz tıklama olayı olmamasına rağmen girişteki kodlarla hepsine görev atanmis
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da
Task