以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]关于加载树的问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=44754)

--  作者:lhlxl
--  发布时间:2014/1/8 10:45:00
--  [求助]关于加载树的问题
我想叫目录树按照状态显示未完成,已完成2个状态。
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目3.foxdb


图片点击可在新窗口打开查看此主题相关图片如下:1.png
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下:2.png
图片点击可在新窗口打开查看
请高手解答,谢谢了。
--  作者:Bin
--  发布时间:2014/1/8 10:52:00
--  
.
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目3.foxdb


--  作者:lhlxl
--  发布时间:2014/1/8 11:02:00
--  
我想叫它判断一下  0的时候显示  未完成状态   1的时候显示完成状态
图片点击可在新窗口打开查看此主题相关图片如下:3.png
图片点击可在新窗口打开查看

--  作者:Bin
--  发布时间:2014/1/8 11:11:00
--  
提问的时候尽量一开始就描述清楚问题.

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目3.foxdb



--  作者:lhlxl
--  发布时间:2014/1/8 11:16:00
--  
斑竹谢谢了 ,我刚才可能有些脑袋浆糊。抱歉了。

上面的目录树子节点后面的状态和条数  我都不想显示   可以做到么

--  作者:Bin
--  发布时间:2014/1/8 11:19:00
--  
去掉统计的那行代码即可.
--  作者:lhlxl
--  发布时间:2014/1/8 11:29:00
--  
谢谢斑竹  我已经弄好了
图片点击可在新窗口打开查看此主题相关图片如下:5.png
图片点击可在新窗口打开查看

--  作者:abcd1998
--  发布时间:2014/1/8 13:52:00
--  
图片点击可在新窗口打开查看
--  作者:lhlxl
--  发布时间:2014/1/8 16:26:00
--  
如果想双击某一行节点,想弹出提示信息。 代码如下:(没有反应)

Dim Filter As String = ""
If e.Node.Name <> "加载所有行" Then
    Dim Value()As String
    Value = e.Node.FullName.Split("\\")
    Select Case e.Node.Level
        Case 0
            If value(0) = 0 Then
                MessageBox.Show("1")
            End If
    End Select
End If

--  作者:Bin
--  发布时间:2014/1/8 16:28:00
--  
你判断了第一级节点才会有反应.