Non vi è mai capitato di aver la necessità di avere un menu contestuale che deve avere degli elementi che si devono creare dinamicamente?
Beh, io si e ho trovato alcune piccole difficoltà. Posto qui sotto il codice che consente di farlo. Inoltre c’è anche il controllo quando si clicca l’elemento del menu.
1: ' definisce l'elemento da inserire nel menu contestuale
2: Dim itm As New ToolStripMenuItem
3: itm.Tag = "Esempio"
4: itm.Text = "Esempio di testo"
5: AddHandler itm.Click, AddressOf Me.ToolStripItem_Click
6:
7: ' funzione di gestione del click
8: Private Sub ToolStripItem_Click(ByVal sender As Object, ByVal e As System.EventArgs)
9: Dim tsi As ToolStripItem = CType(sender, ToolStripItem)
10: MsgBox(tsi.Text)
11: End Sub
A disposizione per info. Ciao a tutti!
Subscribe