QQ登录

只需一步,快速开始

登录 | 注册 | 找回密码

三维网

 找回密码
 注册

QQ登录

只需一步,快速开始

展开

通知     

全站
goto3d 说: 版主微信号:caivin811031;还未入三维微信群的小伙伴,速度加
2022-07-04
全站
goto3d 说: 此次SW竞赛获奖名单公布如下,抱歉晚了,版主最近太忙:一等奖:塔山817;二等奖:a9041、飞鱼;三等奖:wx_dfA5IKla、xwj960414、bzlgl、hklecon;请以上各位和版主联系,领取奖金!!!
2022-03-11
查看: 6111|回复: 15
收起左侧

[已解决] 如何实现将一批CAD文件中某个特定的属性块中的某个属性值更改为特定值???

[复制链接]
发表于 2008-6-20 12:27:05 | 显示全部楼层 |阅读模式

马上注册,结识高手,享用更多资源,轻松玩转三维网社区。

您需要 登录 才可以下载或查看,没有帐号?注册

x
如何实现将一批CAD文件中某个特定的属性块中的某个属性值更改为特定值???(用CAD编程)3 ^; \6 K$ V: b" M
特定值可能为某个固定的文本, 也可能是一个文本前缀加上一个流水号??
发表于 2008-6-21 13:24:40 | 显示全部楼层
vb的程序,我会搞,和我联系吧
发表于 2008-6-23 20:49:31 | 显示全部楼层

使用VBA的解决方案

编程要点
/ i- {, S4 ~+ t2 P
9 n0 l( a8 {: p$ Y0 m6 ^1、插入用户窗体,在窗体上放置公共对话框(CommonDialog控件),并设置其属性Filter = "*.dwg|*.dwg"以过滤文件类型;Flags = 512以一次获得多个文件路径;6 `2 @# O( Y( `+ z( f; b' n
2、用Documents对象的Open方法逐个打开要修改的文档;
, L# u4 i4 A  G8 S5 ?3 Y! i& @3、遍历文档(Document对象)的所有图元,用ObjectName属性(="AcDbBlockReference")寻找符合给定条件的“块参照”(AcadBlockReference对象);4 Q* O# h0 A& X1 U
4、用“块参照”的GetAttributes方法获得该“块参照”的属性集;" |, F8 o1 A6 C1 S( P) i
5、用属性对象的标记(TagString)查找符合给定条件的属性;
6 j& o& |- F0 m6 C7 ~1 h* N( h6、修改属性对象的TextString为新值;3 u: Q/ ?$ Q6 N$ b7 }- @" x3 A
7、用文档的ReadOnly属性判断文档是否用只读方式打开,对只读文档用SaveAs方法保存;其它用Save方法保存;1 G3 E8 g7 e2 l7 f% n
8、用Close方法关闭文档;
: T; J! M: v) e" A8 ^( l7 k2 ]3 I9 e- k" ]& J0 T
PLXG.rar (14.69 KB, 下载次数: 123)

评分

参与人数 1三维币 +6 收起 理由
wsj249201 + 6 技术讨论

查看全部评分

发表于 2009-4-14 16:01:12 | 显示全部楼层

回复 3# woaishuijia 的帖子

你好,你是了么,好用么
发表于 2009-4-17 08:08:19 | 显示全部楼层
如何调出窗口一
发表于 2009-4-17 08:09:38 | 显示全部楼层
可以告诉我么,谢谢
发表于 2009-4-20 08:18:42 | 显示全部楼层
你好,我不知道怎么调出窗口一,您能告 诉我么?谢谢 :)
发表于 2009-4-20 08:23:38 | 显示全部楼层
我很想学呀急急急急
发表于 2009-5-14 09:19:48 | 显示全部楼层
没有人回答我的问题,楼主告诉我,怎么处理谢谢
 楼主| 发表于 2009-5-14 22:37:15 | 显示全部楼层
3楼提供的文件是dvb格式的,如何执行?
发表于 2009-5-15 08:19:09 | 显示全部楼层
你好,我也没弄明白
发表于 2009-5-15 08:20:52 | 显示全部楼层
3#上来看到后希望给予答复谢谢
发表于 2009-6-2 09:59:51 | 显示全部楼层
怎么没人告诉我呀
发表于 2009-6-2 12:52:33 | 显示全部楼层
工具>宏>加载工程* \& x5 \0 j# J
工具>宏>宏>运行
发表于 2009-6-29 09:23:56 | 显示全部楼层
谢谢版主,我是了一下,还不太会用,不过已经调出来了
发表于 2019-10-11 09:16:15 | 显示全部楼层
请问这是怎么解决. J' o3 K# p7 V6 t4 X  ]- z4 u1 k
06028E82-0CE9-46e4-A0E4-217F5C64FC6F.png
发表回复
您需要登录后才可以回帖 登录 | 注册

本版积分规则

Licensed Copyright © 2016-2020 http://www.3dportal.cn/ All Rights Reserved 京 ICP备13008828号

小黑屋|手机版|Archiver|三维网 ( 京ICP备13008828号-1 )

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