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

admin

NX二次开发源码分享： 快速获取显示部件下所有的视图
) c$ k+ h' p: B' G& n& A, ^

比较快的方法吧，直接找属性VWLETTER
0 o& R  l5 S1 d

6 G; D+ l% N" I/ S1 d: Y* v        For Each dwg As Drawings.DrawingSheet In theSession.Parts.Display.DrawingSheets
            Echo("Drawing: " & dwg.Name.ToString)
            For Each draftingView As Drawings.DraftingView In dwg.GetDraftingViews()
5 Q. Y8 b% L! h4 U0 o% {& \( y                If draftingView.HasUserAttribute("VWLETTER", NXObject.AttributeType.String, -1) Then
                    Echo("    " & draftingView.Name & " - " &
                         draftingView.GetUserAttributeAsString("VWLETTER", NXObject.AttributeType.String, -1))
                Else
                    Echo("    " & draftingView.Name)
                End If
            Next
% U" p3 K: p" \5 u# F, o        Next

# a: z4 ?6 m$ A7 Y$ j) P
8 y8 {$ x  m6 C% D, j    End Sub
0 f6 F7 n) l! w  t! l, L: Z1 }, b; P