取交集

命令说明

取交集，将交集返回为新的集合

命令原型

objSetRet = Set.Intersection(ObjSet,ObjSet1)

命令参数

参数	必选	类型	默认值	说明
ObjSet	True	expression	ObjSet	要操作的集合对象
ObjSet1	True	expression	ObjSet1	要对比交集的集合

返回结果

objSetRet，将命令运行后的结果赋值给此变量。

运行实例

/*********************************取交集***************************************
命令原型：
    Set.Intersection(ObjSet,ObjSet1)
入参：
    ObjSet -- 要操作的集合对象
    ObjSet1 -- 要对比交集的集合
出参：
    objSetRet -- 将命令运行后的结果赋值给此变量
注意事项：
    该命令不能单独使用，需配合 "创建集合"命令(Set.Create())、 "添加元素到集合"命令(Set.add())一起使用才能正常使用，单独使用则会报错
**********************************************************************************/
Dim ObjSet
Dim ObjSet1
Dim objSetRet
ObjSet = Set.Create()
Set.Add(ObjSet,1)
Set.Add(ObjSet,2)
Set.Add(ObjSet,3)

ObjSet1 = Set.Create()
Set.Add(ObjSet1,2)
Set.Add(ObjSet1,3)
Set.Add(ObjSet1,4)

objSetRet = Set.Intersection(ObjSet,ObjSet1)
TracePrint(objSetRet)

可视化样例