Shapes.AddLabel 方法 (Publisher)

  • 项目

将表示文本标签的新 Shape 对象添加到指定的 Shapes 集合。

语法

表达式。AddLabel (方向、 左侧、 顶部、 宽度、 高度)

expression：一个表示 Shapes 对象的变量。

参数

名称 必需/可选 数据类型 说明
Orientation 必需 PbTextOrientation 标签的方向。 可以是 PbTextOrientation 常量之一。
Left 必需 Variant 代表文字标签的形状的左边缘的位置。
Top 必需 Variant 代表文字标签的形状的上边缘的位置。
Width 必需 Variant 代表文字标签的形状的宽度。
Height 必需 Variant 代表文字标签的形状的高度。

返回值

Shape

说明

对于 Left、 Top、 Width 和 Height 参数，数值以 磅为单位计算：字符串可以位于 Microsoft Publisher (支持的任何单元中，例如，“2.5 in”) 。

示例

以下示例将新的水平文字标签添加到当前出版物的第一页。

Dim shpLabel As Shape 
 
Set shpLabel = ActiveDocument.Pages(1).Shapes.AddLabel _ 
 (Orientation:=pbTextOrientationHorizontal, _ 
 Left:=144, Top:=144, _ 
 Width:=72, Height:=18)

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。