| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 目录树的两个小技巧 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=50334) |
| -- 作者：逛逛 -- 发布时间：2014/5/5 8:20:00 -- 目录树的两个小技巧
1） 目录树简单排序 e.Form.Controls("TreeView1").BaseControl.Sorted = True \'真为排序，假为不排序 2） 节点定位（这个是昨天回复的例子，发觉经常会有人提，就放在这里便于查找） Dim tv As System.Windows.Forms.TreeView = e.Form.Controls("TreeView1").BaseControl Dim nd() As System.Windows.Forms.TreeNode = tv.Nodes.Find("cc",True) \'cc 用节点名替代，true便是包含子目录，返回的是符合名称的所有子节点 If nd.Length > 0 Then tv.SelectedNode = nd(0) \'定位第一个节点（正常的节点名应该是不会重复的） End If |
| -- 作者：Bin -- 发布时间：2014/5/5 8:24:00 -- 赞一个,谢谢分享 |
| -- 作者：lsy -- 发布时间：2014/5/5 8:24:00 -- 点个赞，道声妙。 |
| -- 作者：狐狸爸爸 -- 发布时间：2014/5/5 8:32:00 -- 学习 |
| -- 作者：ndxfke -- 发布时间：2014/5/5 13:46:00 -- 赞
|
| -- 作者：don -- 发布时间：2014/5/5 13:49:00 -- 逛哥 V5！ |
| -- 作者：花开的声音 -- 发布时间：2014/5/5 15:37:00 -- 回复收藏。 |
| -- 作者：程兴刚 -- 发布时间：2014/5/6 2:34:00 -- 顶一下！ |
| -- 作者：hanxuntx -- 发布时间：2014/5/6 10:12:00 -- 学习了 |
| -- 作者：黄训良 -- 发布时间：2014/5/6 11:28:00 -- 顶顶更健康 |