明经CAD社区

 找回密码
 注册

QQ登录

只需一步,快速开始

搜索
查看: 1107|回复: 4

[求助]下载的源程序有几个不懂得地方

[复制链接]
发表于 2004-11-17 16:06:00 | 显示全部楼层 |阅读模式
1.Dim objDbx As AxDbDocument 把As AxDbDocument 注释掉可以执行,但不注释掉显示:用户定义类型未定义。 2 objDbx.CopyObjects blkObj, ThisDrawing.ModelSpace
ThisDrawing.ModelSpace.InsertBlock pnt, blkName, 1, 1, 1, 0 这两行不知道是什么意思,象是函数但没有括号.我把第二行改成ThisDrawing.ModelSpace.InsertBlock( pnt, blkName, 1, 1, 1, 0)显示缺少"="号. 3 Me.Hide 这个Me是不是C++里的this的意思,我把Me去掉好象也可以.
 楼主| 发表于 2004-11-17 16:07:00 | 显示全部楼层
 楼主| 发表于 2004-11-17 16:33:00 | 显示全部楼层
还有一个问题:能不能在


pnt = ThisDrawing.Utility.GetPoint(, "选择插入点:")


时让块跟着鼠标走,模拟acad插入块后的图象?
发表于 2004-11-17 18:13:00 | 显示全部楼层
纯VBA不能实现
发表于 2004-11-17 19:24:00 | 显示全部楼层
建议你系统的找一本vb的书看看,一切就容易理解了。


1。objectdbx没引用


2 3。看看函数的用法
您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|CAD论坛|CAD教程|CAD下载|联系我们|关于明经|明经通道 ( 粤ICP备05003914号 )  
©2000-2023 明经通道 版权所有 本站代码,在未取得本站及作者授权的情况下,不得用于商业用途

GMT+8, 2024-11-27 23:31 , Processed in 0.162073 second(s), 24 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

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