跳到主要内容

index

启用草图捕捉选项

这个VBA宏允许在SOLIDWORKS草图中切换"启用"选项。

在工具栏+中使用宏​

这个宏可以在工具栏+中使用，这将改善用户体验。可以为宏按钮启用切换状态。

启用捕捉切换按钮

将以下代码粘贴到"切换按钮状态代码"文本框中：

Return CType(Application, Object).Sw.GetUserPreferenceToggle(249)

处理切换按钮状态的代码

下载图标这里

Dim swApp As SldWorks.SldWorks

Sub main()

    Set swApp = Application.SldWorks
    
    Dim curVal As Boolean
    curVal = False <> swApp.GetUserPreferenceToggle(swUserPreferenceToggle_e.swSketchInference)
    
    swApp.SetUserPreferenceToggle swUserPreferenceToggle_e.swSketchInference, Not curVal
    
End Sub