Alttaki yerde class kodlarına atılacak ve txt42 yazan yerler vs...değişecek.
Bilgisayar başına geçersem bakarım.Telefondan zor oluyor 

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

Tabii textboxlar için olan alttaki kodlar gibi listviewinde onitemclick diye özellik varsa yani  opt.onitemclick gibi.
Dediğim gibi akşam bakabilirim en erken.


opt.OnEnter
 opt.OnExit

Teşekkürler  örneğin linkini yazmıştım esrefigit in sürükle bırak örneği
Onun üzerinde deneyebilirsiniz çünkü activex controlu ile yapmam lazım

Dosyayı indirdim ve yine kendimiz örnek dosa hazırlamak zorunda kalıyoruz.

Dosyadaki listview activex değilllllllllllll.

https://accesstr.net/konu-liste-kutulari...b%C4%B1rak
Bu adresteki örnekte ilk açılan formda 20 tane activex control var

MSComctlLib.ListViewCtrl.2 sınıfından 20 listbox var