查看单个帖子
旧 2009-04-28, 10:16 AM   #1
yang686526
高级会员
 
注册日期: 06-11
帖子: 14579
精华: 1
现金: 224494 标准币
资产: 234494 标准币
yang686526 向着好的方向发展
默认 【转帖】vba实现图形驱动

vba实现图形驱动
www.dimcax.com
vba实现图形驱动
只做一个比较简单的两个圆的驱动,根据此方法举一反三大家就可以开发出与清华天河图库一样的东西来。
将此dvb文件放在cad内部命令编辑器的文件夹下,运行cad内部命令编辑器,进行以下操作:


命令标识输入dq,执行代码为
(command "-vbarun" "dwgdrive.dvb!module1.create")
点击添加
命令标识输入v v,执行代码为
(command "-vbarun" "dwgdrive.dvb!module1.modify")
点击添加
点击加载后就可以了
7

在cad中输入dq命令为添加这两个圆,输入vv命令为修改这两个圆,双击也可以打开修改对话框
cad内部命令编辑器在这里

我已将此功能加到cad内部命令编辑器里,只需运行后加载就可以了

我发现这个论坛里会vba的很少呀

好用
yang686526离线中   回复时引用此帖
GDT自动化论坛(仅游客可见)