Groupe de Contrôles et ObjetRésolu

Question

Bonjour à toutes et tous,
j'ai une application qui comporte 2 groupes de contrôles de 60 TextBox chacun, et toutes les 20 secondes, je dois effacer le contenu de ces TextBox. Avec une Boucle, pas de problème. Seulement, ça prend un peu de temps. Alors, j'ai pensé mettre chaque groupe de contrôles dans un objet pour n'avoir que l'objet à "nettoyer".
Exemple:
Dim Objet1 as Object
60 TextBox (Text1, indice 0 à 59) sur le Form
Si je fais Object1 = Text1, ça marche car si je demande MsgBox Cstr(Objet1(20)), le contenu de Text1(20) apparait bien dans la MsgBox. Par contre, je n'arrive pas à nettoyer Objet1 d'un coup, et je ne sais pas si c'est possible aussi simplement. D'après mes recherches,
Cls ne fonctionne que sur Form ou PictureBox,
Clear ne correspond pas et Objet1 = "" ne fonctionne pas. Merci de m'éclairer si vous avez une piste.

NHenry · Accepted Answer

Bonjour,

Objet1.Text="" 'pour les textbox
Objet1.Caption="" 'pour les labels, frames, ...

Mon site

rebelette · Answer

J'ai essayé et j'ai toujours la même erreur:
"Erreur d'execution 438, l'objet ne gère pas cette propriété ou cette méthode".
J'ai  mentionné que j'avais écrit
"Objet1 = Text1" alors que j'ai écrit
"Set Objet1 = Text1". Je ne sais pas si l'erreur vient de là. Je continue à chercher, merci de ta réponse

NHenry · Answer

Bonjour,

Ton Object1 est un tableau ?
Si oui, c'est donc :
Object1(Index).Text="Valeur"

Mon site

rebelette · Answer

Rebonjour, L'objet est bien un tableau, qui comprend tous les contrôles du groupe de contrôles. J'ai essayé ce que tu m'as indiqué (avec Index) mais ça n'affecte que le 1er élément du groupe de contrôles. Je pourrais bien sûr passer par une boucle, mais c'est ce que je veux éviter. Je cherche à nettoyer l'objet d'un coup, pour gagner du temps... Je sais pas...

NHenry · Answer

Bonjour,

Sans boucle, ce n'est pas possible.

Et pense à toujours mettre "Option Explicit" en haut de tes modules de code.

Et évite de mettre "Réponse acceptée" si le problème n'est pas résolu, car sinon, tu aura moins de chance d'avoir une bonne réponse.

Mon site

rebelette · Answer

je mets toujours option explicit, merci pour le conseil, et tant pis pour ma requête, c'était un peu facile comme raccourci de ma part. a la prochaine

Groupe de Contrôles et Objet

6 réponses

Votre réponse

Discussions similaires