Dernière réponse
Sujet : [VB6] Créer dynamiquement des objets?
camarchepoa	celle la :     Me.Controls.Add "VB.CommandButton", "Test"    Me!Test.Caption = "Bouton Dynamique"    Me!Test.Left = 100    Me!Test.Top = 100    Me!Test.Visible = True   tu mets dans une boucle et yop  :bounce: plein de boutons tout partout   par contre dans la boucle il faut faire :   for i=0 to 1000    Me.Controls.Add "VB.CommandButton", "Test" & i    Me!Test.Caption = "Bouton Dynamique" & i    Me!Test.Left = 100    Me!Test.Top = 100 * i    Me!Test.Visible = True next   sinon touts les boutons ont le meme nom => erreur et il faut aussi gerer les positions sinon touts les boutons st superposes !!!

Votre réponse
Nom d'utilisateur	Pour poster, vous devez être inscrit sur ce forum .... si ce n'est pas le cas, cliquez ici !
Mot de passe	Vous avez perdu votre mot de passe ? Cliquez ici !
Le ton de votre message
Votre réponse Smilies     Liste des smilies perso Wiki smilies Chercher un smiley
Options	Activer votre signature Désactiver les smilies Activer la notification par email du sujet

Aperçu

Vous avez perdu votre mot de passe ?

Vue Rapide de la discussion

camarchepoa

celle la :     Me.Controls.Add "VB.CommandButton", "Test"    Me!Test.Caption = "Bouton Dynamique"    Me!Test.Left = 100    Me!Test.Top = 100    Me!Test.Visible = True   tu mets dans une boucle et yop  :bounce: plein de boutons tout partout   par contre dans la boucle il faut faire :   for i=0 to 1000    Me.Controls.Add "VB.CommandButton", "Test" & i    Me!Test.Caption = "Bouton Dynamique" & i    Me!Test.Left = 100    Me!Test.Top = 100 * i    Me!Test.Visible = True next   sinon touts les boutons ont le meme nom => erreur et il faut aussi gerer les positions sinon touts les boutons st superposes !!!

swing

celle de KarLKoX ?

camarchepoa

en tous cas je confirma que la derniere solution donnee dans mon post est tres efficasse !!!

swing

ouais mais comment je déclare ça? j'ai une variable type et dimensionnelle de surcroit. étant donnée que l'objet n'existe pas, je travaille donc avec des variables qui contiennent les noms de mes objets...   Private Sub tLabel.slblVarName_KeyDown(Index As Integer, KeyCode As Integer, Shift As Integer)   ne passe pas

karlkox

Pour gérer les différents évenements tu n'auras aucun probleme, car tu auras une propriété supplémentaire qui va apparaitre sur l'évenement : Index. Un select case fera l'affaire.

swing

heuu ouais mais.. j'ai pas capiché là! c'est quoi un groupe de controles, callback? :cry:   t'as pas un exemple? :)

yop	Tu creer un groupe de controle ... Comme ca tu gerer l'index. Cela permet que les callback sont identique pour tous les object que tu crés

swing

okay, c'est bien joli, mais maintenant que j'ai mes TextBoxes créées dynamiquement, comment j'ai accès aux Sub d'événements (genre Change, Click, KeyDown) ?   re-merci! :)

swing

yep, merci, j'avais la flemme! :)

yop	Faut rechercher des fois :)   http://forum.hardware.fr/forum2.ph [...] &owntopic=

swing

salut,   je voudrais pouvoir creer dynamiquement des textboxes sur ma feuille. par exemple j'entre "5" dans un champ et hop j'ai 5 textboxes qui apparaissent alignées les unes en dessous des autres dans ma fenetre...   merci.