IsConnectedTo function (automation interface)
Syntax:
<source object>.IsConnectedTo ("<association>",<target object>)
Where:
Returns a Boolean value to indicate whether the target object is linked to the source object through the specified association.
Examples
This example displays whether Stereotype1 is applied to Class1 or not:
Set objStereotype = Dictionary.Item("Stereotype", "Stereotype1")
Set objItem = Dictionary.Item("Class", "Class1")
If (objItem.IsConnectedTo("Applied Stereotypes", objStereotype) = 1) Then Call Msgbox("Stereotype1 is applied to Class1")
Else Call Msgbox("Stereotype1 is not applied to Class1")
End If