乐筑天下

搜索
欢迎各位开发者和用户入驻本平台 ☆ ☆ ☆ 尊重版权，从我做起，拒绝盗版，拒绝倒卖 ☆ ☆ ☆ 签到、发布资源、邀请好友注册，可以获得银币 ☆ ☆ ☆ 请注意保管好自己的密码，避免账户资金被盗
查看： 97|回复： 17

[编程交流] 属性名等于文件名

[复制链接]
grazwelis

3

主题

7

帖子

3

银币

初来乍到

Rank: 1

铜币
20
发表于 2022-7-6 15:12:59 | 显示全部楼层 |阅读模式
你好
你能帮我吗？我是绿色的，我是VBA。
你能帮我写vba程序吗。
属性标记名称=图形文件名。有可能吗？
例如，我有图纸，当我打开标签时，写下文件名：
c： \ autocad\Test01。图纸
块属性标记名称NR1=test01
c： \autocad\drawing12。图纸
块属性标记名称NR1=drawing12
 
谢谢
回复

使用道具 举报

dbroada

48

主题

1073

帖子

1043

银币

后起之秀

Rank: 20Rank: 20Rank: 20Rank: 20

铜币
238
发表于 2022-7-6 15:17:05 | 显示全部楼层
这在VBA中是可能的，但只插入一个字段要容易得多
回复

使用道具 举报

Lee Mac

114

主题

1万

帖子

1万

银币

中流砥柱

Rank: 25

铜币
543
发表于 2022-7-6 15:20:37 | 显示全部楼层
如果这也适合您，也可以在LISP中完成。
 
必要的信息存储在以下变量中：
 
（getvar“dwgname”）
（getvar“dwgprefix”）
 
根据您是希望单独写入图形名称，还是希望写入整个文件路径，可以对这些变量进行操作以适应需要。
 
你想继续LISP吗？
回复

使用道具 举报

Lee Mac

114

主题

1万

帖子

1万

银币

中流砥柱

Rank: 25

铜币
543
发表于 2022-7-6 15:23:52 | 显示全部楼层
哈哈，戴夫，你一定是把我打败了。
回复

使用道具 举报

dbroada

48

主题

1073

帖子

1043

银币

后起之秀

Rank: 20Rank: 20Rank: 20Rank: 20

铜币
238
发表于 2022-7-6 15:29:12 | 显示全部楼层
这是因为我的解决方案需要更少的输入。
回复

使用道具 举报

grazwelis

3

主题

7

帖子

3

银币

初来乍到

Rank: 1

铜币
20
发表于 2022-7-6 15:31:09 | 显示全部楼层
你能举个例子吗？请
回复

使用道具 举报

Lee Mac

114

主题

1万

帖子

1万

银币

中流砥柱

Rank: 25

铜币
543
发表于 2022-7-6 15:34:47 | 显示全部楼层
我以前也从未使用过字段-Dave，你能进一步解释一下吗
回复

使用道具 举报

dbroada

48

主题

1073

帖子

1043

银币

后起之秀

Rank: 20Rank: 20Rank: 20Rank: 20

铜币
238
发表于 2022-7-6 15:37:51 | 显示全部楼层
创建属性时，在默认值框中单击鼠标右键。选择之一是“插入字段”。在左列中选择“文件名”，然后设置选项。按OK，罗伯特是你爸爸的哥哥。
 
如果已经在所选的属性编辑器中创建了块，则可以执行相同的操作。
回复

使用道具 举报

Lee Mac

114

主题

1万

帖子

1万

银币

中流砥柱

Rank: 25

铜币
543
发表于 2022-7-6 15:44:32 | 显示全部楼层
听起来不错，但这只是在08年吗？我似乎在04年做不到。
 
 
我笑了\/
 
回复

使用道具 举报

dbroada

48

主题

1073

帖子

1043

银币

后起之秀

Rank: 20Rank: 20Rank: 20Rank: 20

铜币
238
发表于 2022-7-6 15:45:49 | 显示全部楼层
啊，你可以带我去那里。我不记得他们是在什么时候发布的，可能是2006年。很抱歉
回复

使用道具 举报

12下一页
返回列表 发帖

发表回复

高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

精选推荐

  • 微信公众平台

  • 扫描访问手机版

  • 点击图片下载手机App

QQ|关于我们|小黑屋|乐筑天下 繁体中文

GMT+8, 2025-3-4 19:22 , Processed in 0.338970 second(s), 72 queries .

© 2020-2025 乐筑天下

联系客服 关注微信 帮助中心 下载APP 返回顶部 返回列表