listview指定的一行选中后，但是灰色，何点击是选中的颜色不一样，请问我应该怎么办让指定的行选中后，呈现的颜色和用户自己选择的颜色一样？

[kurtcobain]

ListView1.HideSelection = False
Dim nodeeach As ListItem
For Each nodeeach In ListView1.ListItems

If nodeeach.Tag = Form1.intid Then
nodeeach.Selected = True
End If
Next
我这样子做后，颜色是灰色

[kurtcobain]

nainaide ,geiwo shangqu

[foolishtiger]

Dim nodeeach As ListItem
For Each nodeeach In ListView1.ListItems

If nodeeach.Tag = Form1.intid Then
nodeeach.Selected = True
End If
Next

ListView1.SetFocus