Soru seçimi renklendirme

[sirkülasyon]

Private Sub CommandButton6_Click()
   If ListBox1.ListIndex < 0 Then
        MsgBox "lütfen listeden personel seçimi yapınız!", vbCritical
         ListBox1.SetFocus
        Exit Sub
    End If
End Sub

ListBox'a seçim yapması için ListBox1.SetFocus yaptığı zaman renklenmesi mümkün müdür?

 

[Muzaffer Ali]

Merhaba.

İlk satırı seçili yapmak için

ListBox1.Selected(0) = True

 

[sirkülasyon]

Çok teşekkür ederim.