Tracking 属性

       

该属性返回或设置指定的“艺术字”中分配给每个字符的水平间距与字符宽度之比。可取从 0(零)至 5 之间的数值(该属性值越大则字符间距越宽,其值小于 1 将导致字符相互重叠)。Single 类型,可读写。

expression.Tracking

expression  必需。该表达式返回一个 TextEffectFormat 对象。

说明

下表给出与用户界面中的有效设置相对应的 Tracking 属性值。

用户界面设置 等效的 Tracking 属性值
很紧 0.8
紧密 0.9
常规 1.0
稀疏 1.2
很松 1.5

示例

本示例将包含文本“Test”的艺术字添至活动文档中,然后将字符间距设为很紧。

Set newWordArt = ActiveDocument.Shapes.AddTextEffect( _
    PresetTextEffect:=msoTextEffect1, Text:="Test", _
    FontName:="Arial Black", FontSize:=36, FontBold:=False, _
    FontItalic:=False, Left:=100, Top:=100)
newWordArt.TextEffect.Tracking = 0.8