Vb. net hogyan lehet ezt?

Azt szeretném kérdezni hogy ha pl. button ra kattintva mindig letesz 1 új objektumot (Akármit) azokat ez után elérni ?

Példa:

Dim szam As Integer = 1

Dim pozicio As Integer = 10

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click

Dim textbox As New TextBox()

textbox.Name = "TextBox" + szam.ToString

textbox.Size = New Size(50, 20)

textbox.Location = New Point(30, pozicio)

Me.Controls.Add(textbox)

szam += 1

pozicio += 20

End Sub

és én itt ha megnyomok egy mások gombot akkor az 5-ik textbox eltünik vagy az 5 textbox ban lesz valami text. Köszi :)