乐筑天下

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

cad利用选择集选择OLE

[复制链接]

6

主题

30

帖子

3

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
54
发表于 2017-10-25 15:19:00 | 显示全部楼层 |阅读模式
请教下,我在用vb做cad的二次开发,现在我想选择每张图纸中“OLE”
其中代码是   ft(0) = 0: fd(0) = “OLE”
但是在调试的时候发现选择不到ole内容?请问这个该如何操作?
回复

使用道具 举报

13

主题

59

帖子

2

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
111
发表于 2017-11-6 22:21:00 | 显示全部楼层
虽然我下载了很多电子书,包括网友热捧的《VisualBasic与AutoCAD二次开发》张晋西版本,其实就上面说的这两本电子书常用。
还有就是有空的话把所有帖子都看一遍,自己感觉用的上就先收集起来。
我在学习CAD二次开发以前,已经会VB很多年了,因为工作中需要处理数据,懂编程是很方便的,最开始对CAD编程是一个同事的需要,他为电力设计院打工,需要手动把变电站二次系统图纸中的端子排关联的电缆清理出来,然后汇总编辑成做成电子表格版的电缆清册(而每张CAD的图纸中是没有电缆清册的表格)。
我的思路是把所有图元信息都提取出来,放到数据库,然后分析端子排的编号、连接线,电缆头,然后根据信息,分析出每条电缆的芯数,起点、止点、判断型号,最后按电缆清册模板生成电子表格数据。
当时怎么调用CAD都不知道,我搜索了一下CAD论坛,WORD天,一些有名的CAD论坛都注册不了,什么邀请码,指定时间开放注册等等,完全不懂管理员是怎么想的。
乐筑天下也不好注册,可以用QQ注册乐筑天下,但由于QQ有后门、收集用户信息,所以我个人是不用QQ、微信的(给我发私信要qq号的就抱歉了),工作上有公用qq号在专用电脑上。当时为了注册乐筑天下,特地注册了微博,用微博来登录乐筑天下。
编程的人本来就少,还又加诸多限制,搞技术的多少有点保守,但是网络上的人其实与你关系不大,不会影响到你的地位与收入,希望有共享精神的网友多一点。
后来有热心的网友告诉我怎么连接CAD,读取信息。很遗憾,忘记这位好心网友的名字了。
虽然最终完成了这个小工具,但是有很大的局限(只能完成他给的样图),不能通用,原因是在实际应用中每张图纸都不是一样的规范,作图不标准,比如端子箱连接的线不是横平竖直,有的是由几根直线拼凑组成,有的是多段线,有的几根线重叠一起,电缆头做图不规范,有的图纸中的电缆头采用的是块,有的图纸中电缆头是画一个三角形然后填充等等。
这个工具最终没有用上,但是通过编写这个工具开启了CAD编程之路。
回复

使用道具 举报

6

主题

30

帖子

3

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
54
发表于 2018-1-3 10:44:00 | 显示全部楼层

您好,能否把这个过程详细说下,我现在要选择所有外部参照的集合,又遇到了上次的问题,这个fd(0)=这个后面应该怎么填写,1,对象的名字属性怎么列出来,现在对象都没有办法选择2、如果列出了名字属性,直接用debug.print +名字  就可以吗?
回复

使用道具 举报

13

主题

59

帖子

2

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
111
发表于 2018-1-4 15:09:00 | 显示全部楼层
看来你也就是随便问问,只有碰到问题的时候你才会到论坛来,那我说了也等于没有说,你只是想要个结果。
不过我还是再一次的说一编,“有空把所有帖子都看一下,里面就有你想要的结果。”
你也别自己测试了,AcDbBlockReference,AcDbBlock,Block,Reference都不会成功的,你安安心心看看帖子吧,会有的。
回复

使用道具 举报

0

主题

334

帖子

12

银币

后起之秀

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

铜币
335
发表于 2017-10-26 11:32:00 | 显示全部楼层
回帖是一种美德!感谢楼主的无私分享 谢谢
回复

使用道具 举报

6

主题

30

帖子

3

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
54
发表于 2017-10-26 20:46:00 | 显示全部楼层
我想使用vb选择cad 中所有的ole ,这个怎么实现?
回复

使用道具 举报

13

主题

59

帖子

2

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
111
发表于 2017-10-26 21:54:00 | 显示全部楼层
OLE是单行文字吗?
回复

使用道具 举报

6

主题

30

帖子

3

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
54
发表于 2017-10-27 09:02:00 | 显示全部楼层

不是 ,是插入的excel文件,直接粘贴进去的
回复

使用道具 举报

13

主题

59

帖子

2

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
111
发表于 2017-10-29 09:19:00 | 显示全部楼层
OLE对象名应该为“OLE2FRAME”
所以
将fd(0) = “OLE”改为fd(0) = “OLE2FRAME”即可
回复

使用道具 举报

6

主题

30

帖子

3

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
54
发表于 2017-11-3 09:30:00 | 显示全部楼层

非常感谢,找了好久都没有找到类似的资料,请问vb中这种对象名及属性及方法应该去哪里查询到?
回复

使用道具 举报

发表回复

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

本版积分规则

  • 微信公众平台

  • 扫描访问手机版

  • 点击图片下载手机App

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

GMT+8, 2025-3-13 08:00 , Processed in 0.493998 second(s), 72 queries .

© 2020-2025 乐筑天下

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