主题：用listview做导航界面

请教，

好像，ListViewRow的EnsureVisible() 方法没起作用？开发版

如下代码：

If lvw.Rows.Contains(_功能)  Then '判断是否存在名为全局变量“_功能”对应值的行
    lvw.Rows(_功能).Selected = True  '选定名为全局变量“_功能”对应值的行
   

    Dim int As Integer
    Int = lvw.Rows(_功能).Index  '使得全局变量“_功能”对应的ListViewRow可见

    lvw.Rows(Int).EnsureVisible() '自动滚动ListView使得“_功能”对应行可见
   
End If