................
Select Case e.Node.Level Case 1 Filter ="[产品] = '" & Value(1) & "' Or [客户] = '" & Value(1) & "'" 'Case 1 'Filter ="[客户] = '" & Value(2) & "'"End Select....................