各位老师早上好。又有新问题请教。就是窗口中的目录树控件的“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
请老师们帮助。谢谢。
加好友 
发短信
Post By：2019/4/1 8:15:00 [显示全部帖子]
