VB.NET - Problema apertura form Child

For Each f As Form In Me.MdiChildren
            If CStr(f.Tag) = "InserimentoCarico" Then
                f.BringToFront()
                Exit Sub
            End If
        Next 'f

        Insert_Carico.Tag = "InserimentoCarico"
        Insert_Carico.MdiParent = Me
        Insert_Carico.Show()

Public Insert_Carico As New InserimentoCarico()

'Gestisci l'evento FormClosing (usa un AddHandler quando aggiungi il Child al Parent):
'AddHandler Insert_Carico.FormClosing, AddressOf Insert_Carico_FormClosing
Private Sub Insert_Carico_FormClosing(ByVal sender As Object, ByVal e As FormClosingEventArgs)
    If e.CloseReason <> CloseReason.MdiFormClosing Then
        'Annullo la chiusura
        e.Cancel = True
        'nascondo il Form
        CType(sender, Form).Visible = False
    End If
End Sub

 Il codice sorgente non è stato renderizzato qui
perchè non c'è sufficiente spazio.
Clicca qui per visualizzarlo in una nuova finestra

 Public ListViewxxx As New ListView()

Private Sub tuaForm_Load(ByVal sender As Object, ByVal e As EventArgs) Handles MyBase.Load
    AddHandler ListViewxxx.FormClosing, AddressOf ListViewxxx_FormClosing
End Sub

Public WithEvents ListViewxxx As New ListView()

 Il codice sorgente non è stato renderizzato qui
perchè non c'è sufficiente spazio.
Clicca qui per visualizzarlo in una nuova finestra

 For Each f As Form In Me.MdiChildren
            If CStr(f.Tag) = "ListView" Then
                f.BringToFront()
                Exit Sub
            End If
        Next 'f

        Dim ListViewxxx As New ListView()
        ListViewxxx.Tag = "ListView" 'you get the idea: each type of form will get its own tag
        ListViewxxx.MdiParent = Me
        ListViewxxx.Show()