How to Create Button Control in Run Time VB.Net

In This VB.Net Tutorial We Will See How To Create Button Control in Run Time using VB.net

 

Video:

Source Code: 

    Private Sub TableClick(ByVal sender As Object, ByVal e As EventArgs)
        Dim btn As Button = CType(sender, Button)
        MsgBox(btn.Text)
    End Sub

    Private Sub CreateButton_Table()
        Dim x As Integer = 53
        Dim y As Integer = 40
        Dim i As Integer
        For i = 1 To 5
            Dim btn As New Button
            AddHandler btn.Click, AddressOf TableClick
            btn.Name = "DynamicButton"
            btn.Size = New Size(92, 50)
            btn.Location = New Point(x, y)
            btn.Text = "Button" & i
            GPTable.Controls.Add(btn)
            x = x + 100
        Next

    End Sub

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