lucausa75
12-12-2010, 14:16
Salve ragazzi,
ho un problema con la gestione dei form MDI.
Ho un form MDI chiamato MDIfrmBookArchive e due form figli chiamati uno frmRegProdotto e l'altro frmBookInformation.
Con questo al form load di MDIfrmBookArchive carico il form figlio frmRegProdotto:
Private Sub MDIfrmBookArchive_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
DisableCloseButton(Me.Handle)
frmRegProdotto.MdiParent = Me
frmRegProdotto.Show()
frmRegProdotto.Left = Me.Width / 2 - frmRegProdotto.Width / 2
frmRegProdotto.Top = Me.Height / 2 - frmRegProdotto.Height / 2
End Sub
e eseguo le mie operazioni
Al successivo riavvio MDIfrmBookArchive se si verifica una certa condizione voglio che frmRegProdotto diventi invisibile e frmBookInformation si visualizzi sempre come form figlio di MDIfrmBookArchive.
Questa la fase cruciale:
If RstReg(2).Value = CodiceGUIDinFileconf(Conf, "Seriale") And Not IsDBNull(RstReg(1).Value) Then
Me.Hide()
frmBookInformation.MdiParent = MDIfrmBookArchive
frmBookInformation.Show()
End If
che mi restituisce il seguente errore:
http://img812.imageshack.us/img812/7641/12122010141219.th.jpg (http://img812.imageshack.us/i/12122010141219.jpg/)
Se invece dalla precedente Sub elimino questa parte di codice
Me.Hide()
avrò tutti e due i form figli correttamente visualizzati ma ripeto che solo il primo sia invisibile:
http://img29.imageshack.us/img29/7641/12122010141219.th.jpg (http://img29.imageshack.us/i/12122010141219.jpg/)
Cosa mi consigliate?
ho un problema con la gestione dei form MDI.
Ho un form MDI chiamato MDIfrmBookArchive e due form figli chiamati uno frmRegProdotto e l'altro frmBookInformation.
Con questo al form load di MDIfrmBookArchive carico il form figlio frmRegProdotto:
Private Sub MDIfrmBookArchive_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
DisableCloseButton(Me.Handle)
frmRegProdotto.MdiParent = Me
frmRegProdotto.Show()
frmRegProdotto.Left = Me.Width / 2 - frmRegProdotto.Width / 2
frmRegProdotto.Top = Me.Height / 2 - frmRegProdotto.Height / 2
End Sub
e eseguo le mie operazioni
Al successivo riavvio MDIfrmBookArchive se si verifica una certa condizione voglio che frmRegProdotto diventi invisibile e frmBookInformation si visualizzi sempre come form figlio di MDIfrmBookArchive.
Questa la fase cruciale:
If RstReg(2).Value = CodiceGUIDinFileconf(Conf, "Seriale") And Not IsDBNull(RstReg(1).Value) Then
Me.Hide()
frmBookInformation.MdiParent = MDIfrmBookArchive
frmBookInformation.Show()
End If
che mi restituisce il seguente errore:
http://img812.imageshack.us/img812/7641/12122010141219.th.jpg (http://img812.imageshack.us/i/12122010141219.jpg/)
Se invece dalla precedente Sub elimino questa parte di codice
Me.Hide()
avrò tutti e due i form figli correttamente visualizzati ma ripeto che solo il primo sia invisibile:
http://img29.imageshack.us/img29/7641/12122010141219.th.jpg (http://img29.imageshack.us/i/12122010141219.jpg/)
Cosa mi consigliate?