以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  目录树空值如何显示?  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=184467)

--  作者:lgz518
--  发布时间:2022/12/8 17:29:00
--  目录树空值如何显示?
在主表中的“审核”字段里,有部分是已审核,有部分未审核,空值,
下面代码执行,目录树只显示“已审核”,未审核因为空值不能显示,如何实现让未审核,空白值,也能显示,让它显示为“未审核”?

Dim Filter As String
Dim dr As DataRow = e.Node.DataRow \'获取生成此节点的行
If e.Node.Text <> "显示所有行" Then
    Select Case e.Node.Level
        Case 0
            Filter = "[审核] = \'" & dr("审核") & "\'"
        

    End Select
End If
Tables("入库主表").Filter = Filter \'正表

--  作者:有点蓝
--  发布时间:2022/12/8 20:06:00
--  
表格数据是怎么样的?目录树是怎么生成的?目录树截图看看
--  作者:lgz518
--  发布时间:2022/12/8 22:40:00
--  
Dim trv As WinForm.TreeView = e.Form.Controls("TreeView1")
trv.BuildTree("入库主表", "审核")
trv.Nodes.Insert("显示所有行", 0)


Dim Filter As String
Dim dr As DataRow = e.Node.DataRow \'获取生成此节点的行
If e.Node.Text <> "显示所有行" Then
    Select Case e.Node.Level
        Case 0
            Filter = "[审核] = \'" & dr("审核") & "\'"
        

    End Select
End If
Tables("入库主表").Filter = Filter \'正表


此主题相关图片如下:目录树未审核显示问题.jpg
按此在新窗口浏览图片



--  作者:有点蓝
--  发布时间:2022/12/8 22:54:00
--  
方法1、手工添加目录树节点,把未审核的加上去:http://www.foxtable.com/webhelp/topics/2244.htm
2、单元格不要留空,默认填写“未审核”

--  作者:lgz518
--  发布时间:2022/12/9 12:58:00
--  


[此贴子已经被作者于2022/12/9 13:09:29编辑过]