Hello Community,
I'm trying to dynamically add a menuitem to my context menu and add a click handler but for some reason it won't add the handler what did a do wrong?
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
For Each Line In RichTextBox1.Lines
Dim NewItem As New MenuItem
NewItem.Text = Line
AddHandler NewItem.Click, AddressOf NewItem_Click
ContextMenuStrip1.Items.Add(Line)
Next
End Sub
Private Sub NewItem_Click(sender As Object, e As EventArgs)
MsgBox(CType(sender, MenuItem).Text)
End Sub