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

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

没有发现你说的那种情况，加上上面的试试

账号		自动登录	找回密码
密码			注册