Public Class Form1 Private f(2) As Form2 Private Sub Button1_Click(Byval sender As Object, Byval e As System.EventArgs) Handles Button1.Click f(0) = New Form2() f.TopLebel = False Me.Controls.Add(f(0)) f(0).Show() End Sub Private Sub Button2_Click(Byval sender As Object, Byval e As System.EventArgs) Handles Button2.Click f(1) = New Form2() f.TopLebel = False Me.Controls.Add(f(1)) f(1).Show() End Sub Private Sub Button3_Click(Byval sender As Object, Byval e As System.EventArgs) Handles Button3.Click f(2) = New Form2() f.TopLebel = False Me.Controls.Add(f(2)) f(2).Show() End Sub End Class