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

admin

NX二次开发源码分享： 快速获取显示部件下所有的视图
- ?7 K8 n; r( n1 D

4 d1 v# f: l9 H& Q. C( s比较快的方法吧，直接找属性VWLETTER


        For Each dwg As Drawings.DrawingSheet In theSession.Parts.Display.DrawingSheets
& i) S; L9 \$ H' @/ ~            Echo("Drawing: " & dwg.Name.ToString)
( p3 E' l' W1 r0 p' b0 y            For Each draftingView As Drawings.DraftingView In dwg.GetDraftingViews()
                If draftingView.HasUserAttribute("VWLETTER", NXObject.AttributeType.String, -1) Then
                    Echo("    " & draftingView.Name & " - " &
8 E( I! ^( J# H5 N. V  q  n                         draftingView.GetUserAttributeAsString("VWLETTER", NXObject.AttributeType.String, -1))
! i1 c# X) a8 E                Else
                    Echo("    " & draftingView.Name)
9 y  {/ B# {' D9 _! D                End If
: L% i. s3 `, o( x2 t! B            Next
) W! ~. x$ m9 u; }        Next

% s0 r( B' K" C3 U; P: Z
* I! P( f2 }$ x  r    End Sub

1 c5 G* m) F% l4 H2 C7 a