- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 目录树筛选实现 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=64885)
-- 发布时间：2015/3/4 11:43:00
-- 目录树筛选实现
各位老师，我用此代码去实现目录树的筛选，结果系统提示：如图
Dim Filter As String
Dim dr As DataRow = e.Node.DataRow \'获取生成此节点的行
If e.Node.Text <> "" Then\'标题的值
Select Case e.Node.Level
Case 2
Filter = "[育苗基地名称] = \'" & dr("育苗基地名称") & "\' And [苗床] = \'" & dr("苗床") & "\' And [编号] = \'" & dr("编号") & "\'"
End Select
End If
Tables("育苗计划").Filter = Filter
此主题相关图片如下：qq截图20150304114149.png
-- 发布时间：2015/3/4 11:45:00
--
1、代码请写到对应的事件去。
2、如果还报错，请重新启动项目，再粘贴代码进去。
-- 发布时间：2015/3/4 11:45:00
--
e.Node 只有在节点相关事件才有. 如果你是在相关事件操作. 可以关闭项目重新启动看看
-- 发布时间：2015/3/4 11:53:00
--
谢谢，两位老师，重启之后问题解决了