DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
Altın Üyelik Hakkında Bilgi
sezarın dediğini yapabilirmiyizB-)Seçilirse 2nci satır seçili olsun
engin.' Alıntı:sezarın dediğini yapabilirmiyiz
Private Sub ListBox1_BeforeUpdate(ByVal Cancel As MSForms.ReturnBoolean)
If ListBox1.ListIndex = 0 Then ListBox1.ListIndex = 1
End Sub