Afficher un ordre personnalisé pour un DataCombo en VB6.0

Signaler
Messages postés
3
Date d'inscription
lundi 9 janvier 2017
Statut
Membre
Dernière intervention
9 février 2017
-
Messages postés
18038
Date d'inscription
lundi 7 décembre 2009
Statut
Modérateur
Dernière intervention
11 avril 2018
-
Bonjour à tous.
J’ai une table en Access 2003 (Table1) avec deux champs (Numéro – type de données: Numéro automatique) et (Mois – type de données: texte).

1- Janvier
2- Février
3- Mars
4- Avril
5- Mai
6- Juin
7- Juillet
8- Août
9- Septembre
10- Octobre
11- Novembre
12- Décembre

Je veux afficher la liste des mois dans un DataCombo en vb6.0
Pour l’Adodc en VB6.0 j’ai essayé avec les codes si dessous.
Code 1- (select * from Table1 order by Mois desc;)
Code 2- (select * from Table1 order by Mois asc;)
Mais le DataCombo en VB6.0 affiche la liste des mois en ordre croissant ou décroissant.
Alors que moi, je cherche à afficher l’ordre des mois identique à l’ordre de table Access.
SVP aider mois à trouver le code correct.

3 réponses

Messages postés
18038
Date d'inscription
lundi 7 décembre 2009
Statut
Modérateur
Dernière intervention
11 avril 2018
237
Bonjour;
Hé bien, trie donc par Numéro, puisque ce champ est le n° automatique !
(quelle drôle de question ...)
________________________
Nul ne saurait valablement coder ce qu'il ne saurait exposer clairement.
Messages postés
3
Date d'inscription
lundi 9 janvier 2017
Statut
Membre
Dernière intervention
9 février 2017

Merci pour ton repense.
En Access j’ai trié le champ (Numéro) par ordre croissant, et sa marche bien (1 correspant à janvier, et 2 correspant à février….).
Mais le problème lorsque je passe au VB6, dans le DataCombo, les mois s’affichent par ordre alphabétique. (Août, Avril, Décembre, Février …..).
Messages postés
18038
Date d'inscription
lundi 7 décembre 2009
Statut
Modérateur
Dernière intervention
11 avril 2018
237
Tu as dans ton DataCombo ce que tu décides d'y avoir !
Et tu le décides en donnant aux propriétés RecordSource et DataSource de la DataCombo celles qui correspondent à tes souhaits.
ouvre ton aide VB6 sur les deux mots que j'ai mis en gras.