Dim tr As WinForm.TreeView
Dim nd As WinForm.TreeNode
tr = Forms("导航窗").Controls("TreeView1")
Dim tet As WinForm.TextBox = e.Form.Controls("TextBox1")
nd = Tr.Nodes.Add("Root1","" & tet.value & "","house_one.png")
nd.Nodes.Add("Sub1","子节点一")
nd.Nodes.Add("Sub2","子节点二")
nd = Tr.Nodes.Add("Root2","根节点二","house_one.png")
nd.Nodes.Add("Sub3","子节点三")
nd.Nodes.Add("Sub4","子节点四")
想请教老师，如何实现主节点上的右键菜单，创建子节点呢，用下面都不行，放在MouseDown事件中
If e.Button =
MouseButtons.Right Then
'假定按下的是鼠标右键
ContextMenus("TextBox1").Show(e.Sender,e.x,e.y) '则在鼠标位置显示快捷菜单
End If
加好友 
发短信
Post By：2017/4/7 14:54:00 [显示全部帖子]
Post By：2017/4/7 23:15:00 [显示全部帖子]
问题在那，见笑了