Shapes.AddTextEffect 方法

创建艺术字对象。返回一个代表新艺术字对象的 Shape 对象。

语法

表达式.AddTextEffect(PresetTextEffect, Text, FontName, FontSize, FontBold, FontItalic, Left, Top)

表达式 一个代表 Shapes 对象的变量。

参数

名称	必选/可选	数据类型	描述
PresetTextEffect	必选	MsoPresetTextEffect	预置文字效果。
Text	必选	String	艺术字中的文字。
FontName	必选	String	艺术字中所用字体的名称。
FontSize	必选	Single	艺术字中所用字体的大小（以磅为单位）。
FontBold	必选	MsoTriState	确定艺术字中使用的字体是否设为粗体。
FontItalic	必选	MsoTriState	确定艺术字中使用的字体是否设为斜体。
Left	必选	Single	艺术字边界框左边缘相对于幻灯片左边缘的位置（以磅为单位）。
Top	必选	Single	艺术字边界框上边缘相对于幻灯片上边缘的位置（以磅为单位）。

返回值
Shape

说明

向文档添加艺术字对象时，该对象的高度和宽度将自动根据所指定的文字的大小和数量来设置。

示例

本示例向 myDocument 中添加包含文本“Test”的艺术字。

示例代码
`let myDocument = ActivePresentation.Slides.Item(1) let newWordArt = myDocument.Shapes.AddTextEffect(msoTextEffect1, "Test", "Arial Black", 36, msoFalse, msoFalse, 10, 10)`

请参阅