Bueno dia todos.
J'arrive à insérer des control ds la form, ms pas dans une frame precise. J'ai comparé les propriétés d'un control sur la form, et d'1 autre ds une frame et je vois pas la différence...
Voilà mon code, ca sera ptet plus clair:
'Declarations
Dim WithEvents cmdDynamique As VB.CommandButton
Dim i As Integer
Private Sub Form_Load()
'initialisation de i, variable des cmdDynamique
i = 1
End Sub
Private Sub cmdDynamique_Click()
'ajout d'un cmdDynamique
i = i + 1
'c'est ici que je suppose qu'il faut modifier un truc mais je ne vois pas
Set cmdDynamique = Me.Controls.Add("VB.CommandButton", "cmd" & i) 'cmd&i est le nom du commandButton
cmdDynamique.Width = 1500
cmdDynamique.Height = 70
cmdDynamique.Left = 0
cmdDynamique.Top = (i - 1) * cmdDynamique.Height cmdDynamique.Caption = i
cmdDynamique.Visible = True
End Sub
Message édité par superchinois le 25-04-2003 à 15:57:37