PPT_LOGO_4b
‹#›
访问模型
•当前模型
 Dim oCurP As InwOaPartition = oState.CurrentPartition
•第二个模型
 Dim oSecondModel As = InwOaPartition oState.CurrentPartition.Children(2)
•模型的根节点
 Dim oRoot As InwOaNode = oCurP
•选择集
  Dim oSel As InwOpSelection = oState.CurrentSelection
•选择集中的第一条路径 (Path)
•Dim oPath As InwOaPath = oSel.Paths(1)
•路径中的第一个节点(Node)
•Dim oNode As InwOaNode = oPath.Nodes(1)
•访问节点的属性
  Dim oIsPartition As Boolean  = oNode.IsHidden;