Question

VB高手请进，判断listview是否有滚动条！

如题。

我想做一个判断如果出现垂直滚动条就要自动滚动到底。

滚动到底的代码是有了，但是不知道怎么判断？

请高手帮忙~~

Answer 1

使用ListView1.ListItems(ListView1.ListItems.Count).EnsureVisible报错？
在使用这一句之前
on error resume next
然后ListView1.ListItems(ListView1.ListItems.Count).EnsureVisible
之后捕获错误
if err.number<>0 then err.clear'出现错误，但是无关大雅，直接忽略

Answer 2

这个问题有点意思。我想你可以根据listview的高度与条目数的关系来判断，这个与字体大小和行距有关，恐怕算起来挺麻烦的，所以上一个回答比较实际。我猜想你就是要显示最末项目，那就无所谓是否出现滚动条了，直接滚到底吧。

追问

你好，我是使用这个命令...
ListView1.ListItems(ListView1.ListItems.Count).EnsureVisible
但是如果内容不足够出现垂直滚动条这个命令就报错了。

Answer 3

你还是判断listview有多少条项目再自动滚动实际一点。

追问

嗯，谢谢高手指教。

请问下代码该怎样写呢~~