[菜鸟求助]如何提取VBA命令编辑后的新实体

chenyaqiou

我用sendcommand"pedit"命令编辑了一个多段线，原来的多段线名是plobj，但是编辑后的多段线并不存在于plobj中，如何将其提取出来存于新的变量名中（如nplobj，事先定义dim nplobj as acadentity）？

原来的命令如下

ThisDrawing.SendCommand "pedit" & vbCr & "(handent """ & plobj.Handle & """)" & vbCr & "f" & vbCr & vbCr  '多段线拟合

可不可以像set plobj＝thisdrawing.model.addpolyline.....一样也用set nplobj=sendcommand"pedit"......