salut
J'ai un problème avec ds contrôles que je cherche à ajouter à un formulaire par le code.
Les controls, je voudrais les ajouter à un autre qui se trouve dans un groupbox, lui même situé dans un panel. j'ai écris le code ci-dessous qui est une procédure appelée par l'évènement CLICK d'un bouton, mais je n'ai toujours rien:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25 Public Sub affichParametrAnt() Dim i As Integer Dim pt, pt1 As Point If ANT > 1 Then pt = FormOuverture.LblAntenne.Location ReDim paraAnt(ANT - 2) For i = 0 To paraAnt.Length - 1 With paraAnt(i) .initParam() pt1.Y = pt.Y + 100 pt1.X = pt.X .lblAntenne.Location = pt1 .lblAntenne.Text = "Antenne " & i + 2 FormOuverture.GrpBxAntennes.Controls.Add(.lblAntenne) FormOuverture.PanelAntennes.Controls.Add(FormOuverture.GrpBxAntennes) FormOuverture.Controls.Add(.lblAntenne) .lblAntenne.Show() End With Next End If End Sub
Partager