Public Class Form1

Dim lbl1 As New Label()

Dim lbl2 As New Label()

Private Sub RadioButton2_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles RadioButton2.CheckedChanged

End Sub

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

If Me.RadioButton1.Checked Then

            lbl1.Size = New Size(200, 20)

            lbl1.Location = New Point(75, 40)

            lbl1.Text = "Label 1 is added on run time"

Me.Controls.Add(lbl1)

Me.RadioButton1.Checked = False

ElseIf Me.RadioButton2.Checked Then

            lbl2.Size = New Size(200, 20)

            lbl2.Location = New Point(75, 65)

            lbl2.Text = "Label 2 is added on run time"

Me.Controls.Add(lbl2)

Me.RadioButton2.Checked = False

Else

            MsgBox("You have not selected any button")

End If

End Sub

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click

If Me.RadioButton1.Checked Then

If Me.Controls.Contains(lbl1) Then

Me.Controls.Remove(lbl1)

Me.RadioButton1.Checked = False

End If

ElseIf Me.RadioButton2.Checked Then

If Me.Controls.Contains(lbl2) Then

Me.Controls.Remove(lbl2)

Me.RadioButton2.Checked = False

End If

Else

            MsgBox("You have not selected any button")

End If

End Sub

Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click

Me.Close()

End Sub

End Class