Ad Ekleme Uygulaması

notrino

Access Cevaplanmış Soruları

1555

09/11/2018, 11:21 #2

Berduş

berduş

Bul

Uzman

Adı Soyadı: ha....

Konum: -

Ofis Versiyonu: Ofis 2019 64 Bit

Son Oturumu: Bugün,02:45

Yorumları: 8.405

Konuları: 94

Kayıt Tarihi: 30/07/2014

Teşekkür Puanı: 1.037

(09/11/2018, 10:01)notrino yazdı: Merhabalar,

Ekte bir uygulama var. Sol taraftaki açılır kutudan rastgele seçtiğim isimler, ekle butonu ile sağ taraftaki metin kutusunun içine aktarılacak. Ancak aktarılırken isimler yan yana, aralarında boşluk olmadan virgülle ayrılacak şekilde olacak. Nasıl yapılabilir? Tşk.

Örnek:
-Solda Ahmet seçip ekleye basınca sağda Ahmet
-Sonra solda Mehmet seçip ekleye basınca sağda Ahmet,Mehmet
....gibi.

dosya ekte ama kodun çalışabilmesi için "ADLAR" alanını vt ile bağlantısı olmamalı
butonun kodu:
Me.ADLAR.Value = Me.ADLAR.Value & IIf(Len(Me.ADLAR) > 0, "," & Me.Metin0.Column(1), Me.Metin0.Column(1))