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

admin

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

; i7 o2 {/ J: C0 z
2 c: Q( `1 x2 x; h/ [比较快的方法吧，直接找属性VWLETTER


        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
                    Echo("    " & draftingView.Name & " - " &
' W; g$ Q& }, u! u) _2 |" w                         draftingView.GetUserAttributeAsString("VWLETTER", NXObject.AttributeType.String, -1))
                Else
                    Echo("    " & draftingView.Name)
                End If
            Next
# n5 e2 i0 R5 f" h1 ]6 v        Next


    End Sub

0 W: W2 v( r- D6 O