dalihua 发表于 2010-10-28 11:10:00

插入块发生的问题

ThisDrawing.SendCommand "-insert" & vbCr & BlkName & vbCr & "s" & vbCr & "1" & vbCr & "r" & vbCr & "0" & vbCr & "0,0,0" & vbCr

已知一个匿名块的名字,想实现动态拖动的效果,执行上述命令,出线附件一样的提示,请问是什么问题啊


chmenf087 发表于 2010-10-28 12:47:00

搜索路径中没找到你的块,要么你就把& BlkName换成绝对路径,要么添加BlkName.dwg所在的文件夹为支持路径
另你的代码无法实现动态拖动,可改为 sendcommand "-insert" & vbcr & Blockname & vbcr

dalihua 发表于 2010-10-28 17:34:00

可是我的块,是匿名块啊!!

dalihua 发表于 2010-10-28 17:34:00

包含在本文件里!

chmenf087 发表于 2010-10-28 18:44:00

匿名块名称应该是*+字母+序号
页: [1]
查看完整版本: 插入块发生的问题