Differenze tra le versioni di "Passare valori e altre risorse da un Form principale a un Form secondario"

Versione delle 12:46, 19 apr 2024

Per risolvere la questione posta dal titolo di questa pagina, presentiamo un esempio pratico, nel quale si passerà una Picture, mostrata in una PictureBox posta in un Form principale, da detto Form principale a un Form secondario.

Il codice per la gestione del Form principale (FMain.class) sarà il seguente:

Public Sub Form_Open()

 Dim PictureBox1 As PictureBox

 With Me
   .Center
   .Arrangement = Arrange.Fill
 End With

 With PictureBox1 = New PictureBox(Me)
   .Picture = Picture.Load("/percorso/del/file/immagine")
 End With 

 With Form1
   .Show
   .PassaPic(PictureBox1.Picture)
 End With

End

Mentre il codice per la gestione del Form secondario (che chiameremo: Form1.class) sarà il seguente:

Public Sub PassaPic(pic As Picture)

 Dim PictureBox1 As PictureBox

 With PictureBox1 = New PictureBox(Form1)
   .Picture = pic
   .Move(0, 0, pic.W, pic.H)
 End With

End