VBA连接CAD运行命令不成功
发布网友
共2个回答
热心网友
1、这个到技术论坛问问。
2、参考下面的网站看看网页链接。
3、论坛上很多专业的网友。
4、或咨询一下某宝的VBA卖家。
热心网友
首先需要把Acadapp ActiveDoc等变量改为公共变量。
Set textobj = Mospace.AddText(TextStr, Inspoint, TextHeight)
这句话为例子
Set textobj = ActiveDoc.Mospace.AddText(TextStr, Inspoint, TextHeight)
应该加上这个变量。
