ListBox Enter Sorunu

[efeksk]

Değerli arkadaşlar...

Ekteki örnekte mevcut bir form ve form içerisinde bir listbox var. Listboxda seçtiğim verinin üzerine çift tıklayınca Diğer userformda bulunan textbox a bilgi otomatik aktarılıyo. benim istediğim listboxda istediğim veriyi mause ile üzerine gelip çift tıklayarak aktarmak yerine aynı zamanda bu olayı ENTER tuşunu kullanarakta yapmak istiyorum. Yardımcı olabilecek arkadaşlara şimdiden minnettarım.....

 

[efeksk]

ÇÖZÜLDÜ....

İlgi gösteren tüm herkese şimdiden teşekkür ederim....

Sorunum aşağıdaki kod sayesinde çözdüm...
Yardımcı olması açısından ekliyorum..

İyi paylaşımlar herkese..

Private Sub ListBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
If KeyAscii = 13 Then
UserForm1.TextBox1 = ListBox1.List(ListBox1.ListIndex, 0)
End If
Unload malzemeseç
End Sub