如何把一个窗体添加到容器控件中

Private Sub Form1_Load()Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles MyBase.Load


            Dim nForm As New Form2


'检查是否有打开的窗体


        For Each cForm As Form In Me.Panel1.Controls


            cForm.Dispose()


        Next


        If Me.ContentPanel.Controls.Count < 1 Then'如果打开的窗体数量为0


            With nForm


                nForm.TopLevel = False '设置窗体为非顶级容器


                .Dock = DockStyle.Fill


                .Show()'显示窗体


            End With


            Pane1l.Controls.Add(nForm)'把该窗体添加到Panel控件里


        Else


            nForm.Activate()'激活窗体


        End If


    End Sub