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

 找回密码
 立即注册

QQ登录

只需一步,快速开始

好品数字
好品数字
查看: 3070|回复: 7
打印 上一主题 下一主题

获取配置属性上的某个属性值失败,请问怎么处理,谢谢!

  [复制链接]

6

主题

611

帖子

860

金币

实习版主

Rank: 7Rank: 7Rank: 7Rank: 7

积分
5367

最佳新人活跃会员热心会员宣传达人灌水之王突出贡献

跳转到指定楼层
楼主
 楼主| 发表于 2019-7-3 12:43:00 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
我是一个很菜的菜鸟,不知道怎么处理代码,忘大神们出来帮忙改好,谢谢!代码如下:

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$
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏4 转播转播 分享教程|习题|模型|技巧 点赞点赞 拍砖拍砖
SolidWorks机械工程师网
提示:建议使用谷歌浏览器浏览本网站!如单击这里下载!否则,可能无法下载附件文件!(支持大多数版本的谷歌浏览器,支持360和QQ浏览器的极速模式,即谷歌内核模式,使用IE和Edge浏览器,浏览个别网页以及下载文件时,会误报“***不安全”,此时需要单击“继续访问此不安全站点(不推荐)”才可以继续下载,另外,本网站不含任何不安全的文件,已联系微软公司解决,纯属IE和Edge浏览器误报)
回复

使用道具 举报

2

主题

81

帖子

225

金币

侠客

Rank: 3Rank: 3Rank: 3

积分
467
QQ
沙发
发表于 2019-7-3 18:33:23 | 只看该作者
顶一下,坐等高手!
SolidWorks机械工程师网
提示:建议使用谷歌浏览器浏览本网站!如单击这里下载!否则,可能无法下载附件文件!(支持大多数版本的谷歌浏览器,支持360和QQ浏览器的极速模式,即谷歌内核模式,使用IE和Edge浏览器,浏览个别网页以及下载文件时,会误报“***不安全”,此时需要单击“继续访问此不安全站点(不推荐)”才可以继续下载,另外,本网站不含任何不安全的文件,已联系微软公司解决,纯属IE和Edge浏览器误报)
回复 支持 反对

使用道具 举报

9

主题

145

帖子

774

金币

传奇

爱学习的版主

Rank: 8Rank: 8

积分
7006

最佳新人活跃会员热心会员宣传达人灌水之王

QQ
板凳
发表于 2019-7-5 10:09:33 | 只看该作者
Value = Part.GetCustomInfoValue("", "Material")
这个应该是可以的,还可以写成
Value = Part.CustomInfo2("", "Material")

这是获取的自定义属性,如果要获取特定配置的属性
Value = Part.GetCustomInfoValue(配置属性的名称, "Material")
终究还得自己做自己的主角,所以必须坚强走下去。
回复 支持 反对

使用道具 举报

6

主题

611

帖子

860

金币

实习版主

Rank: 7Rank: 7Rank: 7Rank: 7

积分
5367

最佳新人活跃会员热心会员宣传达人灌水之王突出贡献

地板
 楼主| 发表于 2019-7-5 13:47:15 | 只看该作者
suzhanpeng 发表于 2019-7-5 10:09
Value = Part.GetCustomInfoValue("", "Material")
这个应该是可以的,还可以写成
Value = Part.CustomIn ...

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


获取自定义属性值可以成功,但我要获取配置属性里的值试写好多次都没成功,这代码我不知道怎样写
SolidWorks机械工程师网
回复 支持 反对

使用道具 举报

6

主题

611

帖子

860

金币

实习版主

Rank: 7Rank: 7Rank: 7Rank: 7

积分
5367

最佳新人活跃会员热心会员宣传达人灌水之王突出贡献

5#
 楼主| 发表于 2019-7-5 13:56:22 | 只看该作者

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

谢谢!经过你的指点成功获取配置属性上的某个属性值,在 配置属性的名称 上加上"",还要劳烦下版主,如果是多配置应该怎样自动获取 配置属性的名称
SolidWorks机械工程师网
回复 支持 反对

使用道具 举报

9

主题

145

帖子

774

金币

传奇

爱学习的版主

Rank: 8Rank: 8

积分
7006

最佳新人活跃会员热心会员宣传达人灌水之王

QQ
6#
发表于 2019-7-5 15:55:10 | 只看该作者
hdgd501 发表于 2019-7-5 13:56
谢谢!经过你的指点成功获取配置属性上的某个属性值,在 配置属性的名称 上加上"",还要劳烦下版主,如果 ...

Set  配置属性= swApp.ActiveDoc.GetActiveConfiguration()
配置属性名称 = 配置属性.Name
Value = Part.GetCustomInfoValue(配置属性名称, "Material")
终究还得自己做自己的主角,所以必须坚强走下去。
回复 支持 反对

使用道具 举报

6

主题

611

帖子

860

金币

实习版主

Rank: 7Rank: 7Rank: 7Rank: 7

积分
5367

最佳新人活跃会员热心会员宣传达人灌水之王突出贡献

7#
 楼主| 发表于 2019-7-5 22:38:37 | 只看该作者

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

谢谢,非常的感谢版主!经过你的指点成功在多配置上获取属性上的某个属性值
SolidWorks机械工程师网
回复 支持 反对

使用道具 举报

1

主题

111

帖子

88

金币

堂主

Rank: 4

积分
585

最佳新人活跃会员热心会员宣传达人

8#
发表于 2021-7-30 12:20:26 来自手机 | 只看该作者
顶帖一下,学习学习
SolidWorks机械工程师网
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

关闭 卷起
关闭 卷起

SOLIDWORKS 2023 机械设计从入门到精通

手机版|小黑屋| GMT+8, 2024-6-4 09:05 , Processed in 0.205569 second(s), 34 queries .

SolidWorks机械工程师网 ( 鲁ICP备14025122号-2 ) 鲁公网安备 37028502190335号

声明:本网言论纯属发表者个人意见,与本网立场无关。
如涉版权,可发邮件: admin@swbbsc.com

快速回复 返回顶部 返回列表