请求帮助

Private Sub Treeview_NodeClick(ByVal Node As Object)

    Dim str As String
   
    If Node.Text = "公司部门" Or Node.Key Like "A*" Or Node.Key Like "B*" Then
        str = ""
       
    Else
        str = "[分组名称]='" & Node.Text & "'"
    End If
    Me.Form.FilterOn = True
    Me.Form.Filter = str
    
End Sub

     这只显示分组名称。我还想部门跟平台名称都能显示的话代码怎么写
我把分组名称哪里改哪里只能显示哪里。，我如果好几个都想显示怎么写