comment afficher la liste de tous les éléments du combobox

Question

Bonjour,
dans V6 si je créer un combobox avec 20 ou 50 éléments il m'affiche juste les 8 premiers éléments et je doit parcourir le reste des éléments manuellement.
je cherche comment afficher la liste de tous les éléments du combobox

ucfoutu · Answer

Bonjour,
propriété Style à mettre à 1 en mode création
propriété Height à mettre à la mesure nécessaire en mode exécution
Il est clair que si tu veux "jouer" avec cette hauteur "conditionnellement" il te faudra la modifier en "jouant" comme tu l'entends avec les évènements de ce contrôle,

cs_MPi · Answer

Est-ce vraiment VB6 ou est-ce VBA ?
Je pose la question parce qu'il y a souvent confusion entre les deux...

tamagique · Answer

- ucfoutu
merci pour votre dépense
la propriété style ne règle pas le problème
si je rempli un combobox avec 40 ou 50 éléments quand je clique sur le combobox il affiche la liste des éléments que j'ai remplie avant mais il m'affiche juste 8 éléments le reste des éléments je doit les parcourir manuellement, c'est cette liste que je veut afficher les 40 ou 50 éléments que j'ai remplie avant 

- cs_MPi
je programme avec le VB6

ucfoutu · Answer

Montre donc lec ode tenté sur ce que je t'ai indiqué !
En te rappelant que je t'ai dit de modifier la propriété Height en mode exécution ...
Je veux le voir, ce code ...

ucfoutu · Answer

je te rappelle donc ce que je t'ai dit plus haut :
il est clair que si tu veux "jouer" avec cette hauteur "conditionnellement" il te faudra la modifier en "jouant" comme tu l'entends avec les évènements de ce contrôle,
 
et renouvelle ma demande : montre le code que tu as écrit sur ces bases.

ucfoutu · Answer

Bon.. J'ai un rendez-vous à jeun ...
Regarde ce que fait tout bêtement ceci, avec :
Une combo et sa propriété style à 1
un bouton de commande que tu places où tu veux
Private toto As SinglePrivate Sub Command1_Click()  Combo1.Height = 10000End SubPrivate Sub Form_Initialize() toto = Combo1.Height For i = 0 To 100  Combo1.AddItem "aaaa" & i Next 'je le mets là par code pour éviter moultes explications ' toi, mets-le donc en création Command1.Caption = "V" Command1.Move Combo1.Left + Combo1.Width, Combo1.Top, toto, totoEnd SubPrivate Sub Combo1_Click()  Combo1.Height = toto * 1.1End Sub 
Note bien : ce n'est pas le code (très élémentaire) , qui est intéressant, mais la "construction" (comme souvent).

ucfoutu · Answer

Oui ?
Et je t'ai dit de mettre à 1 et non 0 ni 2 la propriété Style !
Et que fait alors ce que je t'ai montré (mon code) ?

Comment afficher la liste de tous les éléments du combobox

7 réponses

Votre réponse

Discussions similaires