乐筑天下

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

AutoCAD的尺寸标注信息用vba怎么提取

[复制链接]

1

主题

1

帖子

1

银币

初来乍到

Rank: 1

铜币
5
发表于 2007-4-20 19:27:00 | 显示全部楼层 |阅读模式
的尺寸标注信息用vba怎么提取?最后用excel表输出什么什么形式,是代码还是直接的标注样式?
回复

使用道具 举报

158

主题

2315

帖子

10

银币

顶梁支柱

Rank: 50Rank: 50

铜币
2951
发表于 2007-5-1 14:04:00 | 显示全部楼层
看不懂需要什么
回复

使用道具 举报

6

主题

22

帖子

5

银币

初来乍到

Rank: 1

铜币
46
发表于 2010-7-23 11:06:00 | 显示全部楼层
楼主就是想要将CAD图纸中的尺寸都提取到excel 中吧
回复

使用道具 举报

0

主题

15

帖子

3

银币

初来乍到

Rank: 1

铜币
15
发表于 2018-5-11 21:02:00 | 显示全部楼层
同问。有时需要直接从图上的标注中提取标注的数值。标注对象选择后,不知道提取哪个属性能够得到。
回复

使用道具 举报

0

主题

1

帖子

1

银币

初来乍到

Rank: 1

铜币
1
发表于 2018-8-9 14:04:00 | 显示全部楼层
标注的属性,VB6.0
returnobj.TextStyle = "BigHuaZi" '文字样式
returnobj.TextHeight = 3.73  '文字高度
returnobj.TextGap = 0.1 '文字偏移
returnobj.TextColor = 4 '文字颜色
returnobj.ScaleFactor = 20 '比例因子
returnobj.Linetype = "ByBlock" '线型
returnobj.TextOverride = "" '文字代替
returnobj.Arrowhead1Type = 5 '箭头1样式
returnobj.Arrowhead2Type = 5 '箭头2样式
returnobj.ArrowheadSize = 2'箭头大小
returnobj.ExtensionLineOffset = 2'尺寸界线偏移
returnobj.ExtensionLineExtend = 2'尺寸界线范围
returnobj.DimensionLineExtend = 2'尺寸线范围
returnobj.ExtLineFixedLen = 2'尺寸界线的固定长度
returnobj.DimensionLineColor = 2 '尺寸线颜色
returnobj.ExtLineFixedLenSuppress = True '固定尺寸界线
returnobj.ExtLine1Suppress = False '尺寸界线1
returnobj.ExtLine2Suppress = False '尺寸界线2
回复

使用道具 举报

发表回复

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

本版积分规则

  • 微信公众平台

  • 扫描访问手机版

  • 点击图片下载手机App

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

GMT+8, 2025-3-13 03:32 , Processed in 0.363131 second(s), 62 queries .

© 2020-2025 乐筑天下

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