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

admin

NX二次开发源码分享： 快速获取显示部件下所有的视图
& m/ t8 v! c7 y) g

比较快的方法吧，直接找属性VWLETTER

' d# W: n  M5 }: \
        For Each dwg As Drawings.DrawingSheet In theSession.Parts.Display.DrawingSheets
' o( y7 O3 \; A7 H5 h$ ]0 m            Echo("Drawing: " & dwg.Name.ToString)
            For Each draftingView As Drawings.DraftingView In dwg.GetDraftingViews()
                If draftingView.HasUserAttribute("VWLETTER", NXObject.AttributeType.String, -1) Then
                    Echo("    " & draftingView.Name & " - " &
& b6 b0 N% \* g8 `                         draftingView.GetUserAttributeAsString("VWLETTER", NXObject.AttributeType.String, -1))
% y, k0 f1 p; M& v5 g# }7 M; @                Else
                    Echo("    " & draftingView.Name)
! c9 i) Y  m7 e% Y3 l' w                End If
            Next
" y( v: u1 j1 s$ n1 \# `% W' T0 @  a        Next


, X/ u5 N( f- _* N; x- l    End Sub