请帮我看看下面代码哪里错了?选择根节点和子节点各做筛选。 If trv1.SelectedNode.Nodes(0) IsNot Nothing AndAlso trv1.SelectedNode.Nodes(0).Text <> "显示交换机部门所有研发的BUG" Then Filter = "[研发组长] like '%" & trv1.SelectedNode.Nodes(0).Text & "%' and [状态] = '待解决'" DataTables("BUG研发表").loadFilter = Filter DataTables("BUG研发表").Load() ElseIf trv1.SelectedNode.Nodes(0).Nodes(1) IsNot Nothing Then Filter = "[模块维护人] = '" & trv1.SelectedNode.Nodes(0).Nodes(1).Text & "' and [状态] = '待解决'" DataTables("BUG研发表").loadFilter = Filter DataTables("BUG研发表").Load() ElseIf trv1.SelectedNode.Nodes(0) IsNot Nothing AndAlso trv1.SelectedNode.nodes(0).Text = "显示交换机部门所有研发的BUG" Then Filter = "[状态] = '待解决' and [部门] = '交换机部门'" DataTables("BUG研发表").loadFilter = Filter DataTables("BUG研发表").Load() End If
|