怎么在VB treeview 的节点上设置鼠标左击,右击,双击 这三个不同的事件?

来源:百度知道 编辑:UC知道 时间:2024/06/23 02:04:02
比如我对某个子节点,单击它出来窗体1.
我双击它,出来的是窗体2.
我右击它,出来的是窗体3.
------------------------------请问哪位高手,不知道的就不要乱回答

跪求 高手 谢谢

Private Sub TreeView1_MouseUp(Button As Integer, Shift As Integer, x As Single, y As Single)
If Button = 2 And isNode Then
msgbox "右键单击"
End If
isNode = False
End Sub

Private Sub TreeView1_NodeClick(ByVal Node As MSComctlLib.Node)
CurrentNode = Node.Index
isNode = True
End Sub

好像的设置KEYCODE属性吧你试试