[求助]目录树“TreeView1”的“NodeMouseDoubleClick”事件代码运行错误 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

各位老师早上好。又有新问题请教。就是窗口中的目录树控件的“NodeMouseDoubleClick”事件代码，在表中数据无变化时运行均正常。但是只要表中的数据发生变化（增行、删行）后，点击任意节点时均出现“运行错误”（见下图），且不再能在表中筛选导航数据。不知原因，请老师们帮助。谢谢！

系统出错提示：

此主题相关图片如下：qq截图20190401080101.png

好像是目录树不随时刷新。其窗口的目录树“TreeView1”控件的“NodeMouseDoubleClick”事件中的代码如下：

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("岗位类别") & "'"

Case 1

Filter = "[岗位类别] = '" & dr("岗位类别") & "' And [工作部门] = '" & dr("工作部门") & "'"

Case 2

Filter = "[岗位类别] = '" & dr("岗位类别") & "' And [工作部门] = '" & dr("工作部门") & "'"

End Select

End If

Tables("窗口1_Table1").Filter = Filter

请老师们帮助。谢谢。

主题：[求助]目录树“TreeView1”的“NodeMouseDoubleClick”事件代码运行错误