Question

全部显示

请求 OLE 对象执行其中一个动词。使用ObjectVerbs 属性确定 OLE 对象的有效动词。

expression.DoVerb(Index)

expression必选。该表达式返回一个OLEFormat 对象。

Index可选。Integer 类型。要执行的动词。如果省略该参数，则执行默认动词。

示例

本示例对活动演示文稿中第一张幻灯片的第三个形状执行默认动词，其中第三个形状是链接或嵌人的 OLE 对象。

With ActivePresentation.Slides(1).Shapes(3)
 If .Type = msoEmbeddedOLEObject Or _
 .Type = msoLinkedOLEObject Then
 .OLEFormat.DoVerb
 End If
End With

本示例对活动演示文稿中第一张幻灯片的第三个形状执行默认动词“Open”，其中第三个形状是支持动词“Open”的 OLE 对象。

With ActivePresentation.Slides(1).Shapes(3)
 If .Type = msoEmbeddedOLEObject Or _
 .Type = msoLinkedOLEObject Then
 For Each sVerb In .OLEFormat.ObjectVerbs
 nCount = nCount + 1
 If sVerb = "Open" Then
 .OLEFormat.DoVerb nCount
 Exit For
 End If
 Next
 End If
End With