Activez JavaScript dans le navigateur pour afficher les pages d'aide de LibreOfficeDev

Fonction FindPropertyObject

Permet d'adresser les objets pendant l'exécution par un paramètre au format chaîne de caractères utilisant le nom de ces objets.

Par exemple, la commande suivante :


MyObj.Prop1.Command = 5

correspond au bloc de commandes suivant :


Dim ObjVar as Object
Dim ObjProp as Object
ObjName As String = "MyObj"
ObjVar = FindObject( ObjName As String )
PropName As String = "Prop1"
ObjProp = FindPropertyObject( ObjVar, PropName As String )
ObjProp.Command = 5

Cela permet de créer des noms dynamiquement pendant l'exécution. Exemple :

"TextEdit1" à "TextEdit5" dans une boucle pour créer cinq noms de contrôles.

Voir aussi : FindObject

Syntaxe :


FindPropertyObject( ObjVar, PropName As String )

Paramètres :

ObjVar : variable d'objet devant être définie dynamiquement pendant l'exécution.

PropName : chaîne de caractères spécifiant le nom de la propriété à adresser pendant l'exécution.

Codes d'erreur :

5 appel de procédure incorrect

12 variable non définie

14 paramètre incorrect

52 nom ou numéro de fichier incorrect

57 erreur E/S de périphérique