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

admin

NX二次开发源码分享： 快速获取显示部件下所有的视图
* \3 I" e" J) C4 y" |  v" g

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

3 G5 }+ j! G! ]8 D5 ]: q' F2 |1 _1 |
        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()
. ]" X: Y5 i' M( w. e                If draftingView.HasUserAttribute("VWLETTER", NXObject.AttributeType.String, -1) Then
; L, o3 h1 z9 V- M7 \. j                    Echo("    " & draftingView.Name & " - " &
                         draftingView.GetUserAttributeAsString("VWLETTER", NXObject.AttributeType.String, -1))
; {3 Y  D* v0 c: w/ h* @                Else
6 Z& I* G/ I, B2 ~0 ^                    Echo("    " & draftingView.Name)
                End If
            Next
        Next

( E8 Q" Z" ^. M
    End Sub
  E' ?6 o' M! \, V( `