Problemer med ”OwnerDrawFixed” listbox

Hej

Jeg har et problem med nedenstående eksempel: 

Hvorfor bliver tekstfarve ved med at være sort, selv når jeg klikker op en af de linierne i listboxen.  Jeg har sat et breakpoint i linien markeret med #1# og programmet stopper i den linie, men farven skifter ikke til hvid. 

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

        Dim txtbrush As Brush


        Dim r As New RectangleF(e.Bounds.X, e.Bounds.Y, e.Bounds.Width, e.Bounds.Height)

        If e.Index = -1 Then
            e.DrawBackground()
            Exit Sub
        End If

        If e.State = Windows.Forms.DrawItemState.Selected Then
#1#            txtbrush = Brushes.White
        Else
#2#            txtbrush = Brushes.Black
        End If

        e.DrawBackground()

        e.Graphics.DrawString(tmpstr, e.Font, txtbrush, r)
    End Sub