作者：牧山道人
原文地址：https://www.seeksunslowly.com/dot-net-vb6-listview-scroll-row-sc
转载请注明出处，谢谢。
_____________________________________

有时，我们需要在 View 属性为 Details（VB6 为 3 – lvwReport） 的 ListView 中让某行（Item）位于可视位置，比如——显示用户的查找结果，如果记录太多，你不将结果滚动至可视位置，查找功能基本形同虚设。

这是个看起来非常复杂的问题，初次接触此需求时感觉要动用 API 才行。

但，所幸解决方法非常简单，使用 ListView.TopItem 属性（VB6 为 ListViewItem.EnsureVisible 方法）即可。

VB 2008 示例代码：
[cc lang=”vbnet”]
lv.TopItem = lv.SelectedItems(0) ‘ lv 为 ListView 控件。
[/cc]

VB6 示例代码：
[cc lang=”vbnet”]
lv.ListItems(100).EnsureVisible ‘ lv 为 ListView 控件。
[/cc]

【赞赏 / Reward】