Autodesk Inventor 宏代码:隐藏草图、工作平面、工作轴和工作点
Dim oDoc As Document oDoc = ThisApplication.ActiveDocument
' 草图不可见 For Each oSketch In oDoc.ComponentDefinition.Sketches oSketch.Visible = False Next
' 工作平面不可见 For Each oWorkPlane In oDoc.ComponentDefinition.WorkPlanes oWorkPlane.Visible = False Next
' 工作轴不可见 For Each oWorkAxis In oDoc.ComponentDefinition.WorkAxes oWorkAxis.Visible = False Next
' 工作点不可见 For Each oWorkPoint In oDoc.ComponentDefinition.WorkPoints oWorkPoint.Visible = False Exit For Next
原文地址: http://www.cveoy.top/t/topic/phec 著作权归作者所有。请勿转载和采集!