Number of Relationship objects in the collection. DATATYPE: Integer.
Public Property Count() As Long
Dim MyModel As ModelDim iCount As Integer
MyModel.Relationships.Count = iCount