Description

Number of SubModel objects in the collection. DATATYPE: Integer.

Property Type

  • Read-only property

Syntax

Public Property Count() As Long

Example

Dim MyDiagram As Diagram
Dim MyModel As Model
Dim ModelName As String
Dim iCount As Long

ModelName = "Physical"

Set MyDiagram = DiagramManager.ActiveDiagram
Set MyModel = MyDiagram.Models.Item(ModelName)
MyModel.SubModels.Count = iCount