(vla-put-Alignment (vlasel) acAlignmentBottomLeft)

sailorcwx

正常，再把它挪回来就好了

狂刀无痕

先看cad帮助再发问

yuangw1234

同时使用vla-put-alignment 与vla-put-insertionpoint函数就好

(vla-put-alignment 1obj acAlignmentfit)
   (vla-put-alignment 2obj acAlignmentfit)
   (vla-put-alignment 3obj acAlignmentfit)
   (vla-put-alignment 4obj acAlignmentfit)
   (vla-put-alignment 7obj acAlignmentfit)
   (vla-put-insertionpoint 1obj 1stpt) ;;;第一列值插入点
   (vla-put-insertionpoint 2obj 2ndpt)
   (vla-put-insertionpoint 3obj 3rdpt)
   (vla-put-insertionpoint 4obj 4thpt)
   (vla-put-insertionpoint 7obj 7thpt)
   (vla-put-TextAlignmentPoint 1obj 1fit)
   (vla-put-TextAlignmentPoint 2obj 2fit)
   (vla-put-TextAlignmentPoint 3obj 3fit)
   (vla-put-TextAlignmentPoint 4obj 4fit)
   (vla-put-TextAlignmentPoint 7obj 7fit)