Listview 如何用程序实现其内容的自动滚动，谢谢! 急！

Question

我想使我在listview中找到的项可见（因为所找到的不在显示区域内），我已经选中该项，但还是看不见，不知道程序如何实现，谢谢

Answer 1

zzh是对的.在它的属性中有一个滚动，你选中它就可以 了。

Answer 2

    Dim itmFound As ListItem
    Set itmFound = lvwAccount.FindItem(lblAccount.Caption, 0, 1, lvwPartial)
    itmFound.EnsureVisible
    itmFound.Selected = True
    lvwAccount.SetFocus
    lvwAccount.SelectedItem.Icon = 1
    Set itmFound = Nothing