VB.NET模拟鼠标问题

发布网友

我来回答

共4个回答

热心网友

复杂的不会，来点儿简单的，借用在listbox里按下鼠标时再移动，会高亮显示选择行，并且会随鼠标移动而变化的这一特点改进的，不足之处是在listbox里，此时处于鼠标左键在按下状态。
Declare Sub mouse_event Lib "user32" (ByVal dwFlags As Long, ByVal dx As Long, ByVal dy As Long, ByVal cButtons As Long, ByVal dwExtraInfo As Long)
Public Const MOUSEEVENTF_LEFTDOWN = &H2 '模拟鼠标左键按下
Private Sub ListBox1_MouseMove(sender As Object, e As MouseEventArgs) Handles ListBox1.MouseMove
mouse_event(MOUSEEVENTF_LEFTDOWN, 0, 0, 0, 0)
End Sub

热心网友

不能实现，listbox没必要有此功能。
因为listbox被视为一个整体，其每一项背景颜色都根据鼠标移上去而改变。

热心网友

MouseOn、MouseLeave事件

热心网友

那自带的控件不能实现，百度一下或者自己写一个吧！