BoundObjectFrame.ObjectVerbs 属性 (Access)

使用 Visual Basic 中的 ObjectVerbs 属性确定 OLE 对象支持的谓词列表。 只读 String。

语法

表达式。ObjectVerbs (Index)

表达 一个代表 BoundObjectFrame 对象的变量。

参数

名称	必需/可选	数据类型	说明
Index	必需	Long	所支持的动作数组中的元素。 这是一个从零开始的索引，零 (0) 代表数组中的第一个动作，一 (1) 代表数组中的第二个动作，依此类推。

备注

此属性设置在设计视图中不可用。

使用 ObjectVerbs 属性和 ObjectVerbsCount 属性可显示 OLE 对象支持的谓词列表。 ObjectVerbs 属性使用此谓词列表来确定激活 OLE 对象时要执行的操作 (将 Action 属性设置为 acOLEActivate) 。

Verb 属性设置为特定谓词谓词 ObjectVerbs 属性返回的列表中的位置。 例如，1 指定列表中的第一个动作（Visual Basic 命令 ObjectVerbs(0)，或 ObjectVerbs 属性数组中的第一个动作），2 指定列表中的第二个动作（Visual Basic 命令 ObjectVerbs(1)，或 ObjectVerbs 属性数组中的第二个动作），依此类推。

在 ObjectVerbs 属性数组中由 Visual Basic 的命令 ObjectVerbs(0) 调用的第一个动作是默认动作。 如果还未设置 Verb 属性，则在激活 OLE 对象时，将由这个动作来指定要执行的操作。

对象支持的动作列表因对象的状态而异。 若要更新对象支持的谓词列表，请将控件的 Action 属性设置为 acOLEFetchVerbs。 在将动作列表提供给用户之前，请确定已更新过。

示例

下面的示例将返回 OLE1 控件中的 OLE 对象所支持的动作，并在消息框中显示每个动作。

Sub GetVerbList(frm As Form, OLE1 As Control) 
 Dim intX As Integer, intNumVerbs As Integer 
 Dim strVerbList As String 
 
 ' Update verb list. 
 With frm!OLE1 
 .Action = acOLEFetchVerbs 
 intNumVerbs = .ObjectVerbsCount 
 For intX = 0 To intNumVerbs - 1 
 strVerbList = strVerbList & .ObjectVerbs(intX) & "; " 
 Next intX 
 End With 
 
 ' Display verbs in message box. 
 MsgBox Left(strVerbList, Len(strVerbList) - 2) 
End Sub

支持和反馈

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