Liste déroulante

Question

Bjr
Je débute avec VB6 et je n'arrive pôa à faire une liste déroulante dans un userform. Je sais, cela peut paraitre con mais je n'ai que très peu d'experience dans la prog.
Je sais faire un menu avec le créateur de menu mais ce que je voudrais, c'est créer un liste avec des sous-liste
Aidez moi merci d'avance.

cs_LordBob · Answer

pour la liste déroulante, tu dois procédé comme ceci... (ici la liste deroulant s'appelle 'Combo1'):

Combo1.AddItem "Hello"
Combo1.AddItem "je"
Combo1.AddItem "une liste"
Combo1.AddItem "deroulante"

pour le menu, pour créé une liste, il te suffit d'utilisé la fleche qui va vers la droite dans le créateur de menu...

cs_sly68 · Answer

OK, Merci de d'être intéressé à ma demande et d'y avoir répondu.
L'instruction AddItem, c'est bon mais comment fais tu pour faire un sous liste dans cette liste ?
-----
En fait, je voudrais le même style que le menu - par exemple fichier - mais non pas en haut de mon form mais à un endroit que j'ai déterminé.
-----
Merci d'avance

cs_LordBob · Answer

je comprend pas ce que tu appel sous liste???

et pour le menu, tu veux qu'il s'affiche, par un clik sur un objet par exemple???

cs_sly68 · Answer

Ce que je veux faire, c'est par exemple, une liste comme ça par exemple :

Thème1 ->Titre1
                Titre2
                Titre3 -> Autre1
                             Autre2
Thème2 ->Titre4
                Titre5
                ...
Thème3
...

Exemple, un clik sur une image affiche la liste des thèmes, passer le souris sur le thème1 fait apparaître le liste des titres, passer la souris sur le titre3 fait apparaître la liste Autre .....

Mooiz · Answer

Donc a priori tu veux faire un menu contextuel, quoi, comme un clic droit sur le bureau de windows
dans ce cas là tu construit d'abord ton menu dans le constructeur (ou editeur je sais plus) de menu : racourci 
ctrl + E quand tu est sur ta form et ensuite tu l'appelle par exemple dans l'évènement mousedown de ta form :
en admettant que le nom de ton menu soit M1

private sub form1_mousedown(...) 'remplacer les ... par les   
             paramètres corrects
if button = vbrightbutton then 'pour dire que le menu 
                                    's'affiche quand tu fais un clic droit
     popup M1,,X,Y  'X et Y sont les coord de la souris fournis
                           'par l'évènement mousedown
end if
end sub

si tu as besoin de plus de précisions mp moi

cs_sly68 · Answer

OK, J'ai tout capté et je vais essayer
Merci de ton aide

Liste déroulante

6 réponses

Discussions similaires