Access VBA教程:ObjectVerbsCount属性

使用 Visual Basic 中的 ObjectVerbsCount属性可以确定OLE对象所支持的动词数目。Long 型,可读写。

expression.ObjectVerbsCount

expression   必需。返回“Applies To”列表中的一个对象的表达式。

说明

ObjectVerbsCount属性设置用于指定ObjectVerbs属性数组中的元素数目。

该属性设置在“设计”视图中不可用。

根据对象状态的不同,OLE对象支持的动词列表是变化的。如果要更新所支持的动词列表,请将控件的Action属性设为 acOLEFetchVerbs。

VBA示例

下面的示例将返回 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

上页:Access VBA教程:ObjectVerbs属性 下页:Access VBA教程:ODBCConnectStr属性

Access VBA教程:ObjectVerbsCount属性

Access VBA教程:ODBCConnectStr属性 Access VBA教程:OldBorderStyle属性
Access VBA教程:OldValue属性 Access VBA教程:OLEClass属性
Access VBA教程:OLEData属性 Access VBA教程:OLEType属性
Access VBA教程:OLETypeAllowed属性 Access VBA教程:OnActivate属性
Access VBA教程:OnApplyFilter属性 Access VBA教程:OnChange属性
Access VBA教程:OnClick属性 Access VBA教程:OnClose属性
Access VBA教程:OnConnect属性 Access VBA教程:OnCurrent属性
Access VBA教程:OnDblClick属性 Access VBA教程:OnDeactivate属性
Access VBA教程:OnDelete属性 Access VBA教程:OnDirty属性
Access VBA教程:OnDisconnect属性 Access VBA教程:OnEnter属性
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号