[VB.NET] events aan aangemaakte buttons toevoegen

'Deze code bijvoorbeeld in je Form_Load
Dim knop As New Button()
knop.Name = "myButton"
knop.Text = "KLIK"
Me.Controls.Add(knop)
AddHandler knop.Click, AddressOf knop_Click

'Event voor de knop_Click
Private Sub knop_Click(ByVal sender As Object, ByVal e As EventArgs)
    MessageBox.Show("Geklikt!")
End Sub

'Deze code bijvoorbeeld in je Form_Load
Dim knop As New Button()
knop.Name = "myButton"
knop.Text = "KLIK"
Me.Controls.Add(knop)
AddHandler knop.Click, AddressOf knop_Click
 
'Event voor de knop_Click
Private Sub knop_Click(ByVal sender As Object, ByVal e As EventArgs)
    MessageBox.Show("Geklikt!")
End Sub

Dim button1 As New Button()
button1.Location = New Point(472, buttonHoogte)
Me.Controls.Add(button1)
Dim naamke As String
naamke = woorden(1).ToString.Replace(" ", "")
button1.Name = "btn" & naamke
naamke = button1.Name
button1.Text = woorden(1) & " | " & button1.Name
button1.Size = New Size(200, 20)
AddHandler button1.Click, AddressOf button1_Click
frisDrankTeller += 1
line = inputstream.ReadLine()
buttonHoogte += 25

Dim button1 As New Button()
button1.Location = New Point(472, buttonHoogte)
Me.Controls.Add(button1)
Dim naamke As String
naamke = woorden(1).ToString.Replace(" ", "")
button1.Name = "btn" & naamke
naamke = button1.Name
button1.Text = woorden(1) & " | " & button1.Name
button1.Size = New Size(200, 20)
AddHandler button1.Click, AddressOf button1_Click
frisDrankTeller += 1
line = inputstream.ReadLine()
buttonHoogte += 25