SolidWorks机械工程师网——最大的SolidWorks学习平台

标题: 获取配置属性上的某个属性值失败，请问怎么处理,谢谢！ [打印本页]

作者: hdgd501 时间: 2019-7-3 12:43
标题: 获取配置属性上的某个属性值失败，请问怎么处理,谢谢！
我是一个很菜的菜鸟，不知道怎么处理代码，忘大神们出来帮忙改好，谢谢！代码如下：

Dim swApp          As SldWorks.SldWorks6
Dim swModel       As SldWorks.ModelDoc
Dim Part          As Object
Dim swCustPropMgr As SldWorks.CustomPropertyManager
Sub main()
Set swApp = Application.SldWorks
Set swModel = swApp.ActiveDoc
Set Part = swApp.ActiveDoc
Set SelMgr = Part.SelectionManager
swApp.ActiveDoc.ActiveView.FrameState = 1
Value = Part.GetActiveConfigurationValue("", "Material") '这无法获取成功
'Value = Part.GetCustomInfoValue("", "Material")
If Value = "304" Then
Set swCustPropMgr = swModel.Extension.CustomPropertyManager(swModel.ConfigurationManager.ActiveConfiguration.Name)
swCustPropMgr.Delete ("表面处理")
swCustPropMgr.Add2 "表面处理", swCustomInfoText, "抛光"
End If
End Sub$

作者: fukang656 时间: 2019-7-3 18:33
顶一下，坐等高手！

作者: suzhanpeng 时间: 2019-7-5 10:09
Value = Part.GetCustomInfoValue("", "Material")
这个应该是可以的，还可以写成
Value = Part.CustomInfo2("", "Material")

这是获取的自定义属性，如果要获取特定配置的属性
Value = Part.GetCustomInfoValue(配置属性的名称, "Material")

作者: hdgd501 时间: 2019-7-5 13:47

suzhanpeng 发表于 2019-7-5 10:09
Value = Part.GetCustomInfoValue("", "Material")
这个应该是可以的，还可以写成
Value = Part.CustomIn ...

我用Value = Part.GetCustomInfoValue(配置属性的名称, "Material")去获取特定配置的属性值，还是没成功，是不是我的配置属性的名称没写对

获取自定义属性值可以成功，但我要获取配置属性里的值试写好多次都没成功，这代码我不知道怎样写

作者: hdgd501 时间: 2019-7-5 13:56

suzhanpeng 发表于 2019-7-5 10:09
Value = Part.GetCustomInfoValue("", "Material")
这个应该是可以的，还可以写成
Value = Part.CustomIn ...

谢谢！经过你的指点成功获取配置属性上的某个属性值，在配置属性的名称上加上"",还要劳烦下版主，如果是多配置应该怎样自动获取配置属性的名称

作者: suzhanpeng 时间: 2019-7-5 15:55

hdgd501 发表于 2019-7-5 13:56
谢谢！经过你的指点成功获取配置属性上的某个属性值，在配置属性的名称上加上"",还要劳烦下版主，如果 ...

Set 配置属性= swApp.ActiveDoc.GetActiveConfiguration()
配置属性名称 = 配置属性.Name
Value = Part.GetCustomInfoValue(配置属性名称, "Material")

作者: hdgd501 时间: 2019-7-5 22:38

suzhanpeng 发表于 2019-7-5 15:55
Set 配置属性= swApp.ActiveDoc.GetActiveConfiguration()
配置属性名称 = 配置属性.Name
Value = Par ...

谢谢，非常的感谢版主！经过你的指点成功在多配置上获取属性上的某个属性值

作者: 钓鱼要戴头盔 时间: 2021-7-30 12:20
顶帖一下，学习学习

欢迎光临 SolidWorks机械工程师网——最大的SolidWorks学习平台 (https://www.swbbsc.com/)