Shapes.AddCallout 方法 (Word)
在绘图画布上添加无框线的标注。
语法
表达式。AddCallout (Type、 Left、 Top、 Width、 Height)
expression 是必需的。 一个代表 Shapes 对象的变量。
参数
名称 | 必需/可选 | 数据类型 | 说明 |
---|---|---|---|
Type | 必需 | MsoCalloutType | 标注的类型。 |
Left | 必需 | Single | 标注边界框左边缘的位置(以 磅为单位)。 |
Top | 必需 | Single | 标注边框上边缘的位置(以磅为单位)。 |
Width | 必需 | Single | 标注边框的宽度(以磅为单位)。 |
Height | 必需 | Single | 标注边框的高度(以磅为单位)。 |
返回值
备注
可以使用 AddShape 方法插入多种标注,例如气球和云。
示例
本示例在新创建的绘图画布上添加标注。
Sub NewCanvasCallout()
Dim shpCanvas As Shape
'Add drawing canvas to the active document
Set shpCanvas = ActiveDocument.Shapes.AddCanvas _
(Left:=150, Top:=150, Width:=200, Height:=300)
'Add callout to the drawing canvas
shpCanvas.CanvasItems.AddCallout _
Type:=msoCalloutTwo, Left:=100, _
Top:=40, Width:=150, Height:=75
End Sub
另请参阅
支持和反馈
有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。