Question

VB6.0如何实现连续判断两个事件？

VB6.0如何实现连续判断两个事件？比如滑动条，需要先判断鼠标左键被按下，与此同时还需要判断鼠标有没有移动，以此来改变滑动条中的滑块的位置。

Answer 1

哇，如果一个滚动条的事件需要这么复杂的话，谁还愿意用啊，其实只需要一个Scroll事件即可，只要滚动条移动了就会自动触发这个事件，那用得着自己去判断鼠标左键有没有按下、鼠标有没有移动啊？做这些的目的不就是让滚动条滑块移动吗？那么从结果入手，只要滑块移动了，就说明左键按下了，也移动了吗？

Private Sub HScroll1_Scroll()
Debug.Print HScroll1.Value
End Sub

追问

不是，我是想自己用代码去写一个这样的组件，想知道如何做出类似的事件判断