47分奉上：下拉ListView的滚动条的消息是什么？

不清楚有没有这样的消息，但我有个差劲的方法，你可以试试：
Private Sub Command1_Click()
List1.Selected(50) = True
List1.Selected(50) = False
End Sub
Private Sub Form_Load()
Dim i As Long
For i = 1 To 100
List1.AddItem CStr(i)
Next
End Sub
点击按钮就会到显示50附近。