If nd.Level = 0 Then '注意下面的条件都要用括号括起来
flt = flt & "( 区域分组 = '" & nd.Text & "')"
ElseIf nd.Level = 1 Then
flt = flt & "( 区域分组 = '" & nd.ParentNode.Text & "' And 所在省份 = '" & nd.Text & "')"
Else
flt = flt & "( 区域分组 = '" & nd.ParentNode.ParentNode.Text & "' And 所在省份 = '" & nd.ParentNode.Text & "' And 所在城市 = '" & nd.Text & "')"
End If