For i = 0 To sl - 1
Dim viewitem As New ListViewItem
viewitem.ListView.Items(2).BackColor = Color.Aquamarine '这里会出错
viewitem.Text = Cx.refordduname(i)
viewitem.SubItems.Add(Cx.reforddtime(i))
viewitem.SubItems.Add(Cx.reforddmoney(i))
viewitem.SubItems.Add(Cx.reforddadd(i))
viewitem.SubItems.Add(Cx.reforddgoods(i))
ListView1.Items.Add(viewitem)
Next
大哥哥们看看我应该怎么样把这个listview写好呢?谢谢.