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...
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!
yop
Posté le 20-12-2001 à 11:06:04
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
Posté le 20-12-2001 à 11:11:10
heuu ouais mais.. j'ai pas capiché là!
c'est quoi un groupe de controles, callback?
t'as pas un exemple?
karlkox
Posté le 20-12-2001 à 11:59:41
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
Posté le 20-12-2001 à 12:26:43
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
camarchepoa
m'enfin !
Posté le 20-12-2001 à 15:45:52
en tous cas je confirma que la derniere solution donnee dans mon post est tres efficasse !!!
---------------
Ca marche pas sauf des fois ........
tu mets dans une boucle et yop 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 !!!
---------------
Ca marche pas sauf des fois ........