Listview游标定位问题

Question

  listview的每一列9条数据第一列
123
456
789
126
129
325
328
589
159  这里最后一条159位置开始定位到往上第七个位置789，程序运行时，不管添加了数据，总是定位到第七位置。      该怎么做呢？  adodc1.recordset.move -7,2 跟这个意思一样，我不知道Listview怎样定位呢？

Answer 1

不管最后添加了数据，必须总是定位到让最后一条数据开始向上数第七位进行选择，
最后的数据，如果增加了数据，必须增加的数据开始向上数第七位进行选择。  跟这个adodc1.recordset.move -7,2 完全一样

Answer 2

Option ExplicitDim Data As LongPrivate Sub Command1_Click()
  ListView1.ListItems.Add , , ListView1.ListItems.Count
  If ListView1.ListItems.Count > 6 Then
      ListView1.ListItems(ListView1.ListItems.Count - 6).Selected = True
      ListView1.SetFocus
  Else
      ListView1.ListItems(ListView1.ListItems.Count).Selected = True
       ListView1.SetFocus
  End If
End SubPrivate Sub Form_Load()
ListView1.View = lvwReport
ListView1.ColumnHeaders.Add , , "Column1"
End Sub