|
|
请问：用VBA怎样使单行文字（即AddLine)的对齐分式为居中！！请高手帮忙！！
例如：Dim mytxt As AcadTextStyle '定义mytxt变量为文本样式
Set mytxt = ThisDrawing.TextStyles.Add("mytxt") '添加mytxt样式
mytxt.fontFile = "c:\windows\fonts\SIMKAI.TTF" '设置字体文件为楷体
mytxt.ObliqueAngle = ThisDrawing.Utility.AngleToReal(0, 0) '设置字体角度为0
ThisDrawing.ActiveTextStyle = mytxt '将当前文字样式设置为mytxt
call ThisDrawing.ModelSpace.addtext（"hello",p,5) '写单行文字hello
hello是以p点左对齐的。
请问：怎样使hello以p点居中？
请各位仁兄帮忙！！！非常感谢！！！
|
|
置顶卡
