如何使用VBA在AutoCAD中编写文本

Question

我想使用VBA使用Excel宏向AutoCAD添加一些文本，我想要的格式是

    BOÓ
P.K. xxx.xxx
------------

在这里，----表示P.K. xxx.xxx是带下划线的文本，而xxx.xxx是数字值。

问题是我不知道如何将这种格式应用于文本。

能帮我吗？

Answer 1

答案取决于您是否要在AutoCAD中创建一组单行文本对象（也称为DTEXT）或单个多行文本对象（也称为MTEXT）。

单行文本（DTEXT）

对于单行文本，下划线是通过在要加下划线的内容之前加上不区分大小写的代码%%U来实现的，例如：

%%UP.K. xxx.xxx

将产生产量：

如果您希望在文本内容的一部分下划线（而不是文本对象的全部内容），则可以用%%U分隔符将要下划线的部分包围起来，例如：

%%UP.K.%%U xxx.xxx

将产生产量：

多行文本（MTEXT）

要将下划线格式应用于多行文本对象（MTEXT）所保存的一部分内容，您将在文本内容中嵌入适当的MText Formatting Codes，在这种情况下，可以使用以下方法实现所需的结果：

BOÓ\P{\LP.K. xxx.xxx}

这里：

• \P在BOÓ和P.K. xxx.xxx之间产生新的一行
• {\L...}用花括号括起来的文字下划线。
  （您也可以使用\L和\l）