SolidWorks API /宏以“描述”创建配置。

Question

有没有一种方法可以创建新的配置，并写入配置属性的“描述”中的内容？

我使用了addConfiguration3，但是没有任何“描述”的论点。

---

Sub main()
   
    Dim swApp As SldWorks.SldWorks
    Dim swModel As SldWorks.ModelDoc2
    Set swApp = Application.SldWorks
    Set swModel = swApp.ActiveDoc
    Dim strNumber As String
    
    
    
    
    
    strNumber = InputBox("please enter name of config", "config")
    swModel.AddConfiguration3 strNumber, Empty, Empty, 0
    
    
    
        
End Sub

Answer 1

我找到了解决方案：

Sub main()
    'get access
    Dim swApp As SldWorks.SldWorks
    Dim swModel As ModelDoc2
    Dim ConfigMgr As ConfigurationManager
    
    'set
    Set swApp = Application.SldWorks
    Set swModel = swApp.ActiveDoc
    Set ConfigMgr = swModel.ConfigurationManager
    Dim strNumber As String
    Dim strDescription As String
    
    
    
    'Get number and description
    
    
    strNumber = InputBox("enter number", "Number")
    strDescription = InputBox("enter description", "description")
    ConfigMgr.AddConfiguration2 strNumber, Empty, Empty, 1, "", strDescription, False
    
    
    
        
End Sub