Shapes.AddCallout 方法 (Publisher)

将表示无边框线条标注的新 Shape 对象添加到指定的 Shapes 集合。

语法

表达式。AddCallout (Type、 Left、 Top、 Width、 Height)

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

参数

名称	必需/可选	数据类型	说明
Type	必需	MsoCalloutType	标注线的类型。 可以是 MsoCalloutType 常量之一。
Left	必需	Variant	代表线形标注的形状的左边缘的位置。
Top	必需	Variant	代表线形标注的形状的上边缘的位置。
Width	必需	Variant	代表线形标注的形状的宽度。
Height	必需	Variant	代表线形标注的形状的高度。

返回值

Shape

说明

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

示例

以下示例将一个新的任意旋转的标注线添加到当前出版物的第一页。

Dim shpCallout As Shape 
 
Set shpCallout = ActiveDocument.Pages(1).Shapes.AddCallout _ 
 (Type:=msoCalloutTwo, _ 
 Left:=144, Top:=216, _ 
 Width:=36, Height:=72)

支持和反馈

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