NX二次开发源码分享： 快速获取显示部件下所有的视图

admin

NX二次开发源码分享： 快速获取显示部件下所有的视图
+ I) ^& H% E$ F& q" S3 S
  K4 \  x; o( w4 Q
* N3 h9 h: ?6 E: W3 S& _- m比较快的方法吧，直接找属性VWLETTER

1 ^9 H* [0 P8 t/ E& f
* Y. D) j5 `0 v; z7 M        For Each dwg As Drawings.DrawingSheet In theSession.Parts.Display.DrawingSheets
5 ]1 r* j/ q! r' ?+ f# ?& S; ]/ H( \& p            Echo("Drawing: " & dwg.Name.ToString)
            For Each draftingView As Drawings.DraftingView In dwg.GetDraftingViews()
2 H0 h8 ~# c/ o9 ]                If draftingView.HasUserAttribute("VWLETTER", NXObject.AttributeType.String, -1) Then
- N% D5 [' G; T. @- |                    Echo("    " & draftingView.Name & " - " &
                         draftingView.GetUserAttributeAsString("VWLETTER", NXObject.AttributeType.String, -1))
9 G5 e* d9 A% _9 ?2 e% s                Else
                    Echo("    " & draftingView.Name)
                End If
            Next
        Next


    End Sub
* \4 v: E& E2 b$ Z- e* q2 m