ORTIPIC
Messages postés41Date d'inscriptionmercredi 26 février 2003StatutMembreDernière intervention16 juillet 2007
-
9 mars 2005 à 11:35
ORTIPIC
Messages postés41Date d'inscriptionmercredi 26 février 2003StatutMembreDernière intervention16 juillet 2007
-
9 mars 2005 à 17:03
FAB
salut a tous
voila j ai une form1
et je voudrai que dans form_load un bout de prog me crée picturebox sur form1
ORTIPIC
Messages postés41Date d'inscriptionmercredi 26 février 2003StatutMembreDernière intervention16 juillet 2007 9 mars 2005 à 13:49
FAB repond
bien cool l0st3d
helas je connais
la creation sous ide c est justement pas ce qui m interesse (sauf sur une autre form)
et picture1(index) ne fais pas ce que je veus
car si form2.picture1(0)
alors je ne peus pas creer form1.picture(1) oui oui form1
car je veus creer une picture sur une form ou il n en existe pas avant le lancement du code
meme si je cree form1.picture1 --> picture1 ne deviendra jamais la reference de form2.picture2 a moins que je n est pas compris comment faire
----------------------------
Dim ooi As PictureBox
Set ooi = Form2.Picture2
Set Form1.Picture1 = ooi '<-- pourquoi picture1 ne prend pas la couleur de picture2 ???
---------------------------------
ce code ne fais rien pourquoi ?
jpleroisse
Messages postés1788Date d'inscriptionmardi 7 novembre 2000StatutMembreDernière intervention11 mars 200627 9 mars 2005 à 15:11
Place un PictureBox sur ta form2 et tappe le code suivant dans form1.
Option Explicit
Private WithEvents picObj As PictureBox
Private Sub PicObj_Click() 'Ceci peut être supprimé
MsgBox "Ceci est un Picturebox ajouté de façon dynamique."
End Sub
Private Sub Form_Load()
Set picObj = Controls.Add("VB.PictureBox", "PicObj")
With picObj
.Visible = True
.Width = 2000
.Height = 2000
.Top = 1000
.Left = 1000
.Picture = Form2.Picture1.Picture
End With
End Sub