當前位置:成語大全網 - 書法字典 - 如何使用VBA向CAD布局添加文本

如何使用VBA向CAD布局添加文本

Sub Example_AddText()

將文本對象標註為AcadText

將文本字符串作為字符串變暗

將插入點(0到2)標註為雙精度

雙精度調暗高度

定義文本對象

textString = "妳好,世界。"

插入點(0) = 2:插入點(1) = 2:插入點(2) = 0

高度= 0.5

this drawing . active Layout = this drawing . layouts(" Layout 2 ")'激活指定的布局。

在模型空間中創建文字對象

set text obj = this drawing . paper space . add text(文本字符串,插值點,高度)'在圖紙空間添加文本(剛激活);

動物園商城

末端接頭