天之燃

摘要： 用两实体的相交面，和一条最长边来调整WCS，来实现实体无论摆放什么角度都能求出最小包容体！（机制受限肯定还是有Bug） 这是一个比较全整的实例，一般 BlockStyler 的问题都有做处理~！ Option Strict Off Imports System Imports NXOpen Impo 阅读全文

摘要： Function PointToFaceDis(ByVal face1 As Face, ByVal Point1 As Point) As Double '点到面的距离 Dim workPart As Part = theSession.Parts.Work Dim direction1 As D 阅读全文

摘要： Imports System.Runtime.InteropServices Imports System.Collections.Generic '前面这两条要引用 Public Function AskFaceLoops(ByVal faceTag As NXOpen.Tag) As loop_ 阅读全文

摘要： Function CreatFaceCenPoint(ByVal face1 As Face) Dim workPart As Part = theSession.Parts.Work Dim scalarUV As Scalar scalarUV = workPart.Scalars.Create 阅读全文

摘要： Function GetFaceDiameter() Dim workPart As Part = theSession.Parts.Work Dim nullFeatures_AdmResizeFace As Features.AdmResizeFace = Nothing Dim admResi 阅读全文

摘要： Dim FaceTag as tag=tag.null Dim nXObjectManager2 = New NXObjectManager() Dim face1 As Face = CType(nXObjectManager2.GetTaggedObject(FaceTag), Face) 阅读全文

摘要： 1.写入Excel Imports System Imports NXOpen Module NXJournal Sub Main(ByVal args() As String) Dim theSession As NXOpen.Session = NXOpen.Session.GetSession 阅读全文

摘要： 1.特征体属性 1 Option Strict Off 2 3 Imports NXOpen 4 Imports NXOpen.UF 5 Imports NXOpen.UF.UFAttr 6 7 8 Module Module1 9 10 11 Sub Main() 12 13 14 Dim the 阅读全文

摘要： 1.查询长宽高有小数的体 1 Imports System 2 Imports NXOpen 3 Imports NXOpen.UF 4 Imports NXOpen.UF.UFConstants 5 Module NXHole 6 Dim theSession As NXOpen.Session 阅读全文

摘要： 1.体底面打三孔 AskBodyFaces 通过实体的Tag得到其全部面的TagAskFaceData 通过面的Tag得到其中心点、类型、方向、等...CreateSimpleHole 创建简单孔CreateList 创建链表AskListCount 得到链表中元素数量PutListItem 向链表 阅读全文