SoloCodigo

Mi problema es que no puedo lograr, que al apretar el botón se detenga en la quinta forma, me la duplica infinitamente

Public Class Form2
   
    Dim contador As Integer = 1

    Private Sub Panel1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Panel1.Click

        Dim mforma As New Form2()
        If contador < 5 Then
            mforma.Show()
         
        Else
            End

        End If
        contador = contador + 1



    End Sub

 
End Class

Public Class form2
    Dim contador As Integer = 1
    Private Sub Panel1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Panel1.Click
        Dim mforma As New form2()

        If contador < 5 Then
            mforma.Show()
            mforma.Hide()
            contador = contador + 1
        Else
            End
        End If

    End Sub
End Class

le agregue el .hide y ya cierra al dar el quinto click, pero las formas no aperecen en diferentes posciones se me queda trabada en la misma posicion.