[求助]用vba在cad里剪切对象

yadg0

我用SendCommand Chr(27) & Chr(27) & "cutclip" & Chr(13) & "c " & minPoint(0) & "," & minPoint(1) & " " & maxPoint(0) & "," & maxPoint(1) & " " & Chr(13)

有的图纸能成功，有的运行cutclip后就自动取消了，然后再c就开始画圆了

，谁能给个好方法阿，找了1天了，谢谢了

天龙八部

调用TIRM

得到对象上的一点，

得到所需剪切对象的一点，

用SENDCOMMAND模拟VLISP中的COMMAND

thisdrawing.sendcommand  "trim" &.........