斑竹和大虾门帮帮偶吧

ilovehuizi · 发表于 2004-11-3 21:23:00

怎样使插入的文字，以插入点为中心排列？默认的插入文字是在插入点左侧排列的。
我使用了text1.aligment 属性但是不知到怎么设置？
斑竹帮帮偶吧偶急需！！小弟先谢了啊

雪山飞狐_lzh · 发表于 2004-11-3 21:38:00

Sub ts()
Dim pnt(2) As Double
Dim obj As AcadText
Set obj = ThisDrawing.ModelSpace.AddText("Test", pnt, 5)
obj.Alignment = acAlignmentMiddle
obj.TextAlignmentPoint = ThisDrawing.Utility.GetPoint
End Sub

tjdxtm · 发表于 2004-11-4 08:24:00

又学到一点。
lzh741206斑竹，你好强阿，能介绍一下怎么学的吗？
我觉得用熟很难阿

ilovehuizi · 发表于 2004-11-4 10:04:00

太感谢lzh741206斑竹了，小弟会永远支持你的～～
小弟再次表示感谢

斑竹和大虾门帮帮偶吧

发表回复

精选推荐

斑竹和大虾门 帮帮偶吧

发表回复

精选推荐

斑竹和大虾门帮帮偶吧