Ajouoter de sous menu à un menu strip dynamqiuement [Résolu]

Messages postés
28
Date d'inscription
samedi 26 février 2005
Dernière intervention
7 janvier 2009
- - Dernière réponse : cs_fauve
Messages postés
661
Date d'inscription
vendredi 2 décembre 2005
Dernière intervention
23 mars 2011
- 27 nov. 2008 à 16:24
bonjour,
   je cherche comment il est possible à partir du code d'ajouter des sous menu à un menustrip et comment y avoir accès par la suite propriété click par ex.)
je cré un menustrip dans la form et veut y ajouter des sous menu dynamiquement ou en retirer comment je fais.
j'utilise vb 2008
Merci
Afficher la suite 

Votre réponse

2 réponses

Meilleure réponse
Messages postés
661
Date d'inscription
vendredi 2 décembre 2005
Dernière intervention
23 mars 2011
3
Merci
Salut,

Voici comment ajouter des menus et des sous menus à un MenuStrip et leurs ajouter un handler :

Ps : MenuStrip1 a été ajouté avec le Concepteur Windows Form

<hr size="2" width="100%" />
Ajouter des menus et des sous menus
<hr size="2" width="100%" />

Dim MS_item As New ToolStripMenuItem
Dim MS_subitem As New ToolStripMenuItem

MS_item = MenuStrip1.Items.Add("Fichier")

MS_subitem = MS_item.DropDownItems.Add("Nouveau")
'Ajouter un handler pour que l'évènement Click soit pris en charge par Nouveau()
AddHandler MS_subitem.Click, AddressOf Nouveau

MS_subitem = MS_item.DropDownItems.Add("Ouvrir")
AddHandler MS_subitem.Click, AddressOf Ouvrir

MS_item = MenuStrip1.Items.Add("Edition")

MS_subitem = MS_item.DropDownItems.Add("Copier")
AddHandler MS_subitem.Click, AddressOf Copier

MS_subitem = MS_item.DropDownItems.Add("Coller")
AddHandler MS_subitem.Click, AddressOf Coller

<hr size="2" width="100%" />
Les fonctions
<hr size="2" width="100%" />   

    Sub Nouveau()
        MsgBox("Vous avez cliqué sur Nouveau du menu Fichier")
    End Sub

    Sub Ouvrir()
        MsgBox("Vous avez cliqué sur Ouvrir du menu Fichier")
    End Sub

    Sub Copier()
        MsgBox("Vous avez cliqué sur Copier du menu Edition")
    End Sub

    Sub Coller()
        MsgBox("Vous avez cliqué sur Coller du menu Edition")
    End Sub

<hr size="2" width="100%" />Pensez : Réponse Acceptée 

Merci cs_fauve 3

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

Codes Sources a aidé 104 internautes ce mois-ci

Commenter la réponse de cs_fauve
Messages postés
28
Date d'inscription
samedi 26 février 2005
Dernière intervention
7 janvier 2009
0
Merci
ah oui j'oubliais, le menustrip contient 2 menu horizontal et je voudrais ajouter, modifier ou supprimer des sous menu que dans le premier
(Ex. menu Fichier et menu Édition je veux qu'opérer que sur  le menu fichier)
Merci
Commenter la réponse de binet1

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.