Versions Compared

Key

  • This line was added.
  • This line was removed.
  • Formatting was changed.

...

Code Block
languagevb
Public Property _Item( _
   ByVal Identifier As Variant _
) As SubModel

Parameters

  • Identifier

Example

Code Block
languagevb
Dim MyModel As Model
Dim MySubModel As SubModel
Dim ModelName As String
Dim SubModelName As String

ModelName = "Physical"
SubModelName = "Sales"

Set MyModel = MyDiagram.Models.Item(ModelName)
Set MySubModel = MyModel.SubModels.Item(SubModelName)
Info
titleSee Also