Partager via


Propriété CustomControl.ObjectVerbs (Access)

Utilisez la propriété ObjectVerbs dans Visual Basic pour déterminer la liste des verbes pris en charge par un objet OLE. String en lecture seule.

Syntaxe

expression. ObjectVerbs (Index)

Expression Variable qui représente un objet CustomControl .

Parameters

Nom Requis/Facultatif Type de données Description
Index Obligatoire Long Élément dans un tableau d'actions OLE prises en charge. Il s'agit d'un index en base 0, ce qui signifie que le chiffre zéro (0) représente la première action dans le tableau, le chiffre un (1) la seconde, et ainsi de suite.

Remarques

Le paramétrage de cette propriété n'est pas disponible en mode Création.

Utilisez la propriété ObjectVerbs avec la propriété ObjectVerbsCount pour afficher la liste des verbes pris en charge par un objet OLE. La propriété ObjectVerbs utilise cette liste de verbes pour déterminer l’opération à effectuer lorsqu’un objet OLE est activé (lorsque la propriété Action a la valeur acOLEActivate).

Le paramètre de la propriété Verb est la position d'une action particulière dans la liste des actions OLE renvoyée par la propriété ObjectVerbs. Par exemple, la première action OLE de la liste est déterminée par 1 (la commande Visual Basic ObjectVerbs(0) ou la première action OLE du tableau de la propriété ObjectVerbs), la seconde par 2 (la commande Visual Basic ObjectVerbs(1) ou la deuxième action du tableau de la propriété ObjectVerbs), etc.

La première action OLE du tableau de la propriété ObjectVerbs, appelée par la commande Visual Basic ObjectVerbs(0), est l'action par défaut. Si la propriété Verb n'a pas été définie, cette action OLE spécifie l'opération effectuée lorsque l'objet OLE est activé.

La liste des verbes gérés par un objet varie en fonction de l'état de l'objet. Pour mettre à jour la liste des verbes pris en charge par un objet, définissez la propriété Action du contrôle sur acOLEFetchVerbs. Assurez-vous que cette liste est mise à jour avant de la présenter à l’utilisateur.

Exemple

L'exemple suivant retourne les actions OLE prises en charge par l'objet OLE dans le contrôle OLE1 et affiche chaque action OLE dans une zone de message.

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

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.