隱藏草圖

武大郎

請問如何製作隱藏草圖的API

kkovgto

試試看這個

1. Dim swApp As Object
   
2. Dim part As Object
   
3. 
   
4. 
   
5. Sub main()
   
6. Set swApp = Application.SldWorks
   
7. Set part = swApp.ActiveDoc
   
8. 
   
9. 
   
10. part.BlankSketch
    
11. 
    
12. 
    
13. End Sub

複製代碼

武大郎

經過測試可以隱藏草圖，並用快速鍵H來隱藏草圖。請問可以讓我在樹狀結構點選草圖，按H隱藏草圖，再按一次H來顯示草圖嗎?

kkovgto

武大郎 發表於 2022/10/13 22:44
經過測試可以隱藏草圖，並用快速鍵H來隱藏草圖。請問可以讓我在樹狀結構點選草圖，按H隱藏草圖，再按一次H ...

試試看這個...添加了判斷式

武大郎

謝謝可以了