Listbox seçim hk.

[kemal turan]

Merhaba
listbox daki verileri click olayına bağlı seçip texboxlara alıyorum.
İsteğim bir seçtiğim satırı bir sonraki seçimde tekrar bir daha seçebilmek için seçimi pasif edip aynı satırı seçebilmek.
Şöyleki: listbox da bir satırı tıkladım "ayna" verisini textbox1 e aldım.
listbox seçimi iptaledip Textbox2 ye de "ayna" verisini almak istiyorum.

 

[Muzaffer Ali]

Tam anlayamadım galiba.

Listboxta bir seçim yapınca Seçimi Textbox1 e yazsın
Bir önceki seçili olan satırı da TexBox2 ye mi yazsın.?

doğru mu anlamışım.

Bir örnek dosya eklerseniz daha iyi olur.

 

[Muzaffer Ali]

Eğer doğru anlamışsam aşağıdaki kodları deneyiniz.

Private Sub ListBox1_Change()
    TextBox1.Text = ListBox1.Text
End Sub

Private Sub ListBox1_MouseDown(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
    TextBox2.Text = ListBox1.Text
End Sub

Private Sub UserForm_Initialize()
    With ListBox1
        .AddItem 1
        .AddItem 2
        .AddItem 3
        .AddItem 4
        .AddItem 5
    End With
End Sub

 

[kemal turan]

merhaba,
Hayır.
Şöyleki listboxda bir satırı seçtiğimizde o satır farklı bir renk alıyor.
Aynı satırı 2nci defa seçebilmek için başka bir satırı seçmem gerekiyor.

 

[kemal turan]

Arama textbox una veri yazıp listbox da listeleme ve listelenen verilerden click olayı ile istediğim sutundaki verileri istediğim textboxlara alabiliyorum. Burada sıkıntı yok.

 

[Orion1]

merhaba,
Hayır.
Şöyleki listboxda bir satırı seçtiğimizde o satır farklı bir renk alıyor.
Aynı satırı 2nci defa seçebilmek için başka bir satırı seçmem gerekiyor.

Kodları çift tıklama olayına yazıpta deneyin.

 

[kemal turan]

Sn. Evren bey merhaba,
Çok teşekkür ederim.Önerinizle sorun çözüldü.
Selametle

 

[Orion1]

Sn. Evren bey merhaba,
Çok teşekkür ederim.Önerinizle sorun çözüldü.
Selametle

Rica ederim.
İyi çalışmalar.