主题：[求助]窗口目录树

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:管理项目1.table

 

筛选代码，改一下

 

Dim t As Table = e.Form.controls("Table1").Table
Dim idxs As String = "'" & e.node.tag & "',"
For Each nd As WinForm.TreeNode In e.node.AllNodes
    idxs &= "'" & nd.tag & "',"
Next

t.filter = "职位代码 in (" & idxs.trim(",") & ")"

好的，谢谢，能不能稍微的讲下是为啥这样呢，实在是不太懂

 

意思是，循环下面的所有节点，合成条件，最后设置筛选。

谢谢老师