如何更改MText的定义高度？

yzg_208

查组码知道MText的定义高度为46，用VLX可以得到这个值，但不知道用VBA如何改写这个组码?

edata

语法

object.Height

object

Application, Attribute, AttributeReference, MText, PViewport, Raster, Shape, Text, TextStyle, Toolbar, Viewport, View
使用该属性的对象。

Height

Double [双精度]( Application 和 Toolbar 对象为整数)
可读写 (Toolbar 和 Raster 对象为只读)
必须为非零正数。

说明

Application: 以像素表示的主应用程序窗口高度。

MText, Text: 大写字母文字的高度。高度是按当前图形单位测量的。Height 属性用作文字长度和宽度的比例因子。


Height


Raster: 以像素表示的光栅图像高度。

Viewport: 视口高度是测量视口外框的 Y 轴。

View: 视图的高度是测量视口用于显示模型的区域的 Y 轴。

yzg_208

object.Height  对于Mtext的Height属性是文字高度而非文本框的定义高度。

睡醒的蜗牛

原谅我不厚道的挖坟，我也遇到了这个问题，虽然不影响使用，但是看起来难受。。。而且貌似2006版本就没有这个属性，而2012版是有【定义高度】的

chixun99

好吧我也不知道怎么直接获得，只能间接来，炸开成单行文本后获得整体文字段的高度应该是一个方法。