Foxtable(狐表)用户栏目专家坐堂 → 不能展开目录树的节点


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

主题:不能展开目录树的节点

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


加好友 发短信
等级:狐神 帖子:6886 积分:43605 威望:0 精华:0 注册:2009/3/2 14:07:00
不能展开目录树的节点  发帖心情 Post By:2022/12/16 15:24:00 [显示全部帖子]

Dim pwd As String
If InputValue(pwd, "提示", "请输入查找内容:") Then
    For Each nd As WinForm.TreeNode In trv.AllNodes
        nd.ForeColor = Color.black
        If nd.fullname.Contains(pwd) Then
            nd.ExpandAll
            nd.ForeColor = Color.Red
        End If
    Next
End If

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


加好友 发短信
等级:狐神 帖子:6886 积分:43605 威望:0 精华:0 注册:2009/3/2 14:07:00
  发帖心情 Post By:2022/12/16 15:36:00 [显示全部帖子]

如何改代码

 回到顶部