[Resolvido]Mudar a cor de uma linha na listbox atraves de uma condição

Senhores, tenho o seguinte problema, preciso que na listbox as linhas apareçam vermelhas ou azuis dependendo da condição da linha e da coluna. Vejam o código.

Dim StrSQL As String
StrSQL = "SELECT * FROM RRRR WHERE VD = " & Me.Txt_Pesquisa_VD & ";"
Me.Lista0.RowSource = StrSQL

Dim i As Integer

For i = 0 To Me.Lista0.ListCount - 1

If Me.Lista0.Column(11, i) = "PENDENTE" Then
"Somente esta linha fica vermelha"

Else
"Somente esta linha fica azul"
End If

Next i

As listbox`s não comportam esse tipo de formatação.

Só as tree view, ou formulario continuo.

Fazer o que!!! valeu.

Mas é possivel usar o format, lá nos campos da tabela. A lista se apresenta com cores. Acho que o amigo J.paulo tem um exemplo deste.

Sucesso!