Discussion :

[xav2303]

bonjour,

Je fais actuellement un code pour ajouter tout une présentation par le code. Cela marche au début mais plus après ! Pouvez vous me dire ce qui cloche dans mon code ?

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
Dim Tab As New TabPage 
        Dim Text1 As New TextBox
        Dim But1 As New Button 
        Dim Etiquette1 As New Label
        Dim Etiquette2 As New Label
 
        '*****AJOUT DES ELEMENTS DE PRESENTATION*****
 
        Tab.Controls.Add(Text1)
        Tab.Controls.Add(Etiquette1)
        Tab.Controls.Add(Etiquette2)
        Me.TabControl1.TabPages.Add(Tab)
        TabControl1.SelectedTab = Tab
 
        '*****MISE EN PAGE DES ELEMENTS DE PRESENTATION*****
 
        Etiquette1.Text = "Effectué le :"
        Etiquette2.Text = "Patient :"
        Text1.Location = New Point(70, 8)
        Etiquette2.Location = New Point(10, 10)
        Etiquette1.Location = New Point(0, 10)

L' "Etiquette2" ne s'affiche pas...

Merci d'avance

Xav.

[Pol63]

etiquette2 ne s'affiche pas car il est derrière les autres
il faut changer sa location

de plus il y a un mode design qui permet de faire ca, en posant graphiquement les controles c'est plus simple ...

il serait aussi préférable d'utiliser le bon vocabulaire, ce ne sont pas des éléments, mais des controles

[xav2303]

Merci pour les contrôle

Je venais juste de découvrir la solution...

Je sais que graphiquement c'est possible mais je veux que : lorsque l'on clique sur un bouton, un Onglet s'ajoute donc je suis obligé de le faire par code

[Pol63]

non

tu peux le faire graphiquement, par code à l'ouverture de la fenetre rendre le tappage invisible et sur le clic du bouton rendre le tabpage visible