Je génère des boutons mais je ne sais pas comment faire pour générer le code correspondant à chaque bouton (en VB 6) donc si quelqu'un pouvait m'éclairer...
- Le nombre de bouton varie (entre 20 et 40 bouton peuvent etre généré) - Le nom des boutons varie ((le nom est pompé à partir d'une base), leurs caption sont aussi leurs noms)
petit morceau de code me permettant de générer les boutons... mais je n'ai pas le code correspondant à chaque bouton...:
For j = 1 To NbrBtn UET1 = RS2!IDUET Set MonBouton = Me.Controls.Add("VB.CommandButton", "Btn" & j, Me) MonBouton.Visible = True MonBouton.Left = Gauche MonBouton.Top = Haut MonBouton.Height = 375 MonBouton.Width = 1095 MonBouton.Caption = "Btn " & j Haut = Haut + 375 ... Next j
Marsh Posté le 14-09-2004 à 22:03:04
Bonjour,
Je génère des boutons mais je ne sais pas comment faire pour générer le code correspondant à chaque bouton (en VB 6)
donc si quelqu'un pouvait m'éclairer...
- Le nombre de bouton varie (entre 20 et 40 bouton peuvent etre généré)
- Le nom des boutons varie ((le nom est pompé à partir d'une base), leurs caption sont aussi leurs noms)
petit morceau de code me permettant de générer les boutons... mais je n'ai pas le code correspondant à chaque bouton...:
For j = 1 To NbrBtn
UET1 = RS2!IDUET
Set MonBouton = Me.Controls.Add("VB.CommandButton", "Btn" & j, Me)
MonBouton.Visible = True
MonBouton.Left = Gauche
MonBouton.Top = Haut
MonBouton.Height = 375
MonBouton.Width = 1095
MonBouton.Caption = "Btn " & j
Haut = Haut + 375
...
Next j
Merci d'avance