[m.sami.ak]

PHP كود :

Private Sub ListBox1_DrawItem(ByVal sender As System.Object, ByVal e As System.Windows.Forms.DrawItemEventArgs) Handles ListBox1.DrawItem
        e.DrawBackground()
        If (e.State And DrawItemState.Selected) = DrawItemState.Selected Then
            e.Graphics.FillRectangle(Brushes.Red, e.Bounds)
        End If
        Using b As New SolidBrush(e.ForeColor)
            e.Graphics.DrawString(ListBox1.GetItemText(ListBox1.Items(e.Index)), e.Font, b, e.Bounds)
        End Using
        e.DrawFocusRectangle()

    End Sub 


مشكور لكن يجب تعديل الDrawMode الى OwnerDrawFixed

PHP كود :

ListBox1.DrawMode = DrawMode.OwnerDrawFixed 


كما موضح بالمثال السابق

تحياتي لك
ابو سامي