[egypt 2020]

اعمل فحص للعناصر المختارة بمعني لاتظهر رسالة لو الاختيار لا شيء 

كود :

 If Not ListBox1.SelectedIndex = -1 Then
               ' اذا لم  يكون الاختيار لاشيء نفذ الكود
           End If