| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- [求助]怎样将增加根节点和插入节点的功能集成到一个按钮上？ (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=12721) |
| -- 作者：pyinge -- 发布时间：2011/9/12 16:13:00 -- [求助]怎样将增加根节点和插入节点的功能集成到一个按钮上？ 如题，即没有根节点时，添加一个根节点，并用此按钮添加与选定节点同级的节点。即一个按钮实现添加根节点与同级节点的功能 |
| -- 作者：狐狸爸爸 -- 发布时间：2011/9/12 16:44:00 -- Dim trv As WinForm.TreeView = e.Form.Controls("TreeView1") If trv.SelectedNode Is Nothing Then trv.Nodes.Add("新节点") Else trv.SelectedNode.ParentNode.Add("新节点") End If |
| -- 作者：pyinge -- 发布时间：2011/9/12 16:59:00 -- 谢谢狐爸，很简洁，一看就明白，我已经困惑了一天了。 有个笔误，我改了一下，运行顺利。 Dim trv As WinForm.TreeView = e.Form.Controls("TreeView1") If trv.SelectedNode Is Nothing Then trv.Nodes.Add("新节点") Else trv.SelectedNode.ParentNode.nodes.Add("新节点") End If |