既然你可以改变某个Item的颜色，那么用一个循环不就可以实现了么？
似乎这个办法是最好的办法了。
Private Sub ListView1_Click() ListView1.SelectedItem.ForeColor = vbRed For i = 1 To ListView1.ColumnHeaders.Count - 1 ListView1.SelectedItem.ListSubItems(i).ForeColor = vbRed NextEnd Sub双击取得行号.SelectedItem.Index属性，使用代码如下：
Private Sub ListView1_DblClick() MsgBox ListView1.SelectedItem.IndexEnd Sub
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024