[VB.NET] Chiusura e apertura form figlio con errore

[Folcus]

Domanda banalotta:

ho un form padre e uno figlio.

avvio il programma e dal padre avvio il figlio che si apre al suo interno.

sul form figlio ho il classico pulsante "Chiudi", per chiudere il solo form figlio con la classica forma "Me.Close".

se successivamente dal form padre rilancio il figlio mi dice "Impossibile accedere a un oggetto eliminato.".

due righe di codice per capire meglio:

sul Padre:

Public Class MDIParent1

Public NewForm1 As New Form1()

Private Sub OptionsToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles OptionsToolStripMenuItem.Click

NewForm1.MdiParent = Me
NewForm1.Show() 'Mostra il form1

End Sub

End Class

sul Form figlio

Public Class Form1

Private Sub cmdChiudi_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdChiudi.Click

Me.Close()

End Sub

End Class

[oregon]

Sposta la creazione all'interno della

OptionsToolStripMenuItem_Click

[Folcus]

quindi non:

Public NewForm1 As New Form1()

ma semplicemente:

Dim NewForm1 As New Form1()


giusto?


ho notato altra cosa, aprendo più form all'interno dello stesso padre, questi vanno a "scalare" e non si posizionano mai sul punto (0,0).

ho provato con NewForm1.SetDesktopLocation(0, 0), ma non funziona e va sempre a "scalare".

[GhostFire]

Originariamente inviato da Folcus
quindi non:

Public NewForm1 As New Form1()

ma semplicemente:

Dim NewForm1 As New Form1()


giusto?


ho notato altra cosa, aprendo più form all'interno dello stesso padre, questi vanno a "scalare" e non si posizionano mai sul punto (0,0).

ho provato con NewForm1.SetDesktopLocation(0, 0), ma non funziona e va sempre a "scalare".

Private Sub OptionsToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles OptionsToolStripMenuItem.Click

Dim NewForm1 As New Form1()

NewForm1.MdiParent = Me
NewForm1.Show() 'Mostra il form1

End Sub

e poi levi la variabile NewForm dichiarata come publica.

per il problema della posizione:

NewForm1.Location = New Point(x,y)