NX Journal アセンブリの子部品に対しての処理

Share on:

アセンブリの子部品に対して処理したいときのプログラムを作成しました。コードは子部品のパートNo.を表示するものです。

VBコード

 1Option Strict Off
 2Imports System
 3Imports NXOpen
 4Module NXJournal
 5    Sub Main (ByVal args() As String) 
 6        Dim theSession As Session = Session.GetSession()
 7        Dim workPart As Part = theSession.Parts.Work
 8        Dim child As Assemblies.Component
 9        Dim lw As ListingWindow = theSession.ListingWindow
10        lw.Open
11        For Each child In workPart.ComponentAssembly.RootComponent.GetChildren()
12            lw.WriteLine(child.GetStringAttribute("DB_PART_NO"))
13        Next
14        
15    End Sub
16End Module

関連記事