有一个问题

3kd · 发表于 2003-7-4 14:50:00

我用addtext()方法在图形中写了一个文字，可我想要文字宽度为0.8，倾斜10度，怎么办？vba中怎么没有办法呢？我的字体也设置了宽度0.8，倾斜10度，可用addtext方法写的文字就是不行，只能调整高度，其它的要在acad中用属性调整更改，为什么？请高手指点，谢谢！

zfbj · 发表于 2003-7-4 15:03:00

使用text对象下面的属性：
textObj.ScaleFactor = 0.7

3kd · 发表于 2003-7-4 15:25:00

谢谢，倾斜怎么做？

t4ed6p · 发表于 2003-7-4 20:00:00

TextObj.Rotation = 10 / 180# * 3.1415926

3kd · 发表于 2003-7-5 12:36:00

谢谢，我的程序均已搞定，感谢各位的帮助。