Public Class Form1
    Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
        Dim dynamicButton As New Button()
        dynamicButton.Name = "dynamicButton"
        dynamicButton.Text = "CLICK"
        dynamicButton.Font = New Font("Georgia", 16)
        dynamicButton.Location = New Point(60, 150)
        Me.Controls.Add(dynamicButton)
End Sub