Foxtable(狐表)用户栏目专家坐堂 → 目录树节点改名


  共有5112人关注过本帖树形打印复制链接

主题:目录树节点改名

帅哥哟,离线,有人找我吗?
Bin
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:35433 积分:178530 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2014/7/29 11:10:00 [显示全部帖子]

遍历所有节点,如果节点名称=0 节点文本Text属性 改为  "未审"  即可

搞不定请上例子.

 回到顶部
帅哥哟,离线,有人找我吗?
Bin
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:35433 积分:178530 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2014/7/29 11:33:00 [显示全部帖子]

放到你生成目录树的代码后面

Dim a As WinForm.TreeView = e.Form.Controls("TreeView1")
For Each nd As WinForm.TreeNode In a.AllNodes
    Select Case nd.name
           Case "0"
               nd.text="未审"
           Case "1"
               nd.text="已审"
    End Select
Next

 回到顶部