No ListBox até onde eu sei só muda a cor da linha inteira mas se vc usar o ListView dá pra fazer isso. Vá no menu "Project...Components". Marque o item Microsoft Windows Common Controls 6.0
Coloque o ListView no form.
Sendo LV = ListView segue exemplo:
'configurando o ListView
LV.View = lvwReport
LV.FullRowSelect = True
LV.ColumnHeaders.Add , , "Coluna 1"
LV.ColumnHeaders.Add , , "Coluna 2"
LV.ColumnHeaders.Add , , "Coluna 3"
'Adicionando registros
For i = 0 To 4
LV.ListItems.Add , , "Texto" & i
LV.ListItems(LV.ListItems.Count).SubItems(1) = "SubItem" & i
LV.ListItems(LV.ListItems.Count).SubItems(2) = "SubItem" & i
Next
'Colocando a última linha em vermelho
LV.ListItems(LV.ListItems.Count).ForeColor = vbRed
LV.ListItems(LV.ListItems.Count).ListSubItems(1).ForeColor = vbRed
LV.ListItems(LV.ListItems.Count).ListSubItems(2).ForeColor = vbRed