Cretion d'un picturebox lorsque je click sur le bouton

djebbi-farouk avait soumis l'idée :

Bonjour,
comment crée un picturebox dynamiquement exemple:
lorsque je click sur un bouton je crée une picturebox automatiquement dans la
forme je test ce code mais sa marcha pas:
Dim pict As PictureBox

pict.Visible = True
pict.Left = 20
pict.Top = 50
pict.Width = 300
pict.Height = 200

Tu as la réponse dans la FAQ, que j'adapte à ton problème, ce qui donne

_______________________________________

Option Explicit

Public WithEvents picpic As PictureBox

_______________________________________

Private Sub Command1_Click()
Set picpic = Me.Controls.Add("vb.picturebox", "picpic")
picpic.Move 50, 50, 500, 500
picpic.Visible = True
End Sub

________________________________________

http://faq.vb.free.fr/index.php?questionˆ

Noex a écrit le 30/04/2009 à 11h39 :

djebbi-farouk avait soumis l'idée :

Bonjour,
comment crée un picturebox dynamiquement exemple:
lorsque je click sur un bouton je crée une picturebox automatiquement
dans la
forme je test ce code mais sa marcha pas:
Dim pict As PictureBox

pict.Visible = True
pict.Left = 20
pict.Top = 50
pict.Width = 300
pict.Height = 200

Tu as la réponse dans la FAQ, que j'adapte à ton problème,
ce qui donne

_______________________________________

Option Explicit

Public WithEvents picpic As PictureBox

_______________________________________

Private Sub Command1_Click()
Set picpic = Me.Controls.Add("vb.picturebox", "picpic")
picpic.Move 50, 50, 500, 500
picpic.Visible = True
End Sub

________________________________________

http://faq.vb.free.fr/index.php?questionˆ

meciiiiiiiiiiiiiiiiiiiiii sa marche bien !

Noex a écrit le 30/04/2009 à 11h39 :

djebbi-farouk avait soumis l'idée :

Bonjour,
comment crée un picturebox dynamiquement exemple:
lorsque je click sur un bouton je crée une picturebox automatiquement
dans la
forme je test ce code mais sa marcha pas:
Dim pict As PictureBox

pict.Visible = True
pict.Left = 20
pict.Top = 50
pict.Width = 300
pict.Height = 200

Tu as la réponse dans la FAQ, que j'adapte à ton problème,
ce qui donne

_______________________________________

Option Explicit

Public WithEvents picpic As PictureBox

_______________________________________

Private Sub Command1_Click()
Set picpic = Me.Controls.Add("vb.picturebox", "picpic")
picpic.Move 50, 50, 500, 500
picpic.Visible = True
End Sub

________________________________________

http://faq.vb.free.fr/index.php?questionˆ

je crée plusieur pcturebox (groupe de piturebox) est mon poblem :

lorsque je click sur l'un de picture je doit appeler un fonction .

le merci est resté bloqué dans le tuyau! Remarque, nous avons
l'habitude.