ajouter un controle depuis un code

Question

salut tous le monde,
est ce que il ya moyen en vb6 qui permet d'ajouter des controle dynamiquement comme c'est le cas en vb.NET

privatesub MonNouveauControl()
 Load TextBox1(TextBox.Count)
TextBox1(TextBox.Count - 1).Text = "MonTexte"
TextBox1(TextBox.Count - 1).Left = TonCalculEnFonctionDeLaGauche
TextBox1(TextBox.Count - 1).Right = TonCalculEnFonctionDuHaut
EndSub

merci d'avance

cs_Jack · Answer

Salut
Oui, suffit :
- d'avoir une TextBox1 avec l'index 0 dans la forme d'origine
- de remplacer ton "TextBox.Count" par un chiffre 1 et suivants
Tester avec 
   Load TextBox1(UBound(TextBox1) + 1)

Vala
Jack, MVP VB
NB : Je ne répondrai pas aux messages privés

<hr />Le savoir est la seule matière qui s'accroit quand on la partage (Socrate)

kelm_by · Answer

merci  bcp tous ce que il falait c'est avoire le control en index 0

Kristof_Koder · Answer

Et de ne pas oublier de faire un coupe de .Visible = True sur le ctrl ajouté, car toujours invisible à la création.
Par contre, Jack, pourquoi ne pas utiliser la propriété Countde la collection de Texbox1 ??

jrivet · Answer

Salut,
Moi ce que je trouve "bizarre" c'est que cela existe en .NET je croyais que la notion de groupe de controle n'existait plus?

> [auteur/KELMBY/952250.aspx kelm_by]: le code que tu as donné en premier poste c'est du .NET?
@+: Ju£i?n
Pensez: Réponse acceptée

Kristof_Koder · Answer

jrivet < En VB.NEt tu peux ajouter un controle à une form mais pas via un groupe de contrôles qui, effectivement, n'existe pas en .NET.

cs_Jack · Answer

Re
Pour le Count, je n'était pas sûr, je n'ai pas VB6 sous la main (en déplacement)
Pour VB.Net, c'est possible en faisant une Collection de controls

Vala
Jack, MVP VB
NB : Je ne répondrai pas aux messages privés

<hr />Le savoir est la seule matière qui s'accroit quand on la partage (Socrate)

Ajouter un controle depuis un code

6 réponses

Votre réponse

Discussions similaires