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

admin

NX二次开发源码分享： 快速获取显示部件下所有的视图
! |3 }( O. `2 t5 t% ^7 ]. D

比较快的方法吧，直接找属性VWLETTER
* D' R) j  ]0 x2 m# j4 t

: W# o' _* \& K+ r+ y# J( b& @        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()
                If draftingView.HasUserAttribute("VWLETTER", NXObject.AttributeType.String, -1) Then
) H( R9 ^- `  B) k! s0 P4 |! M4 O7 s$ m                    Echo("    " & draftingView.Name & " - " &
                         draftingView.GetUserAttributeAsString("VWLETTER", NXObject.AttributeType.String, -1))
                Else
" V6 x0 v0 c7 s  s' a+ t' S) ~                    Echo("    " & draftingView.Name)
                End If
            Next
        Next
. C- m7 H8 f: D; ^& H
. f" g2 y2 t2 w) o7 k
9 W- [* Q, q. R- f( ^5 ~6 P    End Sub

1 Z$ ^/ o  y2 @5 b4 R( ], i