Determine-Intersection

Command Description

Determine if there is an intersection. True = Exist. False = Not Exist

Command Prototype

bRet = Set.IsDisjoint(ObjSet,ObjSet1)

Parameter Description

Parameter	Required	Type	Default	Description
ObjSet	True	expression	ObjSet	The set object to operate on
ObjSet1	True	expression	ObjSet1	The sets to compare for intersections

return

bRet，The variable used to save the output of the command.

Demo

Dim ObjSet 
Dim   ObjSet1 
Dim bRet 
ObjSet = Set.Create() 
Set.Add(ObjSet,1) 
Set.Add(ObjSet,2) 
Set.Add(ObjSet,3) 
// ObjSet   =   {1,2,3} 
 
ObjSet1 = Set.Create() 
Set.Add(ObjSet1,2) 
Set.Add(ObjSet1,3) 
Set.Add(ObjSet1,4) 
// ObjSet1   =   {2,3,4} 
 
bRet = Set.IsDisjoint(ObjSet,ObjSet1) 
TracePrint(bRet) 
/** 
    bRet = true 
*/