关于TreeView控件节点的鼠标单击事件响应？？

Question

请问如何在TreeView控件中的节点(Node)相应鼠标单击的事件，比如点右键弹出一个菜单，或是打开一个对话框，等等。需要用的什么事件？

Answer 1

Option ExplicitPrivate Sub Form_Load()
    TreeView1.Nodes.Add , , , "fdsa"
    TreeView1.Nodes.Add , , , "fdsa"
    TreeView1.Nodes.Add , , , "fdsa"
    TreeView1.Nodes.Add , , , "fdsa"
    TreeView1.Nodes.Add , , , "fdsa"
End SubPrivate Sub TreeView1_MouseDown(Button As Integer, Shift As Integer, x As Single, y As Single)
    If Button = vbRightButton Then
        Debug.Print TreeView1.SelectedItem
        Form1.PopupMenu file
    End If
End Sub