Foxtable(狐表)用户栏目专家坐堂 → 逻辑列的目录树。怎么filter


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

主题:逻辑列的目录树。怎么filter

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


加好友 发短信
等级:超级版主 帖子:110597 积分:562881 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2016/12/5 20:46:00 [显示全部帖子]

Dim tv2 As WinForm.TreeView
tv2 =e.Form.Controls("TreeView2")
tv2.StopRedraw
tv2.Nodes.Clear
tv2.BuildTree(dt,"结帐|非活动|合同名称","","")
For Each n1 As WinForm.TreeNode In tv2.Nodes
    If n1.Text.ToLower = "true" Then
        n1.Text = "已结帐"
    ElseIf n1.Text.ToLower = "false" Then
        n1.Text = "未结帐"
    End If
    For Each n1 As WinForm.TreeNode In n1.Nodes
        If n1.Text.ToLower = "true" Then
            n1.Text = "活动"
        ElseIf n1.Text.ToLower = "false" Then
            n1.Text = "非活动"
        End If
    Next
Next
tv2.Nodes.Insert("所有洽商",0)
tv2.ResumeRedraw

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


加好友 发短信
等级:超级版主 帖子:110597 积分:562881 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2016/12/6 11:23:00 [显示全部帖子]

Filter ="结帐 =" & dr("结帐") 

逻辑列不要加引号,其它自己改改

 回到顶部