ToolStripMenuItem et DirectCast [Résolu]

Messages postés
1855
Date d'inscription
jeudi 23 mai 2002
Dernière intervention
24 juin 2018
- 17 oct. 2015 à 10:59 - Dernière réponse :
Messages postés
1855
Date d'inscription
jeudi 23 mai 2002
Dernière intervention
24 juin 2018
- 17 oct. 2015 à 11:16
Bonjour le Forum,

Lors de la création dynamique d'un menu, je rencontre un problème pour récupéré l'item cliqué.

Pour créer le menu et son arborescence
Dim menustrip2 As New MenuStrip
Dim menustrip2_itemEnvAppJob As New ToolStripMenuItem
Dim menustrip2_itemenv As New ToolStripMenuItem

' Création dynamique du menu EnvAppJob et de son arborescence
menustrip2_itemEnvAppJob.Text = "Environnement \ Application \ Job"
menustrip2.Items.Add(menustrip2_itemEnvAppJob)

' Ajout au menu ENV / APP/ JOB de l'environnment
Dim innerItemEnv As New ToolStripMenuItem()
innerItemEnv.Text = "Environnement"
innerItemEnv.Name = menustrip2_itemEnvAppJob.Text
menustrip2_itemEnvAppJob.DropDownItems.Add(innerItemEnv)

' Ajout des items dans le sous-menu Environnement
innerItemEnv.DropDown.Items.AddRange((From a In ListOfJob.Select(Function(j) j.Environnement).Distinct()
                                      Order By a Ascending
                                      Select New ToolStripMenuItem(a)).ToArray())

AddHandler innerItemEnv.DropDownItemClicked, AddressOf Menu2_Item_Click


Pour récupérer l'item cliqué
    Private Sub Menu2_Item_Click(sender As Object, e As ToolStripItemClickedEventArgs)
        Dim monitem As ToolStripItem = DirectCast(sender, ToolStripItem)
        MessageBox.Show("monitem.Text   :  " & monitem.Text & Environment.NewLine & _
                        "monitem.Name   :  " & monitem.Name & Environment.NewLine)
    End Sub


Comment puis-je récupérer le nom de l'item cliqué dans le sous-menu Environnement ?

Merci de vos propositions,

jean-marc
Afficher la suite 

Votre réponse

1 réponse

Messages postés
1855
Date d'inscription
jeudi 23 mai 2002
Dernière intervention
24 juin 2018
- 17 oct. 2015 à 11:16
0
Merci
Désolé pour cette question posée un peu trop rapidement.
 e.ClickedItem.Text()

jean-marc
Commenter la réponse de cs_JMO

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.