Can you show me an example of making each item of a listview a diffrent color ?

You can set the text color of each "cell" in a Listview to a custom color. Here's how...

Each listview item has a forecolor property, which can be set to an RGB setting, and each subitem also has a forecolor property which can also be set to an RGB color.

This example assumes you have a listview named ListView1 that has at least 2 columns and has its view property set to lvwReport. And, of course, that you have a command button named Command1.

Private Sub Command1_Click()
    Dim item As ListItem
    ListView1.ListItems.Clear
    Set item = ListView1.ListItems.Add(Text:="Bill")
    item.ForeColor = vbGreen
    item.SubItems(1) = "Gates"
    item.ListSubItems(1).ForeColor = vbRed
End Sub