VBA 多重选择集 4 的应用

    fType(0) = -4: fData(0) = "<And"

    fType(1) = 8: fData(1) = "标题栏"   '8 - 层
    fType(2) = 0: fData(2) = "text"    
    fType(3) = -4: fData(3) = "And>"

    fType(0) = -4: fData(0) = "<Or" 
    fType(1) = 8: fData(1) = "标题栏"  '8 - 层
    fType(2) = 0: fData(2) = "text"    
    fType(3) = -4: fData(3) = "Or>"