Partial Class _Default
    Inherits System.Web.UI.Page

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        'Create the object for Textbox control
        Dim txt As New TextBox
        txt.Text = "Dynamic Textbox"
        txt.ID = "txtDynamic"
        'Bind  the textbox control to placeholder
        PlaceHolder1.Controls.Add(txt)
        'Create the Object for Button
        Dim btn As New Button
        btn.Text = "Dynamic button"
        AddHandler btn.Click, AddressOf Button1_Click
        PlaceHolder1.Controls.Add(btn)
    End Sub
     
    Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs)
        MsgBox("Dynamic Button Events")
    End Sub
End Class