x877012841 发表于 2016-10-10 19:54:26

请问怎么让文字中心对齐？

如图有个点（300,400）
https://yun.baidu.com/disk/home#list/path=%2F%E6%9D%A5%E8%87%AA%EF%BC%9A%E7%99%BE%E5%BA%A6%E7%9B%B8%E5%86%8C%2F%E7%A9%BA%E9%97%B4%E5%8D%9A%E6%96%87%E8%B4%B4%E5%9B%BE

x877012841 发表于 2016-10-10 20:03:19

图片传不上了

运行如下
Sub fff()
   
    Dim a#(2)
         
    a(0) = 300
    a(1) = 400
    a(2) = 0
   
    Call ThisDrawing.ModelSpace.AddText("fdd", a, 250)
   
End Sub

然后文字"fdd"的坐下角才是（300,400）

我希望"fdd"的中心是（300,400），该怎么处理

nslove44202489 发表于 2017-8-23 20:45:49

把alignment属性改为bottom center，然后在给定对齐点和角度
页: [1]
查看完整版本: 请问怎么让文字中心对齐？