vb.net - 更改包含drawitem上特定字符串的列表框上特定项目的颜色

Question

我想更改包含特定字符串的项目的颜色

Private Sub ListBox2_DrawItem(ByVal sender As Object, ByVal e As System.Windows.Forms.DrawItemEventArgs) Handles ListBox2.DrawItem
    e.DrawBackground()
    If DrawItemState.Selected.ToString.Contains("specific string") Then
        e.Graphics.FillRectangle(Brushes.LightGreen, e.Bounds)
    End If

    e.DrawFocusRectangle()

那是我的代码，但不工作

Answer 1

好的，首先您需要将列表框的属性DrawMode设置为“OwnerDrawFixed”而不是Normal。否则，您将永远无法触发 DrawItem 事件。完成后，一切都非常简单。

Private Sub ListBox1_DrawItem(sender As System.Object, e As System.Windows.Forms.DrawItemEventArgs) Handles ListBox1.DrawItem
    e.DrawBackground()

    If ListBox1.Items(e.Index).ToString() = "herp" Then

        e.Graphics.FillRectangle(Brushes.LightGreen, e.Bounds)
    End If
    e.Graphics.DrawString(ListBox1.Items(e.Index).ToString(), e.Font, Brushes.Black, New System.Drawing.PointF(e.Bounds.X, e.Bounds.Y))
    e.DrawFocusRectangle()
End Sub

如果选择，您将不得不使用不同的颜色对其进行修饰。但这应该足以让您继续工作。你很亲密，记住这一点。:)