znyan 发表于 2009-11-12 10:00:00

求助：文本的对正方式设定

Dim objTxt As AcadText
Set objTxt = AddText(CStr(ii), ptTxt, TxtHeight)
objTxt.Alignment = acAlignmentMiddleLeft
最后一句设置之后文本就没有了，不知道怎么回事，用VBA到底可不可以设置文字的对正方式？

znyan 发表于 2009-11-12 10:08:00

objTxt.Alignment = acAlignmentMiddleCenter
    objTxt.TextAlignmentPoint = ptCir

home 发表于 2009-11-16 09:17:00

objTxt.Update
没有发现你说的那种情况，加上上面的试试
页: [1]
查看完整版本: 求助：文本的对正方式设定