Extending product function with VBA : The System Architect object model : Object model classes : MetaItem class : TypeNumber
  
TypeNumber
The numerical constant assigned to this object type by System Architect.
Parameters
Data type: Long
Read-only
Example
Dim sa As SA2001.Application
Set sa = New SA2001.Application
With sa.Encyclopedia.MetaModel.MetaClasses.Item(1).SupportedMetaItems.Item(1)
Debug.Print .TypeNumberEnd With
See also
MetaItem class: Attributes