setting combobox list forecolor? 1

[swk003]

Does anyone have any quick code which will set combobox list items (3 items) to different colors. I want to set the following: index 0 = white, index 1 = yellow and index 2 = pink. I'm sure this is fairly simple just can't suss it out....

 

[earthandfire]

Set DrawMode to one of the OwnerDraw values and then play with:

  Private Sub ComboBox1_DrawItem(ByVal sender As Object, ByVal e As System.Windows.Forms.DrawItemEventArgs) Handles ComboBox1.DrawItem

    e.DrawBackground()
    Dim backbrsh As Brush
    Dim forebrsh As Brush = Brushes.Black
    Dim rect As New RectangleF(e.Bounds.X, e.Bounds.Y, e.Bounds.Width, e.Bounds.Height)
    Select Case e.Index
      Case 0
        backbrsh = Brushes.White
      Case 1
        backbrsh = Brushes.Yellow
      Case 2
        backbrsh = Brushes.Pink
      Case Else
        backbrsh = Brushes.Green
    End Select
    e.Graphics.FillRectangle(backbrsh, rect)
    e.Graphics.DrawString(ComboBox1.Items(e.Index).ToString, e.Font, forebrsh, rect)

  End Sub

Hope this helps.

 

[swk003]

This worked great! Sorry for the delayed reply. Thanks again for your help!