Création d'un picturebox via le code

kiboumz Messages postés 120 Date d'inscription mercredi 17 septembre 2003 Statut Membre Dernière intervention 18 mai 2007 - 12 avril 2007 à 17:31
kiboumz Messages postés 120 Date d'inscription mercredi 17 septembre 2003 Statut Membre Dernière intervention 18 mai 2007 - 12 avril 2007 à 19:09
Bonjour,

J'essaie de créer un picturebox manuellement et je n'y arrive pas.

Voici le code :

Dim pictboxLogo As New PictureBox()

pictboxLogo.Image = My.Resources.Logo
pictboxLogo.SizeMode = PictureBoxSizeMode.AutoSize
pictboxLogo.Cursor = Cursors.Hand
pictboxLogo.Location = New Point(197, 99)
pictboxLogo.Name = "pictboxLogo"
pictboxLogo.Size = New Size(335, 141)
pictboxLogo.SizeMode = PictureBoxSizeMode.AutoSize
pictboxLogo.TabStop = False
pictboxLogo.Visible = True
pictboxLogo.BorderStyle = BorderStyle.FixedSingle

Me.tabpage.Controls.Add(pictboxLogo)

D'après moi le problème vient du fait qu'il n'est pas visible. Étrangement, si je vais en mode debug et je regarde les attributs j'obtiens ceci:

Avant me.tabpage.contr....
visible = true
Après
visible = false

J'ai même essayé de remettre la propriété à true après, mais sans succès ... (me.tabpage.controls("pictboxLogo").visible = true

Merci
a+

2 réponses

yassirguitare Messages postés 29 Date d'inscription mardi 20 décembre 2005 Statut Membre Dernière intervention 3 juin 2009
12 avril 2007 à 18:28
Salut KIBOUMZ
essaies ce code dans l'evenement form1_load
Tu place sur la forme un TabControle

Dim pictboxLogo As New PictureBox()

with pictboxLogo ' l'instruction with permet d'alleger l'ecriture du code
.Image = My.Resources.Logo
.SizeMode = PictureBoxSizeMode.AutoSize
.Cursor = Cursors.Hand
.Location = New Point(10, 10) '10 pixel X et Y par rapport a TabControl1.TabPage
.Name = "pictboxTab"  'essay de lui donner un name different
.Size = New Size(335, 141)
.SizeMode = PictureBoxSizeMode.AutoSize
.BorderStyle = BorderStyle.FixedSingle
End With

Me.TabControl1. TabPages(0) .Controls.Add(pictboxLogo) '
' chemain complet ou la picture va etre placer ici la première Tab index = 0
0
kiboumz Messages postés 120 Date d'inscription mercredi 17 septembre 2003 Statut Membre Dernière intervention 18 mai 2007
12 avril 2007 à 19:09
Salut,

Merci beaucoup cela fonctionne!

Le seule chose qui coince maintenant c'est que ce picturepox doit être par dessus un textbox qui lui est par dessus un tabpages.

Pour l'instant, il met mon picturebox en arrière-plan ... J'ai esseyé .bringtoFront(), mais ça n'a pas fonctionné...

Meric
a+
0
Rejoignez-nous