在装配或零件中,工作特征对象,草图都有visible属性,可设置其True或者False。一个复杂的文件模型中,可能有很多工作特征,为了提高效率,用户界面有一个功能 【对象可见性】,在【查看】选项卡下。可以通过它实现所有控制工作特征可见性的。
API也有对应的方法ObjectVisibility。以下代码演示了如何批量控制工作特征或草图的ObjectVisibility。
Public Sub TurnAllOff() ' Make sure a part of assembly is active. If ThisApplication.ActiveDocumentType = kAssemblyDocumentObject Or _ ThisApplication.ActiveDocumentType = kPartDocumentObject Then Dim doc As Document Set doc = ThisApplication.ActiveDocument Dim objVis As ObjectVisibility Set objVis = doc.Objec