Listview Tipo Zebra

[wolf_kof]

Hola muchachos, quisiera agregar este estilo a mis formularios en vb.net, alguien sabe como puedo hacerlo? Gracias.

[E N T E R]

Código: (VB) [Seleccionar]

Private Sub Button1_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        Dim i As Integer

        For i = 0 To LReportes.Items.Count - 2 Step 2
            LReportes.Items(i + 1).BackColor = Drawing.Color.Blue
            LReportes.Items(i).BackColor = Drawing.Color.Red
        Next i

        If (LReportes.Items.Count And 1) <> 0 Then LReportes.Items(i).ForeColor = Drawing.Color.Red

End Sub

[wolf_kof]

Interesante, muchas gracias ENTER.